有一文本框对象text1与公共变量y数据绑定，y当前值为字符串"

在窗体中有一个文本框Test1，编写事件代码如下： Private Sub Form_Click() X=Val(InputBox("输入X的值")) Y=1 If X＜＞0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是( )。

A．1

B．2

C．3

D．4

（13）语句Y=Y+1的正确含义是 A.变量Y的值与Y+1的值相等 B.将变量Y的值存到Y+1中去 C.讲变量Y的值加1后赋值给变量Y D.变量Y的值为1

若两变量x和y存在不完全相关关系，对于自变量x的任何一个值，因变量y（ ）。

A．有唯一确定的值与之对应

B．有若干个值与之对应

C．所有数值都与之对应

D．没有数值与之对应

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

Private Sub Command_Click()

Dim x AS Integer， y As Integer， z As Integer

x=5:y=7:z=0

Me!Textl=””

Call pl(x，y，z)

Me!Text1=z

End Sub

Sub pl(a As Integer，b As Integer，c As Integer)

C=a+b

End Sub

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

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

Private Sub Command1_Click()

Dim x As Integer，y As Integer，z As Integer

x=5：y=7：z=0

Me!Text1=””

Call p1(x,y,z)

Me!Text1=z

End Sub

Sub p1(a As Integer，b As Integer，c As Integer)

c=a+b

End Sub

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

逻辑变量x、Y进行逻辑“异或”(用表示)运算的含义是：若X、Y取值相同(都为 true或都为false)，则XY的值为false，否则XY的值为true。用逻辑“与”(∧)、“或” (∨)、“非”(-)表示XY的式子为(3)。

A．(X∧Y)∧(X∧Y)

B．(X∨Y)∧(X∨Y)

C．(X∧Y)∨(X∧Y)

D．(X∨Y)∨(X∨Y)

（30）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序： Dim y As Integer Private Sub Commandl_Click() Dim x As Integerx=2 Text1.Text=p2(pl(x),y) Text2.Text=p2(x) End Sub Private Function p2(x As Integer,y As Integer) x=x+y：y=x+y pl=x+y End Function Private Function p2(x As Integer,y As Integer)As Integer p2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为（ ）。A.2 4 B.2 4 C.4 4 D.10 10 2 4 4 8 8 8 58 58

（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：

Private sub form_click()

X=val(inputbox( “ 输入 x 的值 ” ))

Y=1

If x<> then y=2

Text1.value=y

End sub

打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是

A ） 1

B ） 2

C ） 3

D ） 4

下列语句： X=5 If X＞0 Then Y＝5 Y=10 运行程序后，下列叙述中正确的是 ______。

A．变量Y的值是5

B．变量Y的值是10

C．变量X的值是10

D．变量Y的值无法确定

在窗体上画一个命令按钮(名称为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的值变为______。