首页 > 计算机应用技术> JAVA程序设计

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

[主观题]

在窗体中添加一个命令按钮，（其Name属性为Command1)，然后编写代码。程序的功能是产生100个小于1000

在窗体中添加一个命令按钮，(其Name属性为Command1)，然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数，并统计其中5的倍数所占比例。请在【】和【】、【】处填入适当的内容，将程序补充完整。 Private Sub Command1_Click() Dim a(100) For j=1 To 100 a(j)=Int (【】) If a(j)【】5=0 Then【】 Print a(j) Next j Print print k/100 End Sub

查看答案

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

您可能会需要：

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

安装优题宝APP，拍照搜题省时又省心！

更多“在窗体中添加一个命令按钮，（其Name属性为Command1…”相关的问题

第1题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub

Command1_Click() Dim a s=0 a=Array (1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a (i) * j j=j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是()。

A.4321

B.34

C.1234

D.12

点击查看答案

第2题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Su

b Command1_Clic() Dim a s=0 a=Array (1,2,3,4) j= 1 For i=4 To 1 Step-1 s=s+a(i) * j j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是()。

A.4321

B.34

C.1234

D.12

点击查看答案

第3题

在窗体中添加一个命令按钮，命名为Command1，然后编写如下程序：PrinvateSubCommand1_Click（)A=1234B=Str（A)C=Len（B)PrintCEndSub程序运行后，单击命令按钮，则在窗体上显示的内容是（)

A.0

B.5

C.6

D.7

点击查看答案

第4题

在窗体中添加一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer

, b As Integer a=InputBox("Enter the Firstinteger") b=InputBox("Enter the Secondinteger") Print b+a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是()。

A.456

B.246

C.123123

D.123

点击查看答案

第5题

在窗体上添加一个文本框控件Info，画一个命令按钮，当单击命令按钮显示“保存文件”对话框，设置该对

话框可用于保存文本文件(默认)和可执行文件(．exe)，然后在文本控件中显示保存的文件名。 Private Sub Command1_Click() CommonDialog1．Filter=【】 CommonDialog1．FilterIndex=【】 CommonDialog1．ShowSave Info．Text=【】 End Sub

点击查看答案

第6题

在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件过程：OptionBase1PrivateSubComma

A.空白

B.错误提示

C.绿色

D.白色

点击查看答案

第7题

如果将命令按钮的 Name属性设置为“求和”，那么下列说法中正确的是（) 。

A.该命令按钮的名称是“求和”

B.该命令按钮上的文字显示的是“求和”

C.运行后的结果显示的是“求和”

D.窗体的标题是“求和”

点击查看答案

第8题

要向窗体中添加按钮和其它控件，可以使用下列方法中的哪一种？

A.右击“工具箱”上的控件，选择“添加”就可以将一个控件添加到窗体的左上角，然后可以根据需要将控件拖动到适当的位置

B. 在“工具箱”上双击控件图标变可以将一个控件添加到窗体的控件左上角，然后可以根据需要拖动控件

C. 单击“工具箱”上的控件，并将其拖放到窗体中的理想位置，接着就可以把一个控件拖放到窗体中

D. 单击“工具箱”上的控件，然后在窗体上期望的位置单击并拖动出一个长方形，接着就可以在窗体上绘制出一个控件

点击查看答案

第9题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Pr

ivate Sub Command1_Click() Dim array1(10,10) As Integer Dim I, j As Integer For I=1 To 3 For j=2 To 4 array1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。

A.15

B.14

C.13

D.12

点击查看答案

第10题

窗体中有一个命令按钮Command1。其Click事件过程如下。 Sub P（b（)As Integer) For i=1 to 4 b（i)=2*i

窗体中有一个命令按钮Command1。其Click事件过程如下。

Sub P(b()As Integer)

For i=1 to 4

b(i)=2*i

Next i

End Sub

Private Sub Command1_Click()

Dim a(1 to 4)As Integer

For i=1 to 4

a(i)=i+4

Nexti

P a()

For i=1 to 4

MsgB0x a(i)

Next i

End Suk)

窗体运行后，单击命令按钮，消息框4次输出的结果分别是( )。

A．2 4 6 8 B．5 6 7 8 C．10 12 14 16 D．出错

点击查看答案

第11题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Pr

ivate Sub Command1_Click() Dim array1(10，10) As Integer Dim I，j As Integer For I=1 To 3 For j=2 To 4 array(I，J)=I+j Next j Next I Text1，Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是()。

A.15

B.14

C.13

D.12

点击查看答案

湖南拓肯信息安全技术有限公司版权所有 ©2024

湘ICP备19012461号-1 湘公安备案43019002002173号营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）