刷题宝
  • 刷题首页
题库 高中信息

题干

个位数字是6,且能被3整除的3位数共有多少个?下面程序用于解决这一问题,在划线处填入合适的语句或表达式,设共有n个这样的数,Visual Basic程序如下:
Sub Command1_Click()
Dim i As Integer, n As Integer
m = 106
n = __________
Do While m <= 996
If _______________________ Then n =" n" + 1
m=m+10
Loop
Text1.Text = Str(n) zxxk
End Sub
上一题 下一题 0.99难度 填空题 更新时间:2015-12-11 04:35:11

答案(点此获取答案解析)

同类题1

有如下VB程序段:
Dim a(1 To 10) As Integer, i As Integer, j As Integer
a(1) = 1: a(2) = 1
For i = 3 To 5
a(i) = 1
For j = i - 1 To 2 Step -1
a(j) = a(j) + a(j - 1)
Next j
Next i
Text1.Text = Str(a(3))
该程序段运行后,在文本框Text1中显示的内容是
A.1B.3C.4D.6

同类题2

单精度型数据的有效位最多_________位,双精度型数据的有效位最多____________位.

同类题3

定义局部静态变量,使用( )关键字。
A.DimB.PublicC.PrivateD.Static

同类题4

下列可作为VB变量名的是(   )
A.abl-scoreB.p_64C.StrD.12TS

同类题5

某VB程序的一个事件过程如下:
Private sub command1_click( )
Dim i as integer
Dim a(1 to 8 ) as integer
List1.clear
For i="1" to 99
a(i)=i+1
Next i
For i="1" to 8
list1.AddItem   str(a(i))
Next i
End sub
程序运行时,单击命令按钮command1后,将会出现的提示信息是 ( )
A.溢出B.下标越界
C.类型不匹配D.无效的过程调用或参数
相关知识点
  • 算法理论
  • 面向对象程序设计 VB开发工具
  • 常量、变量、数组
  • 基本运算及表达式
  • 赋值语句
  • 循环语句
刷题宝 没有分数是刷题提高不了的! 粤ICP备12066032号

本站仅为免费收集试题提供给学生刷题,不做任何盈利性活动!如无意侵犯您的合法权益,联系站长删除处理(QQ:2572127418)