利用 vba,建一个文本框和一个命令按钮
文本框代码
Private Sub CommandButton1_Click()
TextBox1 = Time
End Sub
命令按钮代码Private Sub TextBox1_Change()
100 TextBox1 = Time
DoEvents
GoTo 100
End Sub
最后将宏设为低,打开ppt,f5,单击命令按钮即可。可将命令按钮的caption设为开始
wszgr 发表于 2009-4-16 10:50:49
利用vba 建立一个文本框和一个命令按钮
命令按钮代码
Private Sub CommandButton1_Click()
TextBox1 = Time
End Sub
文本框代码
Private Sub TextBox1_Change()
100 TextBox1 = Time
DoEvents
GoTo 100
End Sub
将宏设为低,可将命令按钮的caption设为开始
原帖由 wszgr 于 2009-4-16 10:50 发表
利用vba 建立一个文本框和一个命令按钮
命令按钮代码
Private Sub CommandButton1_Click()
TextBox1 = Time
End Sub
文本框代码
Private Sub TextBox1_Change()
100 TextBox1 = Time
DoEvents
GoTo 100
En ...
文本框代码
Private Sub CommandButton1_Click()
TextBox1 = Time
End Sub
命令按钮代码Private Sub TextBox1_Change()
100 TextBox1 = Time
DoEvents
GoTo 100
End Sub
最后将宏设为低,打开ppt,f5,单击命令按钮即可。可将命令按钮的caption设为开始
命令按钮代码
Private Sub CommandButton1_Click()
TextBox1 = Time
End Sub
文本框代码
Private Sub TextBox1_Change()
100 TextBox1 = Time
DoEvents
GoTo 100
End Sub
将宏设为低,可将命令按钮的caption设为开始
(2009-04-16 10:57:07, Size: 12.3 KB, Downloads: 180)
9.16 KB, 下载次数: 104)
QUOTE:
利用VBA是什么意思T