刷题首页
题库
高中信息
题干
小明编写了如下VB程序段:
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
x = Val(Text1.Text)
y = Abs(x)
x = int(y)
Text2.Text = Str(x)
End Sub
此应用程序执行后,出现了如第15题图所示的错误信息,请问产生此错误的原因是( )
A.语句y = Abs(x)有误
B.缺少对象‘424’
C.语句x = int(y)有误
D.缺少文本框Text1或文本框Text2
上一题
下一题
0.99难度 选择题 更新时间:2015-11-18 02:14:01
答案(点此获取答案解析)
同类题1
在Visual Basic中,若要将100名学生家长的联系方式(如:0575-82291000)分别存储在数组Tel中,则下列说明语句最合适的是( )
A.Dim Tel(1,100) As Long
B.Dim Tel(1,100) As String
C.Dim Tel(1 To 100) As Long
D.Dim Tel(1 To 100) As String
同类题2
NOT ((7>3) OR (5<2)) AND (6>1) 的值和下列哪个表达式的值是相等的_____。
A.6>1 AND 7>3
B.5<2 AND 6>1
C.7>3 or 5<2
D.5<2 OR 6>1
同类题3
交换LABEL2和LABEL3中的数据
PRIVATE SUB FORM
CLICK( )
LABEL2.CAPTION=90 : LABEL3.CAPTION=86
C=LABEL2.CAPTION
________
________
END SUB
同类题4
Sub test12()
S=0
Do While c <=5
C ="C" + 1
S=S+C
Loop
MsgBox (STRC、 + STR(S))
End Sub
该程序的运行结果是( )
A.5 15
B.6 15
C.5 21
D.6 21
同类题5
由“For k="35" To 0 Step 3 : Next k ”循环语句控制的循环次数是_______。
A.12
B.0
C.-10
D.-11
相关知识点
算法理论
面向对象程序设计 VB开发工具
赋值语句