[单选题]

(21)窗体上有 Command1、Command2 两个命令按钮。现编写以下程序:

Option Base 0

D.im a( ) As Integer, m As Integer

Private Sub Command1_Click( )

m=InputBox("请输入一个正整数")

ReDim a(m)

E.nd Sub

Private Sub Command2_Click( )

m=InputBox("请输入一个正整数")

ReDim a(m)

E.nd Sub

运行程序时,单击 Command1 后输入整数 10,再单击 Command2 后输入整数 5,则数组a 中元素的个数是

( )。

A.)5

B.)6

C.)10

D.)11

参考答案与解析:

相关试题

窗体上有Commandl、Command2两个命令按钮。现编写以下程序:Opti

[单选题]窗体上有Commandl、Command2两个命令按钮。现编写以下程序:OptionBase 0D.im a()As Integer,m As IntegerPrivate Sub Commandl_Click()m=InputBox(”请输入一个正整数”)ReDim a(m)E.nd SubPrivate Sub Command2_Click()in=InputBox(”请输入一个正整数”)ReDim a(m)E.nd Sub运行程序时,单击Commandl后输入整数10,再单击Command

  • 查看答案
  • 在表单中加入两个命令按钮Command1和Command2,编写Command1

    [单选题]在表单中加入两个命令按钮Command1和Command2,编写Command1的Click事件代码如下This.Parent.Command2.Enabled=.F.,则单击Command1后,执行命令()。A . Command1命令按钮不能激活B . Command2命令按钮不能激活C . 事件代码无法执行D . 命令按钮组中第二个命令按钮不能激活

  • 查看答案
  • 在表单中加入两个命令按钮:Command1和Command2,编写Command

    [单选题]在表单中加入两个命令按钮:Command1和Command2,编写Command1的Click事件代码如下ThisForm.Parent.Command2.Enabled=.F.,则单击按钮Command1后,执行命令()。A . Command1命令按钮不能激活B . Command2命令按钮不能激活C . 事件代码无法执行D . 命令按钮组中第二个命令按钮不能激活

  • 查看答案
  • 在窗体上画两个命令按钮,名称分别为Command1、Command2,并编写如下

    [单选题]在窗体上画两个命令按钮,名称分别为Command1、Command2,并编写如下程序 Const n=5,m=4 Dim a(m,n) Private Sub Command1_Click() k=1 For i=1 To m Forj=1 To n a(i,j)=k k=k+1 Next j Next i End Sub Private Sub Command2_Click() summ=0 For i=1 Tom For j=1 To n If i=1 Or i=m Then summ=su

  • 查看答案
  • 某表单上有两个命令按钮Command1和Command2。要求:(1)若单击Co

    [试题]某表单上有两个命令按钮Command1和Command2。要求:(1)若单击Command1命令按钮,程序将当前表的记录指针上移一位,并刷新表单中所有的值;其中,若指针已处于文件的首记录,则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮,程序将当前表的记录指针下移一位,并刷新表单中所有的值;其中,若指针已处于文件的末记录,则将其自身(Command2命令按钮)设置为不能被激活状态。

  • 查看答案
  • 在窗体上画2个命令按钮,名称分别为Command1、command2,并编写如下

    [单选题]在窗体上画2个命令按钮,名称分别为Command1、command2,并编写如下程序C.onst n=5,m=4D.im a(m,n)Private Sub Command1_Click()K=1F.or i=1 To mF.or j=1 To na(i,j)=kk=k+1Next jNext iPrivate Sub Command2_Click()Summ=0F.or i=1 To mF.or j=1 To nIf i=1 Or i=m ThenSumm=summ+a(i,j)E.lseIf

  • 查看答案
  • 窗体上有三个按钮Command1、Command2和Command3,如以下代码

    [单选题]窗体上有三个按钮Command1、Command2和Command3,如以下代码所示,该程序的功能是______。Private Sub Command1_ Click() CommandEnabled=False CommandVisible =FalseEnd SubA.当单击按钮Command1时,按钮2和按钮3都不可用B.当单击按钮Command1时,按钮2和按钮3都不可见C.当单击按钮Command1时,按钮2不可用和按钮3不可见D.当单击按钮Command1时,按钮2不可见和按钮3不

  • 查看答案
  • 窗体上有Command1、Command2两个命令按钮,现编写如下程序:<br /><img border="0" src="https://img.d

    [单选题]窗体上有Command1、Command2两个命令按钮,现编写如下程序:运行程序时,单击Command1后输入整数10,再单击Command2后输入整

  • 查看答案
  • 窗体中有3个命令按钮,分别命名为Command1、Command2和Command3。当单击Command1按钮时,Command2按钮变为可用,Command3按钮变为不可见。下列Command1的

    [单选题]窗体中有3个命令按钮,分别命名为Command1、Command2和Command3。当单击Command1按钮时,Command2按钮变为可用,Co

  • 查看答案
  • 在窗体上画了两个按钮控件Command1和Command2,有如下程序:Priv

    [单选题]在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click() Print "Visual"; End Sub Private Sub Command2_Click() Print "Basic"; End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后,按键盘Cancel键,在窗体上输出的结果是A.Bas

  • 查看答案
  • (21)窗体上有 Command1、Command2 两个命令按钮。现编写以下程