路人乙

心有多大，舞台就有多大。

清屏和show方法

例1：

Dim a As Integer

Private Sub Form_Click()

a = a + 1

Cls '这是清屏

Print "第" & a & "次单击"

End Sub

print前面没加form因为默认在本窗体中输出。

例2：有2个窗体form1,form2,点form1的时候，弹出form2,
show 后面1表示 form2不关闭无法操作form1,0表示不关闭还可操作，这是2种模式。

Private Sub Form_Click()

Form2.Show 1

End Sub

posted on 2008-08-24 17:24 上帝也犯困阅读(91) 评论(0) 编辑收藏