2020计算机二级VB考试巩固试题及答案004

(1)以下可以作为Visual Basic中所允许的形式的数值型数据是( )。 A)1.87E+50

B)D32

C)±25.74

D).368

答案：D

(2)如果模块定义为：Defstr C-F，则以下语句运行后输出结果是( )。

d$=”321”：f=”654” print d+f$

A)321654

B)975

C)654321

D)显示出错信息

答案：D

(3)下列程序代码段中，在单击命令按钮调用SelMid函数时，其运行结果为( )。

Private Function SelMid(aStr As Strin91 As String Dim temp As String

Dim sLen As]nteger

temp=""

sLen=Len(aStr) i=1

Do While i<=sLen/2

ternP=temp+Mid(aStr，i，1)+Mid(aStr，sLen-i+1，1) i=t+1

Loop

SelMid=temp

End Function

Private Sub Commandl-Click() Dim Str As String

Str=”abedef”：Print SelMid(str)

End　Sub

A)abcdef

B)afbecd

C)fedeba

D)defabc

答案：B