OptionBase 0
D.im a()As Integer,m As Integer
Private Sub Commandl_Click()
m=InputBox(”请输入一个正整数”)
ReDim a(m)
E.nd Sub
Private Sub Command2_Click()
in=InputBox(”请输入一个正整数”)
ReDim a(m)
E.nd Sub
运行程序时,单击Commandl后输入整数10,再单击Command2后输入整数5,则数组a中元索的个数是
A.5
B.6
C.10
D.11
[单选题](21)窗体上有 Command1、Command2 两个命令按钮。现编写以下程序:Option Base 0D.im a( ) As Integer, m As IntegerPrivate Sub Command1_Click( )m=InputBox("请输入一个正整数")ReDim a(m)E.nd SubPrivate Sub Command2_Click( )m=InputBox("请输入一个正整数")ReDim a(m)E.nd Sub运行程序时,单击 Command1 后
[单选题]窗体上有3个按钮Commandl、Command2和Command3,如以下代码: Private Sub Commandl Click() Command2.Enabled:Fal3e Command3.Vi3ible=Fal3e End Sub 该程序的功能是 ( )A.当单击按钮Command1时, Command2和Command3按钮不可用B.当单击按钮Command1时, Command2和Command3按钮不可见C.当单击按钮Command1时, Cammand2按钮不可用和Co
[单选题]窗体上有Command1、Command2两个命令按钮,现编写如下程序:运行程序时,单击Command1后输入整数10,再单击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,编写Command1的Click事件代码如下ThisForm.Parent.Command2.Enabled=.F.,则单击按钮Command1后,执行命令()。A . Command1命令按钮不能激活B . Command2命令按钮不能激活C . 事件代码无法执行D . 命令按钮组中第二个命令按钮不能激活
[单选题]窗体中有3个命令按钮,分别命名为Commandl、Command2和Command3。当单击Cmmandl按钮时,Command2按钮变为可用,Command3按钮变为不可见。下列Corn.mandl的单击事件过程中,正确的是A.Private Sub Commandl—click() Command2.ViSible=True Command3.ViSible=False End SubB.Private Sub Commandl_click() Command2.Enabl ed=True
[单选题]在表单中加入两个命令按钮Command1和Command2,编写Command1的Click事件代码如下This.Parent.Command2.Enabled=.F.,则单击Command1后,执行命令()。A . Command1命令按钮不能激活B . Command2命令按钮不能激活C . 事件代码无法执行D . 命令按钮组中第二个命令按钮不能激活
[单选题]窗体上添加有3个命令按钮,分别命名为Commandl、Command2和Command3,编写Commandl的单击事件过程,完成的功能为:当单击按钮Commandl时,按钮Command2可用,按钮Command3不可见。以下正确的是( )。A.B.C.D.
[单选题]在窗体上画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。要求:(1)若单击Command1命令按钮,程序将当前表的记录指针上移一位,并刷新表单中所有的值;其中,若指针已处于文件的首记录,则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮,程序将当前表的记录指针下移一位,并刷新表单中所有的值;其中,若指针已处于文件的末记录,则将其自身(Command2命令按钮)设置为不能被激活状态。