Private Sub Form_DblClick()Label1.Caption = "你双击了窗体"End SubPrivate Sub Form_click()Label1.Caption = "你点击了窗体一次"End Sub搞定了
