刷题首页
题库
高中信息
题干
小明编写了如下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中,定义一个存储身份证号码(如“33071919801201088X”)的变量,则下列说明语句正确的是( )
A.Dim myID As String
B.Dim 3307_ID As String
C.Const myID As Single
D.Dim 3307_ID As Single
同类题2
读下面VB程序段,
Dim j As Integer, k As Integer
List Clear
For k =" 1" To 100
j = Int(Sqr(k))
If j * j =" k" Then list1.AddItem Str(k)
Next k
分析程序功能,该程序的功能是( )
A.输出1到100以内的所有的质数
B.输出1到100以内的所有的奇数
C.输出1到100以内的所有的偶数
D.输出1到100以内所有的完全平方数
同类题3
在VB中,已知a=3,b=5,运行下列程序段后,a和b的值为( )
a = a * b
b = a / b
a = a / b
A.a=3 b=5
B.a=15 b=3
C.a=5 b=5
D.a=5 b=3
同类题4
将文本框 Text1 内输入的数据送到字符型变量 n 中,则应使用的语句是( )
A.n=Text1
B.n=Text1.Text
C.n=Val(Text1.name)
D.n=Val(Text1.Text)
同类题5
执行VB语句s=Mid("abcdefgh",2,3)+chr(66)后,变量s的值为( )
A."cdB"
B."bcd65"
C."cdA"
D."bcdB"
相关知识点
算法理论
面向对象程序设计 VB开发工具
赋值语句