[英]Dtpicker in VB6
我可以使用以下代码格式化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
如何纠正这个问题...?
在为标签分配值时,使用格式功能(与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可能有一个属性,可将其值设置为文本(格式正确)。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.