关于计算机的指令、程序和软件，以下表述错误的是( )

A．为解决某问题组织起来的有序的指令集合称为程序

B．计算机软件包括程序和与该程序相关的文档资料

C．给计算机发出一条指令就是运行一个程序

D．计算机指令由操作码和操作数两部分组成

下列关于ASP的叙述，正确的是：（    ）

A．ASP程序需要编译，ASP程序的控制部分用JavaScript等脚本语言来设计

B．ASP程序是以扩展名为“.asp”的纯文本形式存储于服务器上，服务器无需设置，就可通过WWW方式访问该程序

C．一些具有交互功能的网站可以用服务器端的动态网页制作技术来实现，如ASP编程技术

D．在客户端访问ASP程序，可以看到ASP的源代码

将学生的考试成绩表存放到数据库中时，某位同学所有学科的成绩构成一条（   ）

A．数据

B．信息

C．记录

D．行

下列多媒体创作工具中，属于以程序设计语言为基础的是（ ）

A．Authorware IconAuthor	B．Director Flash
C．PowerPoint Action	D．Visual C++ Visual Basic

某学校开设多样化选修课程，学生可以根据个人兴趣和特长选择选修课。假设每门选修课的选课人数不超过40，学生选课的相关信息存放在数据库文件“student.accdb”的data表中，选课查询程序运行时界面如图所示。
程序功能：在文本框Text1中输入课程号，单击“查询”按钮Command1,在列表框List1中显示选修本课程的名学生信息。如果没有找到，在列表框中显示“该课程当前无人报名”。按此要求将程序补充完整。

Private Sub command1_click()
Dim xh(1 to 40),xm(1 to 40) As String   '学号和姓名的数组
Dim i,num as integer
Dim conn As New ADODB.Connection, rs As New ADODB.Recordset
Dim strSQL As String
conn.ConnectionString = "Provider="Microsoft.ACE.OLEDB.12.0;Data" Source=" + App.Path + "\student.accdb" '打开到数据库的链接
conn.Open
strSQL ="select xh,xm from data where '课程=&(Text1.Text) & '" '设置查询的SQL语句
Set rs.ActiveConnection = conn '设置rs的ActiveConnection属性，指定与其关联的数据库链接
rs.Open strSQL   '打开记录集，将从表student中读取的结果集保存到记录集rs中
List1.Clear
num=0
Do while not rs.EOF
①
xh(num)=rs.Fields("xh")
xm(num)=rs.Fields("xm")
rs.MoveNext
loop
rs.Close
conn.close
set rs=nothing
set conn=nothing
For  i="1" to num
②
Next i
if num="0" then list1.additem("该课程当前无人报名")
End Sub
（1）程序中①划线处应填入___________________。
（2）程序中②划线处应填入___________________。

在日常生活中，我们常常会碰到各种各样的问题，以下描述中最适合我们用计算机编程方法来处理的是（ ）。

A．去新华书店买书

B．计算某个同学期中考试各科成绩总分

C．计算10000以内的奇数平方和

D．在因特网上查找自己喜欢的歌曲

（加试题）小王编写了一个实现文字查找替换功能的VB程序，运行界面如图所示。文本框Text1显示原文内容，Text2中输入查找内容，Text3中输入替换内容，单击“全部替换”按钮Command1后，Text4显示查找替换的结果，Text5中显示替换的次数，Text6显示“查找内容”在原文中的起始位置。

实现上述功能的VB程序如下，但加框处代码有错，请改正。
Private Sub Command1_Click()
Dim s As String, resule As String, pos As String
Dim count As Integer, i As Integer
i = 1: count = 0
resule = "": pos = ""
Do While i <= Len(Text1.Text)
s = Mid(Text1.Text, i, Len(Text2.Text))
If s = Text2.Text Then
result = result + Text3.Text
count = count + 1
pos =  pos + Str(count) 
i = i + Len(Text2.Text)
Else
result = result + Text2.Text
i = i + 1
End If   
Loop
Text4.Text = result
Text5.Text = Str(count)
Text6.Text = pos
End Sub

（加试题）小赵对选择排序算法进行了如下改进：在数组的所有元素中找出最小和最大数据的元素，然后将这两个元素分别与第一个和最后一个元素交换数据，在余下的元素中找出最小和最大数据的元素，分别与第二个和倒数第二个元素交换数据，以此类推，直到所有元素的数据按升序排列。小赵编写的VB程序段如下：
p =" 1:" q = 10
Do While p < q
iMin =" p:" iMax = p
For i =" p" + 1 To q
If a(i) < a(iMin) Then iMin = i
If a(i) > a(iMax) Then iMax = i
Next i
t =" a(iMin):" a(iMin) =" a(p):" a(p) = t
①
①
t =" a(iMax):" a(iMax) =" a(q):" a(q) = t
p =" p" + 1
q =" q" - 1
Loop
要使程序实现上述算法思想，则方框中的语句是

A．If iMax =" p" Then iMax = iMin	B．If iMin =" p" Then iMin = iMax
C．If iMax =" p" Then iMin = iMax	D．If iMin =" p" Then iMax = iMin

奇偶校验是一种校验数据传输正确性的方法。其中奇校验方法：统计二进制数据的数位中“1”的个数，若个数为奇数，则校验位值为0，否则校验位值为1。小李编写了一个计算奇校验位值得VB程序，功能如下：在文本框Text1中输入1～255十进制待校验数，单击“计算”按钮Command1后，在文本框Text2中显示该数对应的二进制值，并在标签Label3中显示该数的校验位值。程序运行界面如图所示。
（1）在设计程序界面时，要清空文本框中的显示内容，应修改该文本框中的_______属性。
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。

Private Sub Command1_Click()
Dim a As Integer, s As String
Dim n As Integer, t As Integer, v As Integer
n = Val(Text1.Text)
t = 0
s = ""
Do While n > 0
a = n Mod 2
n = n \ 2
t = ___________ 
s = Str(a) + s
Loop
v = t Mod 2
Text2.Text = s
Label3.Caption = "校验位值：" + ___________ 
End Sub
（3）运行该程序，在文本框Text1中输入22，单击“计算”按钮，则显示的校验位值是_____。

统计数字子串之和。用VB编写程序，在文本框Text1中输入任意字符串s，统计s中数字字符串的数值和（如输入字符串“ab123dr34fg9de”，则输出 166，即 123+34+9＝166），并在Label3输出结果。程序设计界面如下：

Private Sub Command1_Click()
Dim s As String, ch As String
Dim ch2 As String, sum As Double
Dim n As Integer, i As Integer
s = Text1.Text
①________
i =" 1:" sum = 0
Do While i <= n
ch =" Mid(s," i, 1)
If ch >= "0" And ch <= "9" Then
②________
ch2 =" Mid(s," j, 1)
Do While ch2 >= "0" And ch2 <= "9"
j =" j" + 1
ch2 =" Mid(s," j, 1)
Loop
sum =" sum" + ③________
i = j
End If
i =" i" + 1
Loop
Label3.Caption = Str(sum)
End Sub