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

题干

个位数字是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 = _____________    

Loop

Text1.Text = Str(n)

End Sub

上一题 下一题 0.99难度 填空题 更新时间:2019-07-10 02:52:45

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

同类题1

变量a中存储了一个字符,能够正确判断该字符为数字字符“0”-“9”的VB表达式是(   )
A.Asc(a)>="0" Or Asc(a)<=9
B.“0”<=a<=”9”
C.a<="”0”" Or a>=”9”
D.a>="”0”" and a<=”9”

同类题2

在VB中,表示代数式的表达式是
A.2*a+4*b^2/a+bB.2*a+4*b^2/(a+b)
C.(2*a+4*b^2)/a+bD.(2*a+4*b^2)/(a十b)

同类题3

对下列程序段的说法正确的是(   )
Private sub Command1_Click()
Dim s, i As Integer
s=0
i=1
For i="1" to 4  step 2
s=s+i^2
Next i
Print "s=";S
End Sub
A.该程序段执行后s的值为10
B.该程序段执行后s的值为30
C.该程序段执行后i的值为4
D.该程序段执行的结果为s=10

同类题4

VB表达式  len(mid(“happy new year 2016!”,6,4)的计算结果(   )
A.4B.5C.6D.10

同类题5

表达式6.8*9 Mod 28\8的值是(   )。
A.0B.1C.2D.3
相关知识点
  • 算法理论
  • 面向对象程序设计 VB开发工具
  • 基本运算及表达式
  • 循环语句
刷题宝 没有分数是刷题提高不了的! 粤ICP备12066032号

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