Dim a As Data /通用声明
Private Sub Form_Click()
a = Time()
Print a
End Sub


出错,提示"对象变量或WITH块变量未设值"

为什么啊?!请赐教!

没找到<提问者的智慧>,我急啊,请管理员不要锁我的贴子啊,谢谢!

声明的 函数不对
在就是time()是什么呀
你是不是要显示时间呀
可以这样

Private Sub Form_Click()
Print time
End Sub