填空题

在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时设置其计时器间隔为1秒，计时器触发事件过程实现在Text1文本框中动态显示当前日期和时间。请将下列程序补充完整。
Private Sub Form Load()
Me.TimerInterval=1000
End Sub
Private Sub ______
Me!text1=Now()
End Sub

【参考答案】

Form_Timer()
<上一题 目录 下一题>
热门 试题

填空题
下面程序的输出结果是______。 Private Sub Command1_Click() Dim a(1 To 20) Dim i For i=1 To 20 a(i)=i Next i For Each i In a() a(i)=20 Next i MsgBox a(2) End Sub
填空题
假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To len(S) s1=Ucase(Mid(S，i，1))+s1 Next i Fun=s1 End Function 则Str2=Fun( abcdefg )的输出结果为______。
相关试题