网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
（21）窗体上有 Command1、Command2 两个命令按钮。现编写以下程序：
Option Base 0
Dim a( ) As Integer, m As Integer
Private Sub Command1_Click( )
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
Private Sub Command2_Click( )
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
运行程序时，单击 Command1 后输入整数 10，再单击 Command2 后输入整数 5，则数组a 中元素的个数是
（ ）。
A）5
B）6
C）10
D）11
参考答案
更多 “ （21）窗体上有 Command1、Command2 两个命令按钮。现编写以下程序：Option Base 0Dim a( ) As Integer, m As IntegerPrivate Sub Command1_Click( )m=InputBox("请输入一个正整数")ReDim a(m)End SubPrivate Sub Command2_Click( )m=InputBox("请输入一个正整数")ReDim a(m)End Sub运行程序时，单击 Command1 后输入整数 10，再单击 Command2 后输入整数 5，则数组a 中元素的个数是（ ）。A）5B）6C）10D）11 ” 相关考题
考题
某表单上有两个命令按钮Command1和Command2。要求：(1)若单击Command1命令按钮，程序将当前表的记录指针上移一位，并刷新表单中所有的值；其中，若指针已处于文件的首记录，则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮，程序将当前表的记录指针下移一位，并刷新表单中所有的值；其中，若指针已处于文件的末记录，则将其自身(Command2命令按钮)设置为不能被激活状态。
考题
创建一个窗体，在该窗体中建立两个按钮，分别命名为Command1和Command2。下列程序代码用于实现以下功能：单击命令按钮Command1后，按钮Command1变为不可用，而Cmmnand2设置为可用。请填空。Private Sub Command1_ Click()Command1.______ = FalseCommand1.______ = TrueEnd Sub
考题
窗体上有Commandl、Command2两个命令按钮。现编写以下程序：OptionBase 0Dim a()As Integer，m As IntegerPrivate Sub Commandl_Click()m=InputBox(”请输入一个正整数”)ReDim a(m)End SubPrivate Sub Command2_Click()in=InputBox(”请输入一个正整数”)ReDim a(m)End Sub运行程序时，单击Commandl后输入整数10，再单击Command2后输入整数5，则数组a中元索的个数是A．5B．6C．10D．11
考题
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
考题
在窗体上画三个命令按钮，其名称分别为Command1、Command2和Command3，然后编写如下事件过程： Private Sub Command1 Click() Command2.Enabled = False Command3.Visible = False End Sub程序运行后，单击命令按钮Command1，则执行的操作是______。A．命令按钮Command2和Command3禁用B．命令按钮Command2和Command3隐藏C．命令按钮Command2隐藏，Command3禁用D．命令按钮Command2禁用，Command3隐藏
考题
在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() Dim i As Integer,a As Integer Do While i＜20 Do While True If i Mod 10=0 Then Exit Do Else i=i-1 End If Loop i=i+11 a=a+i Loop Printa End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．21B．32C．33D．11
考题
在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click（) For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n 3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是（）。A．15B．18C．21D．24
考题
在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click（) For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n 3 Next n Form1.Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是（）。A．15B．18C．21D．24
热门标签
最新试卷
