- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- + 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
小强想编写一个能够完成交换变量a和b值的小程序，该程序对应的算法流程图如下图所示：
该流程图粗线框部分1所在的位置应填写的内容是 。（2分）
该流程图粗线框部分1所在的位置应填写的内容是 。（2分）
为使左、右框内的Visual Basic程序段能实现相同的功能：
右框内划线处的内容可以是( )
右框内划线处的内容可以是( )
| A．s<9 | B．s<=9 | C．t<9 | D．t<=9 |
有如下Visual Basic程序段：
Dim i As Integer, s As Integer
i=1
s=0
Do While i <= 5
s ="s" + 2
i ="i" + 1
Loop
问：该程序段运行后，变量s的值为____ __，i的值为 。（每空2分）
Dim i As Integer, s As Integer
i=1
s=0
Do While i <= 5
s ="s" + 2
i ="i" + 1
Loop
问：该程序段运行后，变量s的值为____ __，i的值为 。（每空2分）
在窗体上有一个命令按钮（Command1）和两个文本框（Text1和Text2），然后编写了如下事件过程，要求：在文本框Text1中输入一个数值x，根据下面的分段函数计算y的结果，并将y值显示在文本框Text2中。
请将实线以上功能的程序补充完整(（每空2分）：
Private Sub Command1_Click( )
x=" Val" (Text1.text)
If x>0 Then
1
ElseIf 2 Then
y = 0
ElseIf x < 0 Then[]
y = Abs(x)
End If
3
End Sub
请将实线以上功能的程序补充完整(（每空2分）：
Private Sub Command1_Click( )
x=" Val" (Text1.text)
If x>0 Then
1
ElseIf 2 Then
y = 0
ElseIf x < 0 Then[]
y = Abs(x)
End If
3
End Sub
某算法的流程图如下所示：
（1）该流程图的结构为 （顺序结构/选择结构/循环结构）；
其中的流程符号
是 （开始结构框/输入输出框/判断框/处理框）（2）当输入a和b的值分别为3、6时，该算法的输出结果为
For i =" 1" To___1___step 2
s = ""
For j =" 1" To i step 1
s =" s+Str(i)"
Next j
List1.AddItem s
Next i
该程序的运行后列表框输出的第3行是（ ）
s = ""
For j =" 1" To i step 1
s =" s+Str(i)"
Next j
List1.AddItem s
Next i
该程序的运行后列表框输出的第3行是（ ）
| A．33333 | B．55555 | C．12345 | D．54321 |
某同学要制作一个计算商品团购优惠的VB小程序。请回答以下问题：
该同学绘制了该程序的流程图，如下图所示：
当n为100、p为10时，实付金额s的值是（ ）
该同学绘制了该程序的流程图，如下图所示：
当n为100、p为10时，实付金额s的值是（ ）
| A．1000元 | B．950元 | C．850 | D．750元 |
