更多"窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令"的相关试题:
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click（ ）
Dim a
a=Array(1, 2, 3, 4, 5)
Fork= 1 To 4
s=s+a(k)
Next k
Print s
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click（ ）
Dim a
a=Array(1，2，3，4，5)
Fork=1 To 4
S=S+a(k)
Next k
Print S
End Sub
A. 10
B. 14
C. 15
D. 120
[单项选择]在窗体上有一个命令按钮Command1，编写如下程序：
Private Sub Command1_Click（ ）
Print pp1(3, 7)
End Sub
Public Function pp1(x As Single, n As Integer) As Single
If n = 0 Then
pp1= 1
Else
If n Mod 2 = 1 Then
pp1 =x*x+n
Else
pp1 =x*x-n
End If
End If
End Function
程序运行后，单击该命令按钮，屏幕上显示的是( )。
A. 2
B. 1
C. 0
D. 16
[单项选择]某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开另一个窗体，需要执行的宏操作是(• )。
A. OpenQuery
B. OpenReport
C. OpenWindow
D. OpenForm
[单项选择]某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开另一个窗体，需要执行的宏操作是______。
A. OpenQuery
B. OperLReport
C. OpenWindow
D. OpenForm
[填空题]某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开一个报表，需要执行的宏操作是 【7】 。
[填空题]某窗体中有一命令按钮，名称为C1。要求在窗体视图中单击此命令按钮后，命令按钮上显示的文字颜色变为棕色(棕色代码为128)，实现该操作的VBA语句是______。
[填空题]建立了一个窗体，窗体中有一命令按钮，单击此按钮，将打开一个查询，查询名为“qT”，如果采用VBA代码完成，应使用的语句是_________。
[填空题]某窗体中有一命令按钮，名称为C1。要求在窗体视图中单击此命令按钮后，命令按钮上昧的文字颜色变为棕色（棕色代码为128）
[单项选择]现有一个已经建好的窗体，窗体中有一命令按钮，单击此按钮，将打开“tEmployee”表，如果采用VBA代码完成，下面语句正确的是( )。
A. docmd.openform"tEmployee"
B. docmd.openview"tEmployee"
C. docmd.opentable"tEmployee"
D. docmd.openreport"tEmployee"
[填空题]某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开一个报表，需要执行的宏操作是______。
[单项选择]在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function fun(ByVal num As Long) As Long Dim k As Long k=1 mum=Abs(num) Do While num k=k*(num Mod 10) num=num/10 Loop fun=k End Function Private Sub Command1_Click（ ） Dim n As Long Dim r As Long n=InputBox("请输入一个数") n=CLng(n) r=fun(n) Print r End Sub
A. 20
B. 24
C. 9
D. 28
[单项选择]设在窗体上有两个命令按钮，其中一个命令按钮的名称为cmda,则另一命令按钮的名称可能是( )。
A. cmdc
B. cmdb
C. cmda
D. Commandl
[填空题]在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示“打开文件”对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。
Private Sub Command1_Click（ ）
CommonDialog1. Filter=______
CommonDialog1. ShowOpen PCSTextBox. Text＝______
End Sub
[单项选择]在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码：
Private Sub Commandl_click（ ）
m＝2.17
n＝Len(Str$(m) +Space(5) )
Me!Text1＝n
End Sub
打开窗体运行后，单击命令按钮，在文本框中显示( )。
A. 5
B. 8
C. 9
D. 10
[单项选择]在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为Text1)，并在命令按钮中编写如下事例代码：
Private Sub Command1_Click( )
m=2.17
n=Len(Str$(m)+Space(5))
Me.Text1=n
End Sub
窗体打开运行后，单击命令按钮，在文本框中显示______。
A. 5
B. 8
C. 9
D. 10
