- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- + 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
如果x=4，那么以下运算结果为True的表达式是（ ）
| A．(x<=4)and(x>=6) |
| B．(x>4)Or(x>=6) |
| C．(x>="4)and" not(x>=6) |
| D．not(x=4) |
VB标准函数Rnd的作用是返回一个大于等于0且小于1的随机实数，若要“生成一个大于等于10且小于100的随机整数”的VB表达式是( )
| A．Int(Rnd()*100) |
| B．Int(Rnd()*99+1) |
| C．Int(Rnd()*99+10) |
| D．Int(Rnd()*90)+10 |
在Visual Basic中，若a=4，b=3，c=10，则执行完下列语句后，变量c的值为( )
If a+b>c Then
c=a+1
Else
c=b-1
End If
If a+b>c Then
c=a+1
Else
c=b-1
End If
| A．2 | B．10 | C．5 | D．4 |
运行如下Visual Basic程序，单击命令按钮Command1，出现如图所示的出错信息。发生“类型不匹配”错误时所执行的语句是（ ）
Private Sub Command1_Click()
Dim a As String, b As String, c As Integer
a = "Good" '①
b = "bye" '②
c =__________1__________'③
Text1.Text =" a" + b + c '④
End Sub
Private Sub Command1_Click()
Dim a As String, b As String, c As Integer
a = "Good" '①
b = "bye" '②
c =__________1__________'③
Text1.Text =" a" + b + c '④
End Sub
| A．① | B．② | C．③ | D．④ |
下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是 ，文本框Text2中显示的内容是 。
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0"
n=10
for i =" 2" to 10 step 3[:Zxxk.Com]
If n Mod i =" 0" Then
c = c+i
else
c=" c" * i
end if
next i
Text1.Text = Str(i)
Text2.Text = Str(c)
End Sub
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0"
n=10
for i =" 2" to 10 step 3[:Zxxk.Com]
If n Mod i =" 0" Then
c = c+i
else
c=" c" * i
end if
next i
Text1.Text = Str(i)
Text2.Text = Str(c)
End Sub
有如下Visual Basic程序段：
s=1
for i=" 1" to 11 step 3
s=s*i
next i
语句s=s*i共执行的次数为（ ）
s=1
for i=" 1" to 11 step 3
s=s*i
next i
语句s=s*i共执行的次数为（ ）
| A．11 | B．10 | C．5 | D．4 |
执行VB语句s=Mid("abcdefgh",2,3)+chr(66)后，变量s的值为( )
| A．"cdB" | B．"bcd65" | C．"cdA" | D．"bcdB" |
为了给x,y,z三个变量赋初值1，下面正确的赋值语句是( )
| A．xyz=1 | B．x=1,y=1,z=1 | C．x=y=z=1 | D．x=1∶y=1∶z=1 |
