计算机二级Access无纸化考试编程题要点和习题（上）.docVIP

编程题为难点所在，一般是8分左右 类型一、type..endType 语句的考察 习题： （1）如下程序段定义了学生成绩的记录类型，由学号，姓名和三门课程成绩（百分制）组成。　　Type Stud　　no As Integer　　name As String　　score（1 to 3） As Single　　End Type　　若对某个学生的各个数据项进行赋值，下列程序段中正确的是(D)　　 A）Dim S As Stud B）Dim S As Stud　　Stud.no =1001 S.no =1001　　S =” 舒宜” S.name =”舒宜”　　Stud name =78,88,96 S.score =78,88,96　　C）Dim S As Stud D）Dim S As Stud　　Stud.no =1001 S.no =1001　　S =” 舒宜” S.name=”舒宜”　　Stud.score（1） =78 S.Score（1）=78　　Stud.score（2）=88 S.Score（2）=88　　Stud.score（3）=96 S.Score（3）=96 类型二、选择结构： 主要语句： 1、单分支结构 If语句 格式1：If 条件 Then 语句1 格式2：If 条件 Then 语句1 Endif 以上两种格式用于单分支结构，条件成立做语句1，不成立就什么都不做 习题： （1）在窗体中有一个文本框Test1，编写事件代码如下：Private Sub Form_Click()X= val (Inputbox(“输入x的值”))Y= 1If X0 Then Y= 2Text1.Value = YEnd Sub打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是A）1 B)2 C)3 D）4 解答：1) x=12 2)y=1 3)120为true y=2 4)得2选B （2）A=75 If a60 then i=1 If a70 then i=2 If a80 then i=3 If a90 then i=4 Msgbox I A) 1 B)2 C)3 D)4 7560 为真 i=1 7570为真 i=2 7580 为假 7590为假 所以选择B选项 2、多分支if语句 格式：if 条件1 then 语句1 elseif 条件2 then 语句 2 elseif 条件3 then 语句3 endif （1）在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：　　Private Sub Cimmandl_Click（）　　a =75　　If a 60 Then　　k =1　　Elself a70 Then　　k =2　　Elself a80 Then　　k =3　　Elself a90 Then　　k =4　　Endlf　　MsgBox k　　End Sub　　窗体打开运行后，单击命令按钮，则消息框的输出结果是　　A）1 B）2 C）3 D）4 解答：本题主要考察if else 语句的用法 ,if 7560为true k=1，else分支不执行 所以得A （2）在窗体中使用一个文本框（名为num1）接受输入值，有一个命令按钮run13，事件代码如下： Private Sub run13_Click() If Me!num1 = 60 Then result = 及格 ElseIf Me!num1 = 70 Then result = 通过 ElseIf Me!num1 = 85 Then result = 合格 End If MsgBox result End Sub 打开窗体后，若通过文本框输入的值为85，单击命令按钮，输出结果是 。 解答：本题主要考察if else 语句的用法 ,if 85=60为true ,result=” 及格”,else分支不执行 所以得 及格 类型三：简单For循环 习题： （1）由“For i = 1 To 16 Step 3”决定的循环结构被执行 A) 4次 B)5次 C)6次 D)7次 本题选 C i依次得1,4,7,10,13,16 共六次 （）运行下列程序段，结