如何让vba用户窗体的文本框内自动显示出系统时间？

VBA中窗体出现时触发事件，使用UserForm_Initialize()，类似VB中的Form_load()

VBA中的文本框是Textbox，而VB中的是text

日期都可以用Date函数来获得，默认是YYYY/M/D格式，如果一定要显示固定格式，可以format函数，例如Formt(Date,"yyyy-m-d")

故下面代码可实现题目中的要求——（假设日期框是textbox1）

Private Sub UserForm_Initialize()

TextBox1.Text = Formt(Date,"yyyy-m-d")

End Sub

vba使用当前日期的方法是利用excel内置函数实现的。

1、excel中函数date的使用方法：

2、在vba中，需要先定义一个变量，然后把date赋值：

dim cuDate as string

cuDate = date

这样变量cuDate就获取到了date的值。

3、运行结果：

Sub test()

Dim cuDate As String

cuDate = Date

MsgBox cuDate

End Sub