何謂WithEvents

Question

請問VB裡的WithEvents是什麼意思?
請問VB裡的WithEvents是什麼意思

Answer 1

Dim [WithEvents] varname[([subscripts])] [As [New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .Dim 陳述式的語法具有下列幾個單元：單元描述WithEvents選擇性引數。表示 varname 是物件變數的關鍵字，且用來對應 ActiveX 物件所引發的事件。僅適用於物件類別模組中。您可以用 WithEvents 來個別宣告變數，但不可用來建立陣列，也不可與 New 同時使用。WithEvents說白話點就是產生事件,應用在製作使用者控制項或物件類別模組中比較多,舉個例子:把以下的Code直接貼上去,按F5執行即可Dim WithEvents Command1 As CommandButtonPrivate Sub Form_Load()    '先產生1個CommandButton    Set Command1 = Controls.Add("VB.CommandButton", "Command1")    Command1.Caption = "按我"    Command1.Visible = TrueEnd Sub'因為有加WithEvents此關鍵字所以有Click這事件Private Sub Command1_Click()    MsgBox "哈囉!!"End Sub

Answer 2

Dim Withevents