下列VB程序运行时,在文本框Text1中输入1234,单击命令按钮Command1后,文本框Text1中显示的内容是________。该程序使用了________结构(填:顺序 / 选择 / 循环)。

Private   Sub  Command1_click ( )

Dim  n  As  Integer , x  As  Integer
n = Val ( Text1.Text  )
x = n  Mod 10
n = x * 1000 + n \ 10
Text1.Text = Str ( n )

End  Sub

当前题号:1 | 题型:填空题 | 难度:0.99
有如下Visual Basic程序段:
a = "360"
b = Val(a)
c = Len(a)
If b > c Then
Label1.Caption = "取数值"
Else
Label1.Caption = "取字符"
End If
该程序段运行后,在标签Label1上显示的是____________。
当前题号:2 | 题型:填空题 | 难度:0.99
在Visual Basic中,语句Lab.Caption="你好"中的“Lab”是( )
A.属性值
B.对象名
C.属性名
D.类名
当前题号:3 | 题型:选择题 | 难度:0.99
下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是:____________________ 。
Private Sub Command1 Click
Dim x As Integer, m As Integer
m = 3
For x = 1 To 5
If m > 3 Then m = m + 2 Else m = m - 1
Next x
Text1.Text = Str(m)
End Sub
当前题号:4 | 题型:填空题 | 难度:0.99
在Visual Basic中,表达式Len("-100")+100的值是(    )
A.0
B.104
C.200
D.-100100
当前题号:5 | 题型:选择题 | 难度:0.99
某算法的部分流程图如图所示,以下说法正确的是(  )
A.该流程执行后,变量k的值是-1
B.该流程执行后,变量a的值是16
C.该流程用于计算并输出1+8-16的值
D.该流程完整执行1次,“a<32?”共执行了3次
当前题号:6 | 题型:选择题 | 难度:0.99
在Visual Basic中,下列能作为变量名的是(    )
A.If
B.Not
C.Int
D.Flag
当前题号:7 | 题型:选择题 | 难度:0.99
下列不属于高级编程语言的是
A.C 语言B.VB语言C.Python语言D.机器语言
当前题号:8 | 题型:选择题 | 难度:0.99
某算法的部分流程图如图所示,执行完这部分流程后,变量i,s的值分别是( )
A.3  9B.4    18C.5    18D.6 4
当前题号:9 | 题型:选择题 | 难度:0.99
对称字符串从左读到右和从右读到左完全一样,如“1221”“12321”。编写VB程序,判断输入字符串是否对称,程序运行界面如图a所示,在文本框Text1中输入字符串,单击Command1按钮,在标签Label2上显示判断结果。

图a

图b
(1)实现上述功能的VB程序如下,请在画线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String, c1 As String, c2 As Integer
Dim n As Integer, i As Integer
Dim f As Boolean
s = Text1.Text
n = Len(s)
f = True
For i = 1 To n \ 2
c1 =  _____________
c2 = Mid(s, n - i + 1, 1)
If c1 <> c2 Then
f = False
Exit For
End If
Next i
If   Then
Label2.Caption = "对称"
Else
Label2.Caption = "不对称"
End If
End Sub
划线处代码应为
________________
________________
(2)运行该程序,在文本框中输入aba,单击“判断”按钮后,出现图b所示错误提示,引起该错误的原因是________________(单选,填字母:
A.变量s的数据类型错误;B.变量c2的数据类型错误;C.变量f的数据类型错误)。
当前题号:10 | 题型:填空题 | 难度:0.99