(22)下面关于菜单的叙述中错误的是(B)
　　 A)各级菜单中的所有菜单项的名称必须唯一
 　　B)同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同
 　　C)弹出式菜单也用菜单编辑器编辑

　　(23)已知有下面的过程(D)
  　　 Private Sub proc1(a As Integer,b As String,Optional x As Boolean)
       ……
  　　 End Sub
  　　 正确调用此过程的语句是
　　A)Call procl(5)                    
　　B)Call proc1 5,”abc”,False
　　C)proc1(12,”abc”,True)              
　　D)proc1  5, “abc”
 
　　(24)在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。下面能够正确实现上述功能的程序是(C)
 　　  A)Private Sub Command1_Click()   　　B) Private Sub Command1_Click()
   　　     Text1.Left=100                　　　　　　T　　ext1.Left= Text1.Left-100
    　　  End Sub                        　　　　　　　　　　End  Sub 
  　　 C)Private Sub Command1_Click()   　　D) Private Sub Command1_Click()
      　　Text1.Move.Text.Left+100         　　　　　　 Text1.Move.Text.Left
      　　End Sub                         　　　　　　　　　　 End Sub

　　(25)某人创建了1个工程，其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是(A)
　　A)在工程属性对话框中把“启动对象”设置为Form2
　　B)在Form1的Load事件过程中加入语句 Load  Form2
　　C)在Form2的Load事件过程中加入语句Form2.Show
　　D)在Form2的TabIndex属性设置为１，把Form1的TabIndex属性设置为２

　　(26)窗体上有１个名称为Text1的文本框和１个名称为Command1的命令按钮。要求程序运行时，单击命令按钮，就可以把文本框中的内容写到文件out.txt中，每次写入的内容附加到文件原有内容之后。下面能够实现上述功能的程序是(C)
　　A)Private Sub Command1_Click()     B) Private Sub Command1_Click()
       Open “out.txt” For Inpit As#1         Open “out.txt” For Outpit As#1
       Print#1,Text1.Text                 　　　　　　　  Print#1,Text1.Text
       Close#1                            　　　　　　　　　　　Close#1
       End Sub                          　　　　　　　　　　　　  End Sub
    C) Private Sub Command1_Click()     D) Private Sub Command1_Click()
      Open “out.txt” For Append As#1       Open “out.txt” For Random As#1
      Print#1,Text1.Text                   　　　　　　　　　　 Print#1,Text1.Text
      Close#1　　　　　　　　　　　　　　　　　　　　　　　　   Close#1
      End Sub                            　　　　　　　　　　　　　　　　 End Sub

　　(27)为计算1+3+5+……+99的值，某人编程如下
     k=1
     s=0
     While k<=99
       k=k+2    :   s=s+k 
      Wend 
     Print  s
　　在调试时发现运行结果有错误，需要修改。下列错误原因和修改方案中正确的是(D)
　　A)While …Wend循环语句错误，应改为For k=1 To 99 …Next k
　　B)循环条件错误，应改为Whlie k<99
　　C)循环前的赋值语句k=1错误，应改为k=0
　　D)循环中两条赋值语句的顺序错误，应改为s=s+k : k=k+2

　　(28)下面程序在调试时出现了死循环
     Private Sub Command1_Click()
         n=InputBox(“请输入一个整数”)
         Do
            If n Mod 2=0 Then
               n=n+1
            Else
               n=n+2  
            Else If
         Loop Until n=1000
　　End Sub
　　下面关于死循环的叙述中正确的是(D)
　　A)只有输入的n是偶数时才会出现死循环，否则不会
　　B)只有输入的n是奇数时才会出现死循环，否则不会
　　C)只有输入的n是大于1000的整数时才会出现死循环，否则不会
　　D)输入任何整数都会出现死循环

[1] [2] [3] [4] [5] [6] [7]