求VB高手相助

显示全部楼层 · 2011-8-3 11:35:16

导师让用VB完成一个简单的类似windows里画图板的程序
但我的VB基础为零只学过一点C
求VB高手相助最好有注释~~~~

千问 · 2011-8-3 11:35:16

Dim HuaStart As Boolean '定义模块级变量，来记住是否可以画线Dim XiangPi As Boolean '记录橡皮是否选中'用列表框来选择线条粗细Private Sub Combo1_Click()
Picture1.DrawWidth = Val(Combo1.Text) '用组合框的内容经转化成数值后设置图片框1的画线粗细End SubPrivate Sub form_Resize() '当窗体大小改变时会执行
If Paint.WindowState = 1...

千问 · 2011-8-3 11:35:16

你学一点GID的API 不过你现在就用VB自己带的属性...

千问 · 2011-8-3 11:35:16

楼上的代码有一个严重的错误：在VB6.0中，dim 变量，变量 as 类型是不可以的，这样只有最后一个变量才能定义成相应的类型，其他的都为变体型。只能这样连着定义：dim 变量 as 类型，变量 as 类型。为了方便，可以用符号代替，比如：dim i%.drawact% 'integer的符号是%Dim canline As Boolean...