在名为“Form. 1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“txt1”、“txt2”、“txt3”和“Commandl”，然后编写如下两个事件过程：Private Sub Commandl_Click()txt3＝txt1+txt2End SubPrivate Sub Form1_Load()txt1＝""txt2＝""txt3＝""End Sub当打开窗体Form1后，在txt1和txt2中分别输入3和5，然后单击命令按钮Commandl，则文本框txt3中显示的内容为_

题目

在名为“Form. 1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“txt1”、“txt2”、“txt3”和“Commandl”，然后编写如下两个事件过程：

Private Sub Commandl_Click()

txt3＝txt1+txt2

End Sub

Private Sub Form1_Load()

txt1＝""

txt2＝""

txt3＝""

End Sub

当打开窗体Form1后，在txt1和txt2中分别输入3和5，然后单击命令按钮Commandl，则文本框txt3中显示的内容为_

相似考题

1.在窗体上添加两个文本框(名为TXT1和TXT2)和一个命令按钮(名为BTNOK)，然后PRIVATE SUB BTNOK CLICK( )ME! TXT1="ABCD"ME! TXT2="123"ME! TXT1=ME! TXT2& ME! TXT1ME! TXT2=ME! TXT2+456END SUB程序运行后，单击命令按钮，文本框TXT1和TXT2中显示的内容分别为【】和【】

2.在窗体中有两个文本框分别为Textl和Text2，一个命令按钮Cmmand1，编写如下两个事件过程：Private Sub Commandl_Click()a=Textl．Value+Text2．ValueMsgBox aEnd SubPrivate Sub Form_Load()TextI．Value=“”Text2．Value=””End Sub程序运行时，在文本框Textl中输入78，在文本框Text2中输入87，单击命令按钮，消息框中输出的结果为【】。

3.在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click() Dim a() a＝Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承

4.在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮，然后编写如下事件过程：Private Commandl_Click（）Dim i As Integer, n As IntegerFor i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str（n）End Sub程序运行后，单击命命令按钮，在文本框中显示的值是（）。 A．5B．4C．3D．2

更多“在名为“Form. 1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“txt1”、“txt2”、“txt3”和“Commandl”，然后编写如下两个事件过程：Private Sub Commandl_Click()txt3＝txt1+txt2End SubPrivate Sub Form1_Load()txt1＝""txt2＝""txt3＝""End Sub当打开窗体Form1后，在txt1和txt2中分别输入3和5，然后单击命令按钮Commandl，则文本框txt3中显示的内容为_”相关问题

第1题：

在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click() m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。
A．5
B．8
C．9
D．10

正确答案：D
解析：本题考查基本字符串函数的知识。在VBA中，Str函数用于将数字转换成字符串，当数字转换为字符串时，总会预留一个空格给前面的正负号。如果参数是正数，回传的字符串会有一个前置空格。2.17转换成字符串“2.17”，后面再连接上5个空格，然后用Len函数来求长度，最后结果为10。
第2题：

在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Text1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：
Private Sub Commandl Click()
Text3=Text1+Text2
End Sub
Private Sub Form1 Load()
Text1=" "
Text2=" "
Text3=" "
End Sub
打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【】。

正确答案：57
57 解析：本题考查对“+”的理解。在VBA中，“+”既可以用作数学运算符，也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接，然后在第3个文本框中显示，所以应该是57，在连接字符串方面，“+”和“&”是相同的功能，但“&”只能用来连接字符串，而不能进行数学运算。命令按钮 Commandl的Click事件是：Text3=Text1+Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中，窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后，单击命令按钮来触发其Click事件，完成两个字符串的连接。
第3题：

在窗体上画一个命令按钮(名称为 Commandl)，然后编写如下事件过程： Private Sub Commandl_Click() Static a As Integer a＝a+1 End Sub 运行程序，第3次单击命令按钮后，变量a的值为( )
A．0
B．1
C．2
D．3

正确答案：D
解析：由Static语句定义的变量只建立一次，能在过程结束后保存原值。题中第一次单击命令按扭时，a的初始值为o，执行语句后a的值变为1；在第二次单击按扭时，a的初始值应保留上次的结果值1，执行语句后 a的值变为2；同理在第三次单击按扭后，变量 a的值变为3。
第4题：

