Question

vb中怎么得到当前日期并显示在txt控件中

我写了一个函数
Private Function GetRkdate() As String
GetRkdate = Format(Now, "yyyy-mm-dd")
End Function
想让txt控件在窗体加载时显示当前日期我是这样的：
txtrkdate=GetRkdate
但是在调试时显示“属性的无效使用”
求高手帮忙看看！谢谢~
不行，还是会有同样的错误出现！！“属性的无效使用”

Answer 1

我分析错误可能来源于以下两个环节:

一是楼主使用了一个函数，而调用的一个过程，可以这样调整：
把txtrkdate=GetRkdate
改成txtrkdate=GetRkdate()

二是查看使用的控件名字是否是txtrkdate，不对的话修改一下。

还不行的话请继续留言。

Answer 2

Private Function GetRkdate() As String
GetRkdate = Format(Now, "yyyy-mm-dd")
End Function
Private Sub Form_Load()
txtrkdate = GetRkdate
End Sub

Answer 3

我这里没有问题!
应该没有问题的!

Answer 4

请看图片.......