设a=5,b=6,c=7,d=8,下列表达式的值是( )。 a<b and c>=d or 2<>d-6
A.0
B.-1
C.FALSE
D.TRUE
A.0
B.-1
C.FALSE
D.TRUE
第1题
下列语句生成的对话框在标题栏中显示的信息是( )。
x=InputBox("计算机","等级考试","0")
A.“计算机” B.“等级考试” C.x D.0
第2题
执行语句:
Debug.Print Int(3.1415926*10000+0.5)/10000后,在立即窗口上输出的结果是( )。
A.3 B.14 C.3.142 D.3.1416
第3题
窗体上有一个命令按钮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
第4题
设有一个窗体,内有一个名称为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
第5题
有一个过程定义:
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
第6题
有一个过程如下,执行该过程后立即窗口中显示( )。
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
第7题
关于ADO数据访问接口可以访问的数据源类型( )。
A.只能是数据库 B.只能是电子邮件系统
C.只能是文件系统D.既可以是数据库也可以是非数据库
第8题
在使用ADO访问数据源时,从数据源获得的数据以行的形式存放在( )。
A.Command对象 B.Recordset对象
C.Connection对象D.Parameters对象
第10题
执行下列程序后立即窗口中的输出结果是______。
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
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!