- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 程序设计语言
- + 循环结构
- 分支结构
- 顺序结构
- 类、对象、属性、方法、事件和事件处理的概念
- VB应用程序的界面设计与调试
- 基本数据类型
- 常量、变量、数组
- 常用的标准函数
- 基本运算及表达式
- 赋值语句
- 选择语句
- 循环语句
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
以下流程图的运行结果为______
| A．2 4 6 8 10 12 | B．2 4 8 16 32 | C．2 4 8 16 | D．2 4 8 16 32 64 |
使用 VB 编写一个数字逆序功能的程序，在文本框 Text1 中输入若干整数，相互之间用逗号隔开，单击“开始逆序”按钮，在文本框 Text2 中输出逆序后的数字序列。程序运行界面如图所示，请改正划线处的错误语句使程序能正确运行。
Private sub Command1_click()
Dim s1 As String, s2 As String, t As String, ch As String
Dim i As Integer
s1 = Text1.Text
i = Len(s1)
t = "": s2 = "" Do While i > 0
ch = Mid(s1, i, 1)
If ch >= "0" And ch <= "9" Then
t = ch + t
Else
s2 = s2 + t +， 改正
________
t = "" End If
i = i + 1 改正
________
Loop
s2 = s2 + t
Text2.Text = s2
End sub
Private sub Command1_click()
Dim s1 As String, s2 As String, t As String, ch As String
Dim i As Integer
s1 = Text1.Text
i = Len(s1)
t = "": s2 = "" Do While i > 0
ch = Mid(s1, i, 1)
If ch >= "0" And ch <= "9" Then
t = ch + t
Else
s2 = s2 + t +， 改正
________t = "" End If
i = i + 1 改正
________Loop
s2 = s2 + t
Text2.Text = s2
End sub
小王编写了一个进制转换程序，实现如下功能：在文本框 Text1 中输入一个二进制数，单击 “计算”按钮 Command1，在文本框 Text2 中将显示出其对应的十六进制数。程序运行界面如下图所示：
（1）要使程序启动时，自动清空文本框的 Text1 中的内容，则可以在______（单选，填字母：
（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码
Private Sub Command1_Click（）
Dim s As String, s1 As String, t As Integer, c As Integer Const code = "0123456789ABCDEF"
s = Text1.Text
t = 0: s1 = ""
For i = Len(s) To 1 Step -1
c = Val(Mid(s, i, 1))
t = t + c * 2 ^ ((Len(s) - i) Mod 4)
If (Len(s) - i + 1) Mod 4 = 0 Or ①_______________Then
______________②
t = 0
End If
Next i
Text2.Text = s1
End sub
（3）如果没有第①处划线部分的条件，当输入的二进制数为 1101011，则 Text2 中显示的内容为________。
（1）要使程序启动时，自动清空文本框的 Text1 中的内容，则可以在______（单选，填字母：
| A．Command1_click / | B．Text1_click / | C．Form_load）事件处理过程中添加语句 Text1.Text= "" |
Private Sub Command1_Click（）
Dim s As String, s1 As String, t As Integer, c As Integer Const code = "0123456789ABCDEF"
s = Text1.Text
t = 0: s1 = ""
For i = Len(s) To 1 Step -1
c = Val(Mid(s, i, 1))
t = t + c * 2 ^ ((Len(s) - i) Mod 4)
If (Len(s) - i + 1) Mod 4 = 0 Or ①_______________Then
______________②
t = 0
End If
Next i
Text2.Text = s1
End sub
（3）如果没有第①处划线部分的条件，当输入的二进制数为 1101011，则 Text2 中显示的内容为________。
某算法流程图如下图所示，图框①②③中应填入的内容分别是
(1)输出 m = ①
(2) 输入 x=4，则输出 x = ②
(3) 执行完该流程图，s 的值为 ③
(1)输出 m = ①
(2) 输入 x=4，则输出 x = ②
(3) 执行完该流程图，s 的值为 ③
期末将近，英语老师需要统计每个同学的四次月考的英语平均分，以便假期有针对性复习。某同学编写一个VB程序来完成这项工作。
【小题2】程序中②位置的语句是( )。
【小题3】上面这段程序的主要结构是( )。
【小题4】对某个变量进行处小数处理，即保留两位小数，对第三位小数进行四舍五入。其语句为：A=int(A*X+0.5)/X，则X=( )。
【小题5】Visual Basic代码中，将多个语句合并在一行上的并行符是( )。
【小题6】下列关于算法的特征描述不正确的是( )。
【小题7】函数Abs(-9)返回的值是( )。
【小题8】下面能够将字符型数值转换成数值型数值的函数名是( )。
【小题9】上段程序中，变量n的类型为( )。
【小题10】流程图中表示判断的符号是( )。
【小题11】Visual Basic中下面为合法变量的是( )。
【小题12】上段程序中，变量Sum最终结果是四次月考英语成绩的( )。
【小题13】上段程序中，变量N的最后一个值是( )。
【小题14】程序设计时，算法的描述方法有多种，下列选项中不能描述算法的是( )。
【小题15】设置窗体标题时，应改变窗体的( )。
Private Sub Command1_Click()
Dim Sum as Single,n as Integer,ave as Single
Sum=0N=1
DoT=InputBox(“请输入第”+str$(n)+”次英语成绩:”)
Sum= ①N=N+1
Loop Until ②
Ave=Sum/4
Print “四次英语的平均成绩是”;Ave
End Sub
【小题1】程序中①位置的语句是( )。| A．Sum+1 | B．Sum+T | C．Sum+N | D．N+T |
| A．N>=4 | B．T>=4 | C．Sum>=4 | D．Ave>=4 |
| A．顺序 | B．分支 | C．循环 | D．综合 |
| A．10 | B．20 | C．100 | D．200 |
| A．, | B．; | C．: | D．’ |
| A．有穷性：算法必须在有限步之内结束 |
| B．确定性：算法的每一步必须有确切的含义 |
| C．输入：算法必须至少有一个输入 |
| D．输出：算法必须至少有一个输出 |
| A．9 | B．-9 | C．10 | D．-10 |
| A．Int | B．Sqr | C．Val | D．Str |
| A．单精度 | B．整型 | C．长整型 | D．双精度 |
A． | B． | C． | D． |
| A．$$ | B．a2 | C．2a | D．a*2 |
| A．总和 | B．平均分 | C．最高分 | D．最低分 |
| A．3 | B．4 | C．5 | D．6 |
| A．流程图 | B．伪代码 | C．机器语言 | D．自然语言 |
| A．Name属性 | B．Caption属性 | C．BackColor属性 | D．Font属性 |
某算法的部分流程图如图所示，执行这部分流程后，变量a、b、c的值分别是( )
| A．3 6 9 | B．4 6 9 | C．3 24 33 | D．4 24 33 |