æ¹æ³ä¸ï¼å¾ªç¯éåææçªä½ï¼éä¸å
³éï¼æ¯è¾ç®åæç¨
Private Sub Command1_Click()
Dim Frm As Form
For Each Frm In Forms
Unload Frm
Next
End Sub
æ¹æ³äºï¼å
³éæ¶ï¼åå«åå
³éæ¯ä¸ªçªä½ç代ç
Private Sub Command1_Click()
Unload Form2
Unload Form1
'æå¤å°ä¸ªçªä½åå¤å°ä¸ª
End Sub
æ¹æ³ä¸ï¼
Private Sub Command1_Click()
End 'endæ¹æ³è°¨æ
使ç¨ï¼å¦æçªä½æ¯è¾å¤æï¼å®¹æå¼èµ·å
åæ³é²çé®é¢
End Sub
温馨提示:内容为网友见解,仅供参考