求助用vb.net2005 画图问题
老师让我们做一个画图工具。。我不知道如何在textbox上添加画布。。。还有怎么在菜单上关联出铅笔的功能。。。求各位大侠帮助
2007-10-28 11:35
前面需要定义
Dim flag1 As Boolean
Private Sub P1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
flag1 = True
End Sub
Private Sub P1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If flag1 = True
对象.DrawWidth = 线条宽度
对象.PSet (X, Y), 颜色
End If
End Sub
2007-10-28 16:10