下列语句合法的是(    )
A.Const math As string =150
B.Const finished As Boolean=Ture
C.Const m As Integer=40000
D.Const cost As Single=325.90
当前题号:1 | 题型:选择题 | 难度:0.99
下面的程序代码是通过函数求出二个整数型变量a、b中的较大值,其中所定义的函数名是(   )
Function max(a, b As Integer) As Integer
If a > b Then max = a  Else  max = b
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer, s as integer
a =" Val(Text1.Text):" b = Val(Text2.Text)
s =" max(a," b)
Text3.Text = s
End Sub
A.Command1_Click
B.function
C.max
D.max(a, b As Integer)
当前题号:2 | 题型:选择题 | 难度:0.99
下列给出的赋值语句中正确的是( )
A.B.C.D.
当前题号:3 | 题型:选择题 | 难度:0.99
将文本框Text1中的数据赋值到数值型变量n中,正确的语句是( )
A.n=Text1B.n=Text1.TextC.n=str(Text1.Text)D.n=val(Text1.Text)
当前题号:4 | 题型:选择题 | 难度:0.99
在VB的代码窗口中,语句TopSchool.Text=”PKU”中的Text是(  )
A.对象名B.属性值C.属性名D.类名
当前题号:5 | 题型:选择题 | 难度:0.99
在Visual Basic中,定义一个存储身份证号码(如“33071919801201088X”)的变量,则下列说明语句正确的是(   )
A.Dim myID As StringB.Dim 3307_ID As String
C.Const myID As SingleD.Dim 3307_ID As Single
当前题号:6 | 题型:选择题 | 难度:0.99
写出下列程序的输出结果
Private Sub Command1_Click()
Dim a As String
Dim c As String
a = "zhejiangxiaoshi"
c =" Mid(a," Len(a) \ 2 + 2, 7)
Text1.Text = c
End Sub
该程序段运行后,在文本框Text1上显示的是( )
A."xiaoshi"B."zhejiang"C.zhejiangD.xiaoshi
当前题号:7 | 题型:选择题 | 难度:0.99
PASCAL中,显示字符“ABCD”的语句是:Write(ABCD)。
当前题号:8 | 题型:判断题 | 难度:0.99
如第20题图所示的流程图片段:该流程图执行过后,a、b、c的值分别为:(   )
A.a=21,b=9,c=13B.a=5,b=8,c=13
C.a="5,b=9,c=14" D.a=21,b=9,c=14
当前题号:9 | 题型:选择题 | 难度:0.99
求[0,100]之间所有偶数之和s的算法流程图如图所示。

为了实现此算法,图中判断框①和处理框②处可填入的是(  )
A.① x ≤ 100? ② x←x+2B.① x ≤ 100? ② x←x+1
C.① x ≥ 100? ② x←x+2D.① x ≥ 100? ② x←x+1
当前题号:10 | 题型:选择题 | 难度:0.99