下面程序执行的结果是( )

Private Sub Commandl click ( )

Dim z as integer

x="2017"

y="06"

z=Val(x+y)

Print z

End Sub

A.errorB.62017C.2023D.201706
当前题号:1 | 题型:选择题 | 难度:0.99
小王和小李用VB分别编制了成绩统计程序。但在统计本班成绩时,发现小王编制的程序比小李编制的程序运行速度快,则小李编制的程序中可能存在的问题是
A.编写的代码有错误
B.界面设计的不美观
C.设计的算法不合理
D.使用的控件不合理
当前题号:2 | 题型:选择题 | 难度:0.99
某算法的部分流程图如图所示,执行这部分流程后,变量 a,b 的值分别是(    )
A.3,3
B.3,4
C.6,6
D.7,11
当前题号:3 | 题型:选择题 | 难度:0.99
有如下Visual Basic程序:
Private Sub Command1_Click()
Dim sum As  Double, x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next i
End Sub
该程序计算了一个表达式的值,这个表达式是
A.1/2+2/3+3/4+4/5B.1+1/2+2/3+3/4
C.1+1/2+2/3+3/4+4/5D.1+1/2+1/3+1/4+1/5
当前题号:4 | 题型:选择题 | 难度:0.99
编写VB程序,实现如下功能:在文本框Text1中输入一个十进制整数,单击命令按钮Command1,在标签Label2上显示转换成十六进制数的结果,运行效果如图所示。

(1)在设计程序界面时,要使按钮Command1上的文字显示为“转化成十六进制”,应修改按钮Command1的_____________________属性。
(2)为实现上述功能,请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim y As Integer, r As Integer
Dim s As String, t As String
t = "0123456789ABCDEF"
s = ""
y = _________
Do While  y>0
r = y Mod 16
s = __________
y = _________
Loop
Label2.Caption = Text1.Text + "转化成十六进制数为:" + str(s)
End Sub
当前题号:5 | 题型:填空题 | 难度:0.99
有如下VB程序段:
x=1 : a=x : b=x+1
x=x+1 : c=x : d=x+1

该程序段运行后,下列说法正确的是

A.a与b的值相同,c与d的值相同B.a与b的值相同,c与d的值不同
C.a与b的值不同,c与d的值相同D.a与b的值不同,c与d的值不同
当前题号:6 | 题型:选择题 | 难度:0.99
在Visual Basic中,下列能作为变量名的是___ 。
A.x+5B.b@7C.2aD.miss1
当前题号:7 | 题型:选择题 | 难度:0.99
在Visual Basic中,赋值语句xm="John"中的"John"是___ 。
A.字符串常量B.数值常量
C.逻辑常量D.实数常量
当前题号:8 | 题型:选择题 | 难度:0.99
在Visual Basic中,语句Text1.Text="QQ2012"中的Text1是(    )
A.属性名B.属性值C.对象名D.窗体名
当前题号:9 | 题型:选择题 | 难度:0.99
在Visual Basic中,要定义一个一维数组a,用于存储15名铅球运动员的成绩数据(以米为单位,精确到0.01米),则正确的数组定义语句是___ 。
A.Dim a(1,15) As IntegerB.Dim a(1,15) As Single
C.Dim a(1 To 15) As SingleD.Dim a(1 To 15) As Integer
当前题号:10 | 题型:选择题 | 难度:0.99