在窗体上有一个命令按钮和一个文本框,其名称分别为Command1和text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivatesubCommand1_click()A=inputbox(“Enteraninteger”)B=inputbox(“Enteraninteger”)Text1.text=b+aEndsub程序运行后,单击命令按钮,如果在输入对话框里输入8和10,则文本框中显示的内容是()。
A.108
B.18
C.810
D.出错
A.108
B.18
C.810
D.出错
窗体上有4个文本框控件数组text1()和一个命令按钮,程序运行前如左图所示,程序运行后如右图所示。给定的程序不完整,将程序补充完整。
Dim x(3)As Integer Private Sub Command1_Click () For i = 0 To 3 x(i)=【 】 Next i For i = 0 To UBound(x)- 1 For j = i To UBound(x) If【 】Then t = x(i) x(i)= x(j) x(j)= t End If Next j Next i For i = 0 To 3 Text1(i) .Text = Str(x(i)) Next i End Sub
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Function M(x As Integer, y As Integer) M=IIf(x>y, x, y) End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=100 b=200 Print M(a, B) End Sub 程序运行后,单击命令按钮,输出结果为【 】。
A.双击数据库窗口中的宏Macro1
B.单击登录窗体中的验证按钮Command1
C.在文本框Text1中输入密码后按<Enter>键
D.在VBA程序Module1中运行宏Macro1
A.双击数据库窗口中的宏Macro1
B.单击登录窗体中的验证按钮Command1
C.在文本框Text1中输入密码后按<Enter>键
D.在VBA程序Module1中运行宏Macro1
窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。
Private Sub Command1_Click()
Dim i As Integer,s As String
s="首都经济贸易大学"
For i=1 To b Step 2
Text1=Text1&Mid(s,i,1)
Next i
End Sub
窗体运行后,单击命令按钮Command1,Text1中显示的是______。
A.15
B.14
C.13
D.12
A.15
B.14
C.13
D.12