单项选择题

设工程中有Form1、Form2两个窗体，要求单击Form2上的Command1命令按钮，Form2就可以从屏幕上消失，下面的事件过程中不能实现此功能的是( )。

A) Private Sub Command1_Click()
Form2. Hide
End Sub
B) Private Sub Command1_Click()
Unload Me
End Sub
C) Private Sub Command1_Click()
Form2. Unload
End Sub
D) Private Sub Command1_Click()
Me. Hide
End Sub
<上一题 目录 下一题>
热门 试题

单项选择题
为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程： Private Sub Command1 Click() Dim a&, s&, k& s=1 a=2 For k = 2 To 10 a=a*2 s=s+a Next k Text1. Text = s End Sub 执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是( )。
A) 把s=1改为s=0
B) 把For k = 2 To 10改为For k = 1 To 10
C) 交换语句s=s+a和a=a*2的顺序
D) 把For k = 2 To 10改为For k = 1 To 10、交换语句s=s+a和a=a*2的顺序
单项选择题
窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序： Private Sub Command1_Click() Dim n If Text1. Text ＜ ＞ 123456 Then n=n+1 Print 口令输入错误 & n & 次 End If End Sub 希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是( )。
A) 在Dim n语句的下面添加一句：n=0
B) 把Print "口令输入错误" &n& "次" 改为Print "口令输入错误"+n+ "次"
C) 把Print "口令输入错误" &n& "次" 改为Print "口令输入错误"& Str(n)& "次"
D) 把Dim n改为Static n
相关试题