学进去

为制作“预防新冠病毒感染”的电子海报，小明收集了相关的文字和图片。这个阶段属于信息集成一般过程中的（     ）

A．选题立意

B．设计规划

C．开发制作

D．评估测试

SELECT 语句从学生表中选择前10%的记录，下列语句正确的是（       ）

A．SELECT TOP 10 PERCENT*FROM 生表	B．SELECT TOP 10%* FROM 学生表
C．SELECT TOP 10* FROM   学生表	D．SELECT TOP 10 FROM   学生表

现需要对某企业大型招聘活动面试成绩进行排名，面试数据包含专业编号（整数，顺序编号）、专业名称、姓名（字母编写）和面试分。整理面试数据的要求是：先按专业编号从小到大排列，然后，同专业的面试者按面试成绩从大到小排列（同分同名次）。按上述要求，编写一个VB程序，功能如下：在列表Listi1中显示整理前的数据，单击“整理”按钮Command1，整理结果显示在列表框List2中，程序运行界面如图所示。

（1）n个元素两两比较大小确定其位次，需要比较的次数是____________________
（2）请在划线处填入合适的代码。
Const n= 200 '报名人数
Const nz=10 '专业数
Dim zybh(1 To n)As Integer,zyname(1 Ton)As String,sname(1 To n)As String,
zymark(1 To n)As Integer
Dim b(1 To nz)As Integer '存储每个专业的人数
Dim c(1 To nz)As Integer
Dim d(1 To n)As Integer
Dim q(1 To n)As Integer
Private Sub Form_Load()
'本过程读取专业编号、专业名称、姓名和面试分的数据分别存储在数组zybh,zyname,sname,zymark中,并在List1中显示,代码略
End Sub
Private Sub Command1_Click()
       Dim i As Integer, j As Integer, k As Integer, t As Integer, pos As Integer
       For i =1 To nz
          b(i) =0
       Next i
       For i =1 To n
          d(i) =0:q(i)=0
       Next i
       For i =1To n
             k=zybh(i)
          b(k)=b(k)+1
       Next i
       k=1
       For i =1 To nz
          c(i)=k
     ①________
       Next i
       For i=1 To n-1
          For j=i+1 To n
             If zybh(i)=zybh(j)And zymark(i)<> zymark(j)Then
                 If②______Then
                    d(j) =d(j) +1
                 Else
                    d(i) =d(i) +1
                 End If
             End If
          Next j
       Next i
       For i=1 To n
             j=0
             Do While③_________
                    j=j+1
          Loop
          q(c(zybh(i))+d(i) +j) =i
       Next i
       For i = 1 To n
          List2. Addltem ""& zybh(q(i)) & ""& zyname(q(i)) &.""& sname(q(i)) &"" & zymark(q(i)) & " " & d(q(i)+1
       Next i
End Sub

某网站注册密码需要符合以下两点条件：①密码不少于4位字符组成；②必须同时包含4种字符，大写字母“A-Z”，小写字母“a-2”，数字“0-9”，特殊符号“！@#$%^&*”，方了方便批量注册，小迪同学编写了自动生成密码的VB程序，程序运行界面如图a所示，当在文本框Text1中输入需生成密码长度，点击“生成密码”按钮（Command1），在文本框Text2中输出符合要求的密码串。

（1）下列对象不具有Caption属性的是______________________（单选，填字母：A. Command1 /B. Form1/C. Text1 /D. Label1）
（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
①_____________________
②_____________________
（3）程序代码中的加框处代码有误，请改正。
改正：___________________________
Private Sub Command1_Click()
Dim a(0 To 4)As Integer,b(1 To 4)As Integer
Dim key As String,s As String,n As Integer,k As Integer,i As Integer,j As Integer,
sum As Integer
key="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789!@#$%^&*"
Randomize
n=Val(Text1. Text)
a(0)=0:a(1)=26:a(2)=52:a(3)=62:a(4) =70 '记录每种符号的结束位置
s=""
For i =1 To 4
       b(i)=0                           'b数组记录某类符号是否使用
Next i
sum=4                                      '当前未使用字符类型,初始为4种
Do While Len(s)+sum<n
       k=①          '随机选择一个密码序号
       s=s+Mid(key,k,1)
       i=1
       Do While k>=a(i)
          i=i+1
       Loop
       b(i)=1
       sum =4-b(1)-b(2)-b(3)-b(4)
Loop
'生成剩余未出现元素密码,保证4种符号均有出现
For i =1 To sum
       j=Int(Rnd*4)+1
       Do While(②       )
          j=j Mod 4+1
       Loop
       b(j)=1
       k=Int(Rnd*(a(j)-a(j-1)))+a(j-1)+1
       s=s+ Mid(key,k,1)
Next i
Text2. Text =s
End Sub
（4）如果文本框Text1中输入值2，文本框Text2中输出字符长度为____________（单选，填字母A.2 B.4 C.运行错误D.没有输出）

以下关于数据库的叙述正确的是（     ）

A．数据库没有数据的冗余

B．数据库中的数据独立性强

C．数据库中的数据一致性是指数据类型一致

D．数据库系统比文件系统管理数据更多

有如下VB程序段
Dim c As String， s1 As String
s=Text1.Text
sl=″″
For i=1 To Len（s）
        c= Mid（s， i， 1）
If c >="A"And c <="Z" Then c =Chr（（Asc（c）-Asc（"A"）） Mod 10 +Asc（"0"））
Ifc>="4"And c<="9" Then c=Chr（Asc（c)-Asc（"4"）+Asc（"a"）+1）
s1=c+s1
Next i
Text2.Text=s1
在文本框Text1中输入“ELQ278yza”，执行上述程序后，文本框Text2中输出（     ）

A．b1d2efyza

B．4162efyza

C．azyfe2d1b

D．azyfe2614

设有表示学生选课的三张表，学生S（学号，姓名，性别，年龄，身份证号），课程C（课号，课名），选课SC（学号，课号，成绩），则表SC的关键字（键或码）为（     ）

A．课号，成绩

B．学号，成绩

C．学号，课号

D．学号，姓名，成绩

代数式 2a /（C+d）对应的VB表达式是（     ）

A．2*a /(C+ d)

B．(2 *a)/c十d

C．2a/c+d

D．2a /(C+ d)

以下程序的输出结果是(     )
S=0
For i=1 To 10
If i Mod 2=0 Then S=S+i
Next i
Print s

A．10

B．20

C．30

D．O

计算机工作过程中，能从存储器中取出指令，进行分析，然后发出控制信号的是（     ）

A．运算器

B．控制器

C．接口电路

D．系统总线