以下叙述中错误的是（　　）。

试卷相关题目

• 1语句Di ma（－3To 4，3To 6）As Integer 定义的数组元素个数是（　　）。

  A.18

  B.28

  C.21

  D.32

  开始考试点击查看答案
• 2下面程序的输出结果是（　　）。Private Sub Co mmand1＿Click（）Ch$＝＂ABCDEF＂proc ch ：Print chEnd SubPrivate Sub proc（ch As Stri ng）s ＝＂＂For k ＝Len（ch）To 1Step －1s ＝s ＆Mid（ch ，k ，1）Next kch ＝sEnd Sub

  A.ABCDEF

  B.FEDCBA

  C.A

  D.F

  开始考试点击查看答案
• 3下面语句正确的是（　　）。

  A.If x＜3＊y And x＞y Then y ＝x＾3

  B.If x＜3＊y And x＞y Then y ＝3x

  C.If x＜3＊y ：x＞y Then y ＝x＾3

  D.If x＜3＊y And x＞y Then y ＝x＊＊3

  开始考试点击查看答案
• 4在窗体上画一个命令按钮，名称为Co mmand1，然后编写下列代码：Option Base 0Private Sub Co mmand1＿Click（）Di m A1（4）As Integer ，A2（4）As IntegerFor k ＝0To 2A1（k ＋1）＝InputBox（＂请输入一个整数＂）A2（3－k）＝A1（k ＋1）Next k Print A2（k）End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为（　　）。

  A.0

  B.1

  C.2

  D.3

  开始考试点击查看答案
• 5编写如下两个事件过程：Private Sub Form＿KeyDown （KeyCode As Integer，Shift As Integer）Print Chr（KeyCode）End SubPrivate Sub Form＿KeyPress（KeyAscii As Integer）Print Chr（KeyAscii）End Sub在一般情况下（即不按住Shift 键也未锁定大写键时）运行程序，如果按键盘上的"A"键，则程序输出的结果是（　　）。

  A.Aa

  B.aA

  C.AA

  D.aa

  开始考试点击查看答案
• 6用Print 方法在Forml 窗体中显示出4个＃号的正确代码为（　　）。

  A.Debug ．Print＂＃＃＃＃＂

  B.Print＂＃＃＃＃＂

  C.Forml-Print＂＃＃＃＃＂

  D.Forml ．Print＂＃＃＃＃＂

  开始考试点击查看答案
• 7一个模块内部各个元素彼此结合的紧密程度的度量称为（　　）

  A.耦合性

  B.内聚性

  C.复杂性

  D.数据传输特性

  开始考试点击查看答案
• 8函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。Private Type AngK As IntegerSi nx As Si ngleCosx As Si ngleEnd TypePrivate Sub Form＿Click（）Di m Y As Si ngleDi mi As IntegerDi m Ksc As AngOpen ____________Y ＝3．14159／180For i ＝1To 90Ksc ．K ＝iKsc ．Si nx＝Si n（i＊Y）Ksc ．Cosx＝Cos（i ＋Y）________Next iClose ＃2Elld Stub

  A.＂．．＼Datal ．txt＂For Rando mAs ＃1Len ＝10 Put ＃1，i ，Ksc

  B.＂．．＼Datal ．txt＂For Rando m As ＃1Len ＝10 Put ＃1，Y ，Ksc

  C.＂．．＼Datal ．txt＂For Rando m As ＃1 Put ＃1，i ，Ksc

  D.＂．．＼Datal ．txt＂For Rando m As ＃1 Put ＃1，Y ，Ksc

  开始考试点击查看答案
• 9下列程序运行时输出的结果是（　　）。Option Base 1Const a＝10Private Sub Form＿Click0Di mx（a）As Integerk ＝－1For i ＝1To ax（i）＝i＊kk ＝（－1）＊kNext iFor i ＝1To 10Print x（i）Next iEnd Sub

  A.1 3 5 7 9 10

  B.－1－3－5－7－9

  C.－1 2－3 4－5 6－7 8－9 10

  D.1－2 3－4 5－6 7－8 9－10

  开始考试点击查看答案
• 10某人为计算n！（O ＜n ＜＝12）编写了下面的函数过程：Private Function fun（n As Integer）As LongDi m P As LongP＝lFor k ＝n －1To 2Step －1p ＝p＊kNext kfun ＝pEnd Function在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3种是正确的，错误的方案是（　　）。

  A.把p ＝1改为p ＝11

  B.把For k ＝n －1To 2Step －1改为For k ＝1To n －1

  C.把For k ＝n －1To 2Step －1改为For k ＝1To n

  D.把Fo rk －－n －1To 2Step －1改为For k ＝2To n

  开始考试点击查看答案