有一程式包含了兩個Form(Form1、Form2),其中Form1上有一個Command Button。當執行Form1中間,Form2會被Load,若按下Form1上Command Button便停止,這是程式當初的設計想法。可是當我按下Form1上的Command Button,程式並不如想像的那樣停止(StopFlag竟然都是False)。以下的程式流程何處有錯?我有宣告Public變數。還有當以下的方式當結束Form2時是否又會觸發Form1_Active事件?
Public StopFlag As Boolean
-----------------------------
Private Sub Form1_Active()
.
  .
  .
Load Form2
Form2.Show
If StopFlag = True Then Goto xxx

xxx:

End Sub
------------------------------
Private Sub Form2_Active()
.
  .
  .

If Form1.StopFlag = True Then Goto xxx

xxx:

End Sub
----------------------
Private Sub Command1_Click()
StopFlag = True

End Sub
----------
請問以上的寫法有錯嗎?如果有錯又當如何修改?Command按下是否又會再觸發Form_Active()事件?
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(3) 人氣()