我的方法是新建个模块 然后在模快中定义公共变量 直接引用模快就行了 啥时候想用啥时候都可以用

第二个问题
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Exit Sub
End Sub