vb第一课那个画圆的问题!

来源:百度知道 编辑:UC知道 时间:2024/05/19 09:29:53
小弟近日自学vb..作的第一个应用程序练习就是书上那个画圆清除的程序!
我照着书上把代码全打进去了,请看!

Private Sub Command1_Click()
Forml.Circle (200, 200), 500
Textl.Text = "在窗体上画圆"
End Sub

Private Sub Command2_Click()
Forml.Cls
Textl.Text = "圆消失了"
End Sub

启动之后提示“实时错误 424 要求对象”
对照着检查了好几遍仍出错,我不知道错在哪里!
小弟是第一次接触vb,大家不要笑话啊!

你用我帮你改的这个代码试试。你的问题主要是form1和text1中的数字“1”你写成了字母L的小写了。所以当然是错的了。在通用里用这个代码Option Explicit有助于检验这种错误。好的程序都有Option Explicit的。
Option Explicit
Private Sub Command1_Click()
Form1.Circle (200, 200), 500
Text1.Text = "在窗体上画圆"
End Sub

Private Sub Command2_Click()
Form1.Cls
Text1.Text = "圆消失了"
End Sub

如果还没有解决的话,在窗体上添加一个textbox再试。