主题:问个关于Class_Terminate的问题
Class PageOperate
Private Path,FilePath,StartTime,EndTime
Private Sub Class_Initialize()
StartTime = Timer
End Sub
Private Sub Class_Terminate()
EndTime = Timer
Set Fso = Nothing
End Sub
Public Property Get ResultTime()
ResultTime = EndTime
End Property
End Class
为什么EndTime获取不到值??
Private Path,FilePath,StartTime,EndTime
Private Sub Class_Initialize()
StartTime = Timer
End Sub
Private Sub Class_Terminate()
EndTime = Timer
Set Fso = Nothing
End Sub
Public Property Get ResultTime()
ResultTime = EndTime
End Property
End Class
为什么EndTime获取不到值??