[已解决]如何在(VBA)窗体标题上写上年月日

twtthduu

如何在(VBA)窗体标题上写上年月日, 请老师给看一下. VBA求助.rar (9.63 KB, 下载次数: 19)

2012-2-10 21:16 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

fjmxwrs

2012-2-10 21:23

1. Private Sub UserForm_Initialize()
   
2. Dim tt As String
   
3. tt = Format(Date, "yyyy年mm月dd日")
   
4. UserForm1.Caption = tt
   
5. End Sub

复制代码

VBA求助.zip (9.09 KB, 下载次数: 32)

2012-2-10 21:23 上传

点击文件名下载附件

跳转到最佳答案楼层

fjmxwrs

1. Private Sub UserForm_Initialize()
   
2. Dim tt As String
   
3. tt = Format(Date, "yyyy年mm月dd日")
   
4. UserForm1.Caption = tt
   
5. End Sub

复制代码

VBA求助.zip (9.09 KB, 下载次数: 32)

2012-2-10 21:23 上传

点击文件名下载附件

zgwei050

Private Sub UserForm_Initialize()
Me.Caption = Date
End Sub

windimi007

看看是不是这个效果吧！
另外感觉单击按钮这个程序还是放在模块中比较好。

1. Private Sub UserForm_Initialize()
   
2.     UserForm1.Caption = Format(Date, "yyyy年m月d日")
   
3. End Sub
   

复制代码

hrpotter

1. Private Sub UserForm_Initialize()
   
2. Me.Caption = Format(Now, "yyyy年mm月dd日")
   
3. End Sub

复制代码

twtthduu

fjmxwrs 发表于 2012-2-10 21:23

谢谢了,没有想到这个解决的真快呀.再次谢谢.

twtthduu

windimi007 发表于 2012-2-10 21:25
看看是不是这个效果吧！
另外感觉单击按钮这个程序还是放在模块中比较好。

真是不错呀,只是看到的晚了,学习了,谢谢各位老师们.

qzc804030

学习来了!已收藏!

小蚊子

学习来了!已收藏!