首页 > 大学本科
题目内容 (请给出正确答案)
[主观题]

在窗体上设置一个命令按扭, 编写的事件过程为: Private Sub Command1_Click() Sum = 0 x =0 Do

在窗体上设置一个命令按扭, 编写的事件过程为: Private Sub Command1_Click() Sum = 0 x =0 Do While x<>-1 x =InputBox$(“请输入一个正整数 x:”) Sum = Sum + x Loop Print x, SumEnd Sub 当程序运行时,单击该命令按扭,在输入对话框中依次输入3、5、7、9、-3和-1,则在窗体上出现的运行结果是:

A、-1 21

B、-1 20

C、-3 9

D、3 -1

查看答案
答案
收藏
如果结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能还需要:
您的账号:
发送账号密码至手机
发送
安装优题宝APP,拍照搜题省时又省心!
更多“在窗体上设置一个命令按扭, 编写的事件过程为: Privat…”相关的问题
第1题
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click()

在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:

Private Sub Command1_Click()

For i=1 To 4

x=4

For j=1 To 3

x=3

Fork=1 To 2

x=x+6

Next k

Next j

Next i

MsgBox x

End Sub

打开窗体后,单击命令按钮,消息框的输出结果是()。

A.7

B.15

C.157

D.528

点击查看答案
第2题
在窗体上画一个名称为Command1的命令按钮。编写如下事件过程: Private Sub Command1_Click() Di

在窗体上画一个名称为Command1的命令按钮。编写如下事件过程: Private Sub Command1_Click() Dim a As String A=【 】 For i=1 To 5 Print Space(6-i); Mid$(a, 6-i, 2*i-1) Next i End Sub 程序运行后,单击命令按钮,要求窗体上显示的输出结果为: 5 456 34567 2345678 123456789 请填空。

点击查看答案
第3题
在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编
写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是()。

A.Private Sub Text1_Change()

Command1.Caption = "计算机等级考试"

End Sub

B.Private Sub Command1_ Click ()

Caption = "计算机等级考试"

End Sub

C.Private Sub Form1_ Click ()

Text1.Caption = "计算机等级考试"

End Sub

D.Private Sub Command1_ Click ()

Text1.Text = "计算机等级考试"

End Sub

点击查看答案
第4题
在窗体上画一个名称为Commandl的命令按钮 然后编写如下通用过程和命令按钮的事件过程:Private Fu()

A.6

B.7

C.8

D.9

点击查看答案
第5题
在窗体上画一个名称为Command1的命令按钮, 然后编写如下事件过程:

Private Sub Command1_Click()

Dim a (10,10) As Integer

Dim i As Integer, j As Integer

For i = 1 To 3

for j = 1 To 3

a (i, j) = (i – 1) * 3 + j

Print a(i, j );

next j

Print

next i

End Sub

程序运行后, 单击命令按钮, 窗体上显示的是______

A.1 2 3 2 4 6 3 6 9

B.2 3 4 3 4 5 4 5 6

C.1 4 7 2 5 8 3 6 9

D.1 2 3 4 5 6 7 8 9

点击查看答案
第6题
在窗体中有一个命令按钮command1,编写事件代码如下:Private Sub Command1_Click()Dim s As Integ

在窗体中有一个命令按钮command1,编写事件代码如下: Private Sub Command1_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) Debug.Print s End Sub Public Function P(N As Integer) Dim Sum As Integer Sum=0 For i=1 To N Sum=Sum+1 Next i P=Sum End Function 打开窗体运行后,单击命令按钮,输出的结果是()。

A.15

B.20

C.25

D.35

点击查看答案
第7题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=0 For i=1 To 3

在窗体上画一个命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

a=0

For i=1 To 3

For j=1 To 4

If j Mod 2<>0 Then

a=a+1

End If

a=a+1

Next j

Next i

Print a

End Sub

程序执行后,单击命令按钮,输出结果是【 】。

点击查看答案
第8题
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:Private

在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。

A.1

B.5

C.27

D.45

点击查看答案
第9题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图3(a)所示。通过属性窗口设置各命令按钮的属性,使得程序开始运行时,“停止”按钮不可见,“退出”按钮不可用,如图3(b) 所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为For(2)在名称为Form1的窗体上画两个名称分别为Command1和Command2、标题分别为“打开”和“保存”的俞令按钮,和一个名称为CD1的通用对话框,如图4所示。请在属性窗口中设置CD1的属性,使得打开通用对话框时,其初始路径是“C:\”。再编写适当的事件过程,使得运行程序,分别单击“打开”或“保存”按钮时,相应地出现“打开”或“保存”对话框。要求程序中不得使用变量,每个事件过程中只能写一条语句。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为For

点击查看答案
第10题
把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存人另一个磁盘文件,
请填空完成程序。在窗体上建立一个文本框,在属性窗口中把该文本框的Muhiline属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Open"d:\test\smtext1.txt"For lnput As1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【 】 whole$=whole $ aspect $+Chr$(13)+Chr $(10) Loop Text1.Text=【 】。 Close Open"d:\test\smtexttxt"For Output As1 Print 1【 】 Close End Sub

点击查看答案
退出 登录/注册
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改