菜鸟小问题

Question

声明了一个变量为Date类型，然后赋值，想在文本框内显示，但是提示属性的使用无效，代码应该如何写呢？新手不懂，望指教。
Dim a1 as date
a1 #10/1/2010#
text1.text=a1

Answer 1

Dim a1 As Date
a1 = #10/1/2010#
Text1.Text = a1

Answer 2

Private Sub Form_Load()
Dim currentDate As DatecurrentDate = CDate(Format("2010-10-8", "yyyy-MM-dd"))Text1.Text = CStr(currentDate)
End Sub

Answer 3

Dim a1 As Date
a1 = #10/1/2010#
Text1.Text = a1在我的电脑上是没问题的，你说报错，报什么错？

Answer 4

晕，我发现问题了，
哪里都没有问题，是我把数据类型写错了。
语句生成器第一个出来的是Data 我一直用的是Data。
实在不好意思。新手笨，粗心。多包涵！！

Answer 5

哥们，你使用Now函数读取一个系统时间格式来看一看，对比一下，看看是不是你的时间格式有误，最好依照Now返回的格式来。