简单问题,谢谢回答。
在以下代码中为什么要加这个语句呢?
Private Sub Command1_Click()
On Error GoTo errhandle
frmdraw.picturemain.Circle (Me.Text1.Text, Me.Text2.Text), Me.Text3.Text
me.hide
frmdraw.Show
frmdraw.picturemain.DrawStyle = 0
errhandle:
If Not Err.Number = 0 Then MsgBox Err.Description
End Sub
Private Sub Command2_Click()
frmdraw.picturemain.DrawStyle = 0
Text1.Text = "": Text2.Text = "": Text3.Text = ""
me.hide
End Sub
Private Sub Form_Load()
Me.Option1(6).Value = True
End Sub
问题点数:15、回复次数:6Top
1 楼songyangk(小草)回复于 2001-07-30 16:27:26 得分 0
哪个语句?Top
2 楼jixian(极限)回复于 2001-07-30 16:30:26 得分 0
??Top
3 楼youngwolf(作为一个初学者,身上带本参考书很合理吧)回复于 2001-07-30 16:31:39 得分 0
me.hide 谢谢啦Top
4 楼neusoftlan(擒贼先擒我)回复于 2001-07-30 16:38:46 得分 15
隐藏本窗体,至于为什么则是程序需要贝,只让一个窗体可见。Top
5 楼ExitWindows(void)回复于 2001-07-31 09:51:49 得分 0
upTop
6 楼ExitWindows(void)回复于 2001-07-31 10:04:55 得分 0
upTop




