我可以使用下面的代码格式化我的dtpicker。
Private Sub Form_Load()
DTPicker1.Format = dtpCustom
DTPicker1.CustomFormat = "yyyy/MM/dd"
DTPicker1.Value = Format(Date, "yyyy/MM/dd")
End Sub
使用下面的代码获取dtpicker值
Private Sub Command1_Click()
Label34.Caption = DTPicker1.Value
End Sub
但结果的格式不像dtpicker显示值。
Dtpicker value : 2015/05/26
Label34 Value : 05/26/2015
如何纠正这个问题......?
答案 0 :(得分:2)
在为标签指定值时使用格式化功能(与DatePicker相同):
Private Sub Command1_Click()
Label34.Caption = Format(DTPicker1.Value, "yyyy/MM/dd")
End Sub
甚至更好,从DatePicker获取格式:
Private Sub Command1_Click()
Label34.Caption = Format(DTPicker1.Value, DTPicker1.CustomFormat)
End Sub
我不记得了,但也许DatePicker有一个属性为您提供文本的值(格式正确)。