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

[主观题]

在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程：Private

在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程： Private Sub Commandl_Click() S=0 Fori=1 To 15 x=2*i-1 If x Mod3=0 Thens=S+1 Nexti Labe11.Caption=S End Sub 程序运行后，单击命令按钮，则标签中显示的内容是()。

A．1

B．5

C．27

D．45

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

参考答案

查看官方参考答案

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

您可能会需要：

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

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

更多“在窗体上画一个名称为Commandl的命令按钮，一个名称为L…”相关的问题

第1题

在窗体上画一个名称为Commandl的命令按钮，再画两个名称分别为Labell、Lubd2的标签，然后编写如下程序代码：

Private X As Integer

Private Sub Commandl_Click()

X=5：Y=3

Call proc(X，Y)

Labell．Caption=X

Label2．Caption=Y

End Sub

Private Sub proc(a As Integer，ByVal b As Integer)

X=a*a

Y=b+b

End Sub

程序运行后，单击命令按钮，则两个标签中显示的内容分别是

A．25和3

B．5和3

C．25和6

D．5和6

点击查看答案

第2题

在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。

A．ABCD和10

B．1234和100

C．ABCD和100

D．1234和10

点击查看答案

第3题

要建立一个学生成绩的随机文件，如下定义了学生的记录类型，由学号、姓名、三门课程成绩(百分制)组成，下列程序段正确的是()。

A．Typepestudl no As Integer name As String score(1 To 3)As Single End Type

B．Typestudl no As Integer no As Integer name As String*10 score()As Single End Type

C．Typestudl no As Integer name As String*10 score(1 To 3)As Single End Type

D．Typestudl no As Integer name As String score(1 To 3)As Single End Type

点击查看答案

第4题

CommonDialog控件可以显示()对话框。

A．4种

B．5种

C．6种

D．7种

点击查看答案

第5题

在窗体上添加一个命令按钮，然后编写如下事件过程： Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程

A．35

B．33

C．31

D．29

点击查看答案

第6题

在运行程序的过程中，当执行“复制”(mnuEditCopy)命令时，使“粘贴”(munEditPaste)命令变为可用，则应做如下处理()。

A．Private Sub nuEditPaste_Click() …… mun EditPaste.Enable=True End Sub

B．Private Sub mnuEditCopy click …… muEditPaste.Enable=True End Sub

C．Privat Sub munEditPaste_Click() …… mnuEditPaste.Visible=Tme End Sub

D．Private Sub munEditCopy_ClicK() …… munEditPaste.Visible=Tme End Sub

点击查看答案

第7题

以下关于过程的叙述中，错误的是()。

A．事件过程是由某个事件触发而执行的过程

B．函数过程的返回值可以有多个

C．可以在事件过程中调用通用过程

D．不能在事件过程中定义函数过程

点击查看答案

第8题

单击一次命令按钮后，下列程序的执行结果是()。 Private Sub Commandl_Click() s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End Function

A．15

B．25

C．35

D．45

点击查看答案

第9题

“按相同大小制作”多个控件时，()是制作的基准。

A．被锁定的控件

B．第十个控件

C．最后一个控件

D．主控件

点击查看答案