在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Text1，把文本框的 Text属性设置为空白，然后编写如下事件过程： Private Sub Commandl_click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示内容是( )。
A．108
B．18
C．810
D．出错

正确答案：A
第5题：

在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是__________。

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

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。

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

若窗体中已有一个名为Commandl的命令按钮、一个名为Labell的标签和一个名为Textl的文本框，且文本框的内容光焕发为空，然后编写如下事件代码： Private Function fx As Long． As Boolean If x Mod 2 =0 Then f =True Else f =False End If End Function Privare Sub Commandl_Click． Dim n As Ling n =ValMeltextl． p=Iiffn．,”Even number”,”Odd number’ Me!Labell.Caption=n＆“is” ＆p End Sub 窗体打开运行后，在文本框中输入21，单击命令按钮，则标签显示内容为【12】

正确答案：
21 is odd number
第8题：

在窗体上添加一个命令按钮，名称为Commandl，然后编写如下事件过程： Option Base 0Private Sub Commandl_Click（） Dim cityAs VariantCity=．Array（"北京"， "上海"，"天津”， "重庆"）Print city（1）End Sub程序执行后，如果单击命令按钮，则在窗体上显示的内容是（）。
A.空白
B.错误提示
C.北京
D.上海

正确答案：D
暂无解析，请参考用户分享笔记
第9题：

在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，并在命令按钮中编写如下事件代码：PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后，单击命令按钮，在文本框中显示______。
A．5
B．8
C．9
D．10

正确答案：D
第10题：

在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。

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

在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。

正确答案：
15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时，参数有两种传递方式：传址传递和传值传递。如果在函数声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本题中形参均为传址传递，即a=x=3，b=y=5，c=z=10。但是在子程序里面对c重新赋值为c=a*b=15，这个值l5会回送给实参2，所以最后显示的值Z也就是l5。
第12题：

单选题
txt1="Whatavery"；txt2="niceday"；txt3=txt1+txt2；输出结果正确的是（）.
A
nice day
B
nice a day
C
What a very nice day
D
What a nice day

正确答案： A
解析：暂无解析
第13题：

在名为Form1的窗体上添加三个文本框和一个命令按钮，其名称分别为Text1、Text2、Text3和Command1，然后编写如下两个事件过程： Private Sub Command1_Click() Text3=Textl+1Text2 End Sub private Sub Form1_Load() Text1="" Text2="" Text3="" End Sub 打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为( )。
A．57
B．12
C．5
D．出错

正确答案：A
第14题：

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dim i As Integer，n As Integer
For i=0 T0 50
i=i+3
n=n+1
If i>10 Then Exit For
Next
Textl．Text=Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
A．2
B．3
C．4
D．5

正确答案：B
解析：本题考核点在于循环和判断语句，循环起始于i；O，当i>10时终止。i的取值依次为0，3，7，11，相应地，n的取值为0，1，2，3。在给出的程序中，第一次执行完“i=i+3”后i的值为3。然后让n自加1，再执行依次“next i”后，i的值为4，因此第二次执行完“i=i+3”后i的值为7；n再自加，值为2，此时，i的值并不大于lO，因此还要再执行“i=i+3”、“n=n+1”，此时i值为11。n值为3，停止循环判断。
第15题：

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2．Text="" End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321，然后单击命令按钮，则输出结果为 ( )
A．444
B．321123
C．123321
D．132231

