求助！！vb程序
设计一个鼠标画图程序，界面设计，窗体中添加一个picturebox控件，一个combobox组合下拉框、一个通用对话框与两个命令框，以下是我的程序，但是我运行的时候总是提示变量未定义，还望各位大侠帮忙指正哪里出了问题
Option Explicit
Dim x0 As Integer, y0 As Integer
Private Sub Combo1_Click()
Picture1.DrawWidth = Val(Combol.Text)
End Sub
Private Sub Command2_Click()
CommomDialog1.ShowColor
Picture1.ForeColor = CommonDialog1.Color
End Sub
Private Sub Command3_Click()
Picture1.Cls
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 9
Combol.AddItem Str(i + 1), i
Next i
Picture1.AutoRedraw = Ture
Picture1.Cls
Picture1.ForeColor = vbWhite
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If buttom = 1 Then
Picture1.Line (x0, y0)-(X, Y)
End If
x0 = X
y0 = Y
End Sub
使用F8
我不知道是程序错了还是应该对属性值进行改正？
单步调试，看那句出错
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 9
Combol.AddItem Str(i + 1), i
Next i
Picture1.AutoRedraw = Ture
Picture1.Cls
Picture1.ForeColor = vbWhite
End Sub
这个中的Combol.AddItem Str(i + 1), i说是未定义？？？？不知道怎么改
相关问答：
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
在VB中，如何执行下面的SQL语句
Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber='0001'
比如：
cn.execute("Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber=&# ......
我用VB调用Word 嵌入VB窗体中(这些都是正常)
然后在桌面打开另一个word a.doc
现在问题出来了.....我关闭VB窗体,之前的那个word也正常关闭了
接下来闭关a.doc 会出现问题
我调用的w ......
一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......
