（ 28 ）在窗体中添加了一个文本框和一个命令按钮（名称分别为 tText 和 bCommand ），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为 “ 计算机等级考试 ” 。以下能实现上述操作的事件过程是A ） Private Sub bCommand_Click( )Caption = " 计算机等级考试 "End SubB ） Private Sub tText_Click( )bCommand.Caption = " 计算机等级考试 "

题目

（ 28 ）在窗体中添加了一个文本框和一个命令按钮（名称分别为 tText 和 bCommand ），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为 “ 计算机等级考试 ” 。以下能实现上述操作的事件过程是

A ） Private Sub bCommand_Click( )

Caption = " 计算机等级考试 "

End Sub

B ） Private Sub tText_Click( )

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

End Sub

C ） Private Sub bCommand_Change( )

Caption = " 计算机等级考试 "

End Sub

D ） Private Sub tText_Change( )

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

End Sub

参考答案和解析

正确答案：D

如果没有搜索结果或未解决您的问题，请直接联系老师获取答案。

相似问题和答案

第1题：

在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为“输入”)。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个输入对话框，在两个输入对话框中分别输入身高和体重，并分别在两个文本框中显示出来，运行后的窗体如下图所示。

注意：

程序中不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为 execise21.vbp，窗体文件名为execise21.frm。

正确答案：

第2题：

请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。

1．在窗体(名称为Form1)上画两个命令按钮，其名称分别为C1和C2，标题分别为“命令按钮1”和“命令按钮2”，编写适当的事件过程。程序运行后，“命令按钮2”隐藏，此时如果单击“命令按钮1”，则“命令按钮2”出现，“命令按钮1”隐藏；而如果单击“命令按钮2”，则“命令按钮1”出现，“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意；存盘时，工程文件名为sjt1.vbp．窗体文件名为sjt1.frm。

2．在Form1的窗体上画一个命令按钮，其名称为C1，标题为“显示”；再画一个文本框，其名称为Text1，编写适当的事件过程。程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；此时如果单击命令按钮，则在文本框中显示“等级考试”。程序运行情况如图1—2所示。

第3题：

在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。

A．27

B．28

C．29

D．30

正确答案：C
解析：程序中各部分值的运算过程为：
Text1.Text="28.653"
Val(Text1.Text)=28.653
Val(Text1.Text)+0.5=29.153
Int(Val(Text1.Text)+0.5)=29
x=29
str(x)="29"

第4题：

在窗体中添加了一个文本框和一个命令按钮(名称分别为tText和bCommand．，并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为"计算机等级考试"。以下能实现上述操作的事件过程是

A.Private Sub bCommand_Click(． Caption="计算机等级考试 End Sub

B.Private Sub tText_Click(． bCommand.Caption="计算机等级考试" End Sub

C.Private Sub bCommand_Change(． Caption="计算机等级考试" End Sub

D.Private Sub tText_Change(． bCommand.Caption="计算机等级考试" End Sub

正确答案：D
题目要求在对文本框进行操作后，命令按钮上的标题改变，所以选项A和C可以排除。选项B"tText_Click(．"是在鼠标单击文本框后，不需要输入字符，命令按钮上的标题就发生改变，所以选项B也不对。所以本题答案为D。

第5题：

在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：

程序运行后，单击命令按钮，在文本框中显示的值是__________。

正确答案：
30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题，使用了二重循环为二维数组进行了部分赋值，最后求两个数组元素值并求和，注意这两个元素是否已被赋值，若没有赋值则为0。本题中对于a(2，3)赋值为2*3也就是6，a(4，6)赋值为4*6也就是24，最后的结果为6 24=30。

第6题：

在窗体中添加了一个文本框和一个命令按钮(名称分别为tText和bCommand)，并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“计算机等级考试”。以下能实现上述操作的事件过程是______。

A．PrivateSubbCommand_Click()Caption="计算机等级考试"EndSub

B．PrivateSubtText_Click()bCommand.Caption="计算机等级考试"EndSub

C．PrivateSubbCommanCOmge()Caption="计算机等级考试"EndSub

D．PrivateSubtText_Change9bCommanD．Caption="计算机等级考试"EndSub

正确答案：B

第7题：

在窗休中添加了一个文本框和一个命令按佣．(名称分别为tText和bCommand)，并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“计算机等级考试”。以下能实现上述操作的事件过程是______。

A．Private Sub bConunand_Click() Caption="计算机等级考试" End Sub

B．Private Sub tText_Click() bCommand.Caption="计算机等级考试" End Sub

C．Private Sub bCommand_Change() Caption="计算机等级考试" End Sub

D．Private Sub tText_Change() bCommand.Caption="计算机等级考试" End Sub

正确答案：D
解析：题目要求在对文本框进行操作后，命令按钮上的标题改变，所以选项A和C可以排除。选项B“tText Click()”是在鼠标单击文本框后，不需要输入字符，命令按钮上的标题就发生改变，所以选项B也不对。

第8题：

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

Private Sub Command1_Click()

Dim i As Integer, n As Integer

n=0

For i=0 To 50

i=i+3

n=n+1

If i＞10 Then Exit For

Next i

Text1.Text=Str(n)

End Sub

程序运行后，单击命令按钮，在文本框中显示的值是______。

正确答案：3
3 解析：本题考查循环的知识。Exit语句用于中途退出循环，所以带有Exit语句的循环结束后，一定要判断清楚到底是因为不满足循环条件而退出循环的，还是由于执行到了Exit语句而退出循环的。本题中不等i循环到50就会因为满足If语句的条件从而执行到Exit For语句退出循环，注意到每次循环时除了要执行i=i+3以外，在本次循环结束后还要加上步长1，经过计算在第3次循环的时候由于i的值为11而满足了If语句的条件，执行Exit For后退出循环，此时的n值为3。

第9题：

在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后，在文本框中输入653，单击命令按钮，标签中显示的内容是______。

A．27

B．28

C．29

D．30

正确答案：C
解析：程序中各部分值的运算过程为：Text1.Text="28.653"Val(Text1.Text)=28.653Val(Text1.Text)+0.5=29.153Int(Val(Text1.Text)+0.5)=29x=29str(x)="29"

第10题：

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：

打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。

正确答案：12
12 解析：本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。

( 28 ) 在窗体中添加了一个文本框和一个命令按钮 ( 名称分别为 tText 和 bCommand ) , 并编写了

题目

参考答案和解析

相似问题和答案

更多相关问题

相关内容