VB程序求帮助....

2025-01-07 09:53:45

推荐回答（3个）

回答1：

变量 dtmBegintTime要设置成全局变量。

回答2：

把
Private Sub 通用_Click()
Dim dtmBeginTime As Data
Dim dtaEndTime As Data
End Sub
改成
Dim dtmBeginTime As Data
Dim dtaEndTime As Data
或改成
Public dtmBeginTime As Data
Public dtaEndTime As Data

回答3：

在第一个Click事件定义了二个变量，在第二个、第三个Click中使用变量，其实这个变量是不能传递数据的，是过程级变量。
将第一个Click事件中的Sub 拿掉，Private Sub 通用_Click()和End Sub删除，这样就定义为模块级变量了。