违法和不良信息举报 联系客服
免费注册 登录

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSu

题目

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1 Click() Dim x， y， z As Integer x = 5 y = 7 z = 0 Text1.Text = " " Call P1(x， y， z) Text1.Text=Str(z) End Sub Sub Pl(ByVal a As Integer， ByVal b As Integer， c As Integer) c = a + b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是

A．0

B．12

C．Str(z)

D．没有显示

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

第1题：

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

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


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

第2题：

设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。

A. 30

B. 25

C. 20

D. 15


正确答案：A
A)    【解析】本题考查函数的参数。数组作为参数进行传递时，VB中默认的参数传递方式为地址传递。过程Fun的功能是计算数组中所有元素的积。数组的元素为2 4 6 8 10，因此最后文本框中显示的内容为30。

第3题：

在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：


正确答案：

36 

第4题：

在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。


正确答案：
True【解析】当向文本框中输入任何字符时．文本框中的内容发生变化，从而触发Change事件，事件处理程序将命令按钮激活即可。这通过设置Command1.Enabled的属性值为真来实现。

第5题：

在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：

程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

A．

B．H

C．

D．


正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。

第6题：

在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。


正确答案：A
A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。

第7题：

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

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

A．2

B．3

C．4

D．5


正确答案：B
题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。

第8题：

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

Private Sub Command1_Click()

x＝Val(Text1.Text)

Select Case x

Case 1,3

y＝x*x

Case IS＞＝10,IS＜＝-10

y＝x

Case-10 To 10

y＝-x

End Select

End Sub

程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。


正确答案：9
9 解析：本题考查多分支语句Select Case的知识。 Select Case用于实现多分支结构，其使用格式为： Select Case 测试表达式＞
[Case表达式列表1＞]
[语句块1]
[Case 表达式列表2＞]
[语句块2]
[CaseElse]
[语句块n]
End Select
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行。如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行严y＝x*x后退出Case结构，最后y的值为9。

第9题：

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是

A． Visual

B．Basic

C．Program

D．出错


正确答案：C
解析：Text是文本框的默认属性。

第10题：

在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：

程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。


正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为： 其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。

相关内容