执行语句: Debug.Print Int(3.1415926*10000+0.5)/10000后,在立即窗口上输出的结果是( )。
A.3
B.14
C.3.142
D.3.1416
A.3
B.14
C.3.142
D.3.1416
第1题
窗体上有一个命令按钮command1,其Click事件过程如下:
Private Sub Commandl_Click()
Dim x As Integer
x=InputBox("请输入x的值")
Select Case x
Case 1,2,4,6
Debug.Print"A"
Case 5,7 To 9
Debug.Print"B"
Case Is=10
Debug.Print"C"
CaSe ElSe
Debug.Print"D"
End Select
End Sub
程序执行后单击命令按钮,在弹出的输入框中输入8,则立即窗口上显示( )。
A.A B.B C.C D.D
第2题
设有一个窗体,内有一个名称为Command1的命令按钮,该模块内还有一个函数过程:
Public Function f(x As Integer)As Integer
Dim y As Integer
x=20
y=2
f=x*y
End Function
Private Sub Command1_Click()
Dim y As Integer
StatiC x As Integer
x=10
y=5
y=f(x)
Debug.Print x;y
End Sub程序运行后,如果单击命令按钮,则在立即窗口上显示的内容是( )。
A.10 5 B.20 5 C.20 40 D.10 40
第3题
有一个过程定义:
Public Sub abc(a As integer,b As integer)
则该过程的正确调用形式为( )。
A.Call abc(1,1.2) B.Call sub(1,1.2)
C.abc(1,1.2)D.sub 1,1.2
第4题
有一个过程如下,执行该过程后立即窗口中显示( )。
Private Sub a1()
Dim i As Integer,j As Integer,t As Integer
Dim a(4)As Integer,b(4)As Integer
t=2
For i=1 To 4
a(i)=i Mod 4
b(i)=i*i+i^t
Next i
Debug.Print a(t); b(t)
End Sub
A.2 8 B.8 2 C.0 8 D.2 6
第5题
关于ADO数据访问接口可以访问的数据源类型( )。
A.只能是数据库 B.只能是电子邮件系统
C.只能是文件系统D.既可以是数据库也可以是非数据库
第6题
在使用ADO访问数据源时,从数据源获得的数据以行的形式存放在( )。
A.Command对象 B.Recordset对象
C.Connection对象D.Parameters对象
第8题
执行下列程序后立即窗口中的输出结果是______。
Private Sub a2()
Dim i As Integer,j As Integer
For i=1 To 5
For j=1 To i
If i Mod 2=0 Then
Debug.Print"*";
E1se
Debug.Print"#";
End If
Next j
Debug.Print
Next i
End Sub
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!