现有如下Visual Basic程序段:
y = -100 :x = 100
If x > 10 Then
y = -1

Elseif  x > 50 Then

y = 1

Else

y = 0

End if

该程序段执行后,变量y的值是(  )
A.-100B.-1C.1D.0
当前题号:1 | 题型:选择题 | 难度:0.99
现有如下Visual Basic程序:

Private Sub Command1_Click()

Dim i As Integer, c As String, s As String, t As String

s = Text1.text

t = ""

For i = 1 To Len(s)

c = Mid(s, i, 1)

If  c >= "0" And c <= "9"  Then t = t + c

Next i

Text2.text = t

End Sub

运行该程序,在文本框Text1中输入“2016_Student”(不包含引号),单击命令按钮Command1后,文本框Text2中显示的内容是_________。
当前题号:2 | 题型:填空题 | 难度:0.99
下列VB程序段的输出结果是
a=25:b=18:c=b
if  a>b  then
c=a
end if
print c
A.25B.18C.7D.0
当前题号:3 | 题型:选择题 | 难度:0.99
若依次输入12,6,运行以下VB程序的结果是( )
A.24B.30C.1266D.12612
当前题号:4 | 题型:选择题 | 难度:0.99
某算法的部分流程图如图所示,执行这部分流程后,变量x和Flag的值分别是
A.2,True
B.3,True
C.2,False
D.3,False
当前题号:5 | 题型:选择题 | 难度:0.99
在VB中,下列程序段执行后,变量a、b的值分别是(  )
a=5
b=3
If a>b Then

a=b

End If
A.3、3B.3、5C.5、3D.5、5
当前题号:6 | 题型:选择题 | 难度:0.99
有如下Visual Basic程序段:
a=2
b=4
c=3
m=a
If b>a Then m=b
If c>m Then m=c
该程序段运行后,变量m的值是
A.2B.3C.4D.5
当前题号:7 | 题型:选择题 | 难度:0.99
有如下VB程序段:
Dim x As String,y As String
Dim ans As Integer
x=“5”:y=“20”:ans = 0
If x>y Then ans = Val(x) Else ans = Val(y)
Ans = ans + Val(x+y) 
Text1.Text = Str(ans)
程序运行完后,文本框Text1中显示的是:(  )
A.25B.30C.540D.525
当前题号:8 | 题型:选择题 | 难度:0.99
在VB中,可用来实现选择结构的语句是(  )
A.If…ThenB.For… NextC.EndD.Print
当前题号:9 | 题型:选择题 | 难度:0.99
(2018秋•温州期末)某算法的部分流程图如图所示,执行该流程后,输出i,k的值分别是(  )
A.102,9B.100,8C.102,8D.100,9
当前题号:10 | 题型:选择题 | 难度:0.99