如何让文本框显示当天日期

来源：百度知道 编辑：UC知道 时间：2024/05/21 14:57:51
一个text1.text 不允许修改 只显示当天日期
那麻烦再问一下 有没有函数是用来判断文本框中内容是否是日期的呢

Text1.Lock=True '锁定文本框
Text1.Text=Date '设置文本框的内容为当前日期

Private Sub Form_Load()
Text1.Text = Date
End Sub

Text1.Locked = True
Text1.Text = Date

没有函数来判断。只是。Text1.Text=Date '设置文本框的内容为当前日期。