正确答案：C
解析：文本框的Text属性表示文本框的内容，当程序执行时，用户在文本框输入的内容会自动保存在该属性中，题中语句 Text1．Text+Text2. Text是实现将两文本框中内容的简单连接。故选项C正确。
第16题：

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Textl、Labell和Command1，然后编写如下两个事件过程：
Private Sub Commandl_Click()
S$=InputBox(”请输入一个字符串”)
Textl．Text=S$
End Sub
Private Sub Textl Change()
Label1．Caption=UCase(Mid(Text1．Text，7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，则在标签中显示的内容是【】。

正确答案：BASIC
BASIC 解析：MID返回文本字符串中从指定位置开始的特定数目的字符，其格式为：MID(text，start num，hum—chars)，Text包含要提取字符的文本字符串。Start—num文本中要提取的第一个字符的位置。因此，本题是要截取“VisualBasic”从第7个字符起右侧的所有字符。UCase函数将小写字母转换为大写字母。
第17题：

在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：
Private Sub Command1 Click()
Text3=Text1+Text2
End Sub
Private Sub Forml Load()
Text1＝""
Text2=""
Text3=""
End Sub
打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【】。

正确答案：57
57 解析：本题考查对“+”的理解。在VBA中，“+”既可以用作数学运算符，也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接，然后在第3个文本框中显示，所以应该是57，在连接字符串方面，“+”和“&”是相同的功能，但“&”只能用来连接字符串，而不能进行数学运算。命令按钮 Command1的Click事件是：Text3=Text1-1-Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中，窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后，单击命令按钮来触发其Click事件，完成两个字符串的连接。
第18题：

在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Commandl_Ciick() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是______。
A． 108
B．18
C．810
D．出错

正确答案：A
解析：“+”是加号运算符，如果“+”加号两边的表达式都是String型，则“+”起连接作用，InputBox返回的是一个字符型。所以本题是做字符串连接，故答案是108。
第19题：

假定有如下的Sub过程： Sub sfun（X As Single，Y As Single）t=Xx=t／yY=tModYEnd Sub在窗体上添加一个命令按钮（名为Commandl），然后编写如下事件过程： Private Sub Commandl_Click（） Dim aAs singleDimbAs singlea=5b=4sfun a，bMsgBox a&；chr（10）+chr（131&；bEndSub打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为（）。
A.1和1
B.1．25和1
C.1．25和4
D.5和4

正确答案：B
B．【解析】本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本例就是传址传递，所以过程调用时x=a，也就是5；y=b，也就是4。在过程内X的值变为5／4也就是1．25，Y的值变为5Mod4也就是1。过程调用结束时X和y的值分别回送给a和b。
第20题：

在窗体中添加了一个文本框和一个命令按钮（名称分别为Textl和Commandl），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是（）。
A.Private Sub Commandl．Click（） Caption=”Access模拟”Commandl．
B.Private Sub Textl click（） Caption=”Access模拟”EndSubEndSub
C.Private SUb Commandl Change（） Caption=”Access模拟”Commandl．
D.Private Sub Textl_Change（） Caption=”Access模拟”End SubEnd Sub

正确答案：D
暂无解析，请参考用户分享笔记
第21题：

在名为“Form1”的窗体上添加三个文本框和一个命令按钮，其名称分别为“txt1”、“txt2”、“txt3”和“Command1”，然后编写如下两个事件过程：
Private Sub Command1_Click()
txt3=txt1+txt2
End Sub
Private Sub Form. l_Load()
txt1=" "
txt2=" "
txt3=" "
End Sub
当打开窗体Form. 1后，在txt1和txt2中分别输入3和5，然后单击命令按钮Command1，则文本框txt3中显示的内容为______。

正确答案：35
35 解析：本题考查控件类型以及VBA中对应的运算知识。在 VBA中的“+”有两种作用，如果“+”两端的操作数为数值型，则“+”完成算术加法；如果“+”两端的操作数为字符串，则“+”完成字符串的连接。在本题中由于txt1和txt2都是文本框，故此输入的数据都作为字符串处理，所以实际结果应该是35。
第22题：

在名为”Forml”的窗体上添加三个文本框和一个命令按钮，其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”，然后编写如下两个事件过程：

正确答案：
510【解析】本题考查“ ”运算符的使用。“ ”运算符可以用于计算两个数之和，也可以使用“ ”运算符连接两个字符串，“ ”，运算符两端的表达式的基本类型决定了“ ”运算符所做的操作，如果两个表达式都是数值或者一个表达式是数值，另一个表达式是字符串，则“ ”代表相加；如果两个表达式都是字符串则“ ”代表字符串的连接。本题中，由于文本框的Text属性值的类型是字符串，所以“ ”运算符连接的是字符串…5和字符串“10”，所以本题答案为510。
第23题：

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

正确答案：
15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。

题目

相似考题

相关内容