题目内容（请给出正确答案）

[主观题]

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Comma

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。

A．4

B．5

C．6

D．7

提问人：网友yiyi3805 发布时间：2022-01-07

参考答案

查看官方参考答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“在窗体上画一个名称为Command1的命令按钮，然后编写如下…”相关的问题

第1题

在窗体上画一个名称为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、A. 15

B、B. 18

C、C. 21

D、D. 24

点击查看答案

第2题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1，2，3，4，5) Sum=0 For i=1 TO 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)＞xThen Print a(i) Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是

A．1 2

B．1 2 3

C．3 4 5

D．4 5

点击查看答案

第3题

编写如下事件过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Shift=6 and Button then Print"Hello" End if End Sub 程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下()操作

A．同时按下Shift键和鼠标左键

B．同时按下Shift键和鼠标右键

C．同时按下Ctrl、Alt和鼠标左键

D．同时按下Ctrl、Alt和鼠标右键

点击查看答案

第4题

如果Form1是启动窗体，并且Form1的Load事件过程中有Form2.Show，则程序启动后（）。

A．发生一个运行时错误

B．发生一个编译时错误

C．在所有的初始化代码运行后Form1是活动窗体

D．在所有的初始化代码运行后Form2是活动窗体

点击查看答案

第5题

下列可以打开立即窗口的操作是（）。

A．Ctrl+D

B．Ctrl+E

C．Ctrl+F

D．Ctrl+G

点击查看答案

第6题

假定在窗体上建立一个通用对话框，其名称为CommonDialog1，用下面的语句可以建立一个对话框：CommonDialog1.Action=4与该语句等价的语句是（）。

A．CommonDialog1.ShowOpen

B．CommonDialog1.ShowFont

C．CommonDialog1.ShowColor

D．CommonDialog1.ShowSave

点击查看答案

第7题

当窗体启动时可通过（）属性控制窗体位于所有者的中心位置。

A．MDIChild

B．LinkMode

C．WindowState

D．StartUpPosition

点击查看答案

第8题

在窗体上绘制一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在横线处应填入的内容为()

A．Left(c,n)

B．Right(c,n)

C．Mid(c,n,1)

D．Mid(c,n,n)

点击查看答案

第9题

下面程序运行时，单击窗体后，窗体上显示的结果是()。 Private Sub Form_Click() Dim I As Integer Dim sum As Long sum=0 For I=10 To 16 If I Mod 3=0 OrI Mod 5=0 Then sum=sum+I End If Next I Print sum End Sub

A．10

B．12

C．37

D．22

点击查看答案

第10题

下列描述错误的是（）。

A．ReDim命令可以独立使用来声明数组变量

B．ReDim命令声明数组变量时，不可以使用变量来定义数组元素的个数

C．ReDim命令声明的数组变量是动态数组变量

D．ReDim命令声明的数组变量可以用Erase命令来删除

点击查看答案