- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- + 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
若a = 8,b = 5,则运行Print a; "-"; b; "="; a - b的结果是( )。
A.a -b = 3 | B.8 - 5 = 3 |
C.a - b =" a" – b | D.3 |
下列各赋值语句,语法不正确的是( )。
A.x+y=5 | B.number=15 |
C.Label1.caption=time | D.length=x+y |
公元6世纪,中国的《张丘建算经》有一道著名的百鸡问题:公鸡5钱1只,母鸡3钱1只,小鸡3只1钱,有人用100钱买了100只鸡。请编写一段代码求其中公鸡,母鸡,小鸡各多少只?
Private Sub Command1_Click()
For i =" 0" To 20
For j =" 0" To 33
k =
If Then Print i, j, k
Next j
Next i
End Sub
Private Sub Command1_Click()
For i =" 0" To 20
For j =" 0" To 33
k =
If Then Print i, j, k
Next j
Next i
End Sub
有如下Visual Basic程序段:
x=2.1Ifx>6.0Then
Label1.Caption="Pass"
Else
Label1.Caption="Fail"
EndIf
该程序段运行后,Label1标签上显示为_____________
x=2.1Ifx>6.0Then
Label1.Caption="Pass"
Else
Label1.Caption="Fail"
EndIf
该程序段运行后,Label1标签上显示为_____________
个位数字是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
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
以下语句中错误的是( )
A.Const var1=123 |
B.Dim var2 As String |
C.x+y=9 |
D.Dim d(1 to 500) As Double |
想设计一个判断某年是否是闰年的VB程序。通过查询资料得知:如果年份能被100整除同时也能被400整除,则该年是闰年;如果年份不能被100整除但能被4整除,则该年也是闰年。“判断某年是否为闰年”的算法流程图如下图所示(k=True表示该年是闰年,k=False表示该年不是闰年)。请回答下列问题:

(1)流程图粗线框部分的内容是
(2)实现流程图虚线框部分的VB语句是

(1)流程图粗线框部分的内容是
(2)实现流程图虚线框部分的VB语句是