下列VB表达式计算结果为True的是( )
A.Int(Sqr(10)) > 2 ^ 2 |
B.Mid("0123", 3, 2) > "56" |
C.Len("654321") > Int(Rnd * 3) ^ 2 |
D.Not (3 = 4 Or 5 > 3) |
更新时间:2020-11-27 23:29:14
|
【知识点】 VB程序的调试
相似题推荐
选择题
|
适中
(0.65)
【推荐1】字符串变量a、b的值分别为"64"、"36",则表达式a+b的值是( )
A.100 | B."100" | C."64+36" | D."6436" |
您最近一年使用:0次
选择题
|
适中
(0.65)
【推荐2】字符串,由数字、字母和“-”组成,现以“-”为分组标记,作如下处理:数字往后移5个,如0→5,3→8,6→1;各组字母倒序放在本组前面;“-”不作处理。如字符串“t37-9Yg-52r-”,经过处理后变为“t82-gY4- r07-”。下列VB程序段实现该算法,则填空处的代码应该是( )
Const mw = "0123456789"
S = Text1.Text: s1 = "":s2 = ""
For i=1 To Len(s)
C = Mid(s,i,1)
If c >= "0" And c <= "9" Then
______(1)_____
______(2)_____
s1 = s1 + c
ElseIf c = "-" Then
s2 = s2 + sl + c
s1 = ""
E1se
______(3)_____
End If
Next i
① t =(Val(c)+5) Mod 10 ② c = Mid(mw,t,1) ③ sl = c + sl
④ t=(Val(c)+4) Mod 10+1 ⑤ c= Mid(mw,t+1,1) ⑥ sl = sl + c
Const mw = "0123456789"
S = Text1.Text: s1 = "":s2 = ""
For i=1 To Len(s)
C = Mid(s,i,1)
If c >= "0" And c <= "9" Then
______(1)_____
______(2)_____
s1 = s1 + c
ElseIf c = "-" Then
s2 = s2 + sl + c
s1 = ""
E1se
______(3)_____
End If
Next i
① t =(Val(c)+5) Mod 10 ② c = Mid(mw,t,1) ③ sl = c + sl
④ t=(Val(c)+4) Mod 10+1 ⑤ c= Mid(mw,t+1,1) ⑥ sl = sl + c
A.①②③ | B.④⑤⑥ | C.①⑤③ | D.④②⑥ |
您最近一年使用:0次