题目内容（请给出正确答案）

[主观题]

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：Dim y As IntegerPrivate

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：

Dim y As Integer

Private Sub Command1_Click()

Dim x As Integer

x=2

Text1.Text=p2(p1(x),y)

Text2.Text=p1(x)

End Sub

Private Function p1(x As Integer)As Integer

x=x+y:y=x+y

p1=x+y

End Function

Private Function p2(x As Integer,y As Integer)As Integer

p2=2*x+y

End Function

当单击1次和单击2次命令按钮后，文本框Textl和Text2内的值分别为()。

A．2 4 2 4

B．2 4 4 8

C．4 4 8 8

D．10 10 58 58

提问人：网友wisdom_sjb 发布时间：2022-01-07

参考答案

查看官方参考答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“窗体上有两个文本框Text1、Text2以及一个命令按钮Co…”相关的问题

第1题

窗体上有两个名称分别为 Text1 、 Text2 的文本框。 Text1 的 KeyUp 事件过程如下: Private Sub Text1_KeyUp（）

A.A

B.a

C.C

D.c

点击查看答案

第2题

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：Private Sub Text1_KeyUp

窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是()。

A．A

B．a

C．C

D．c

点击查看答案

第3题

在窗体上有两个命令按钮Command1和Commnd2，三个文本框Text1，Text2和Text3，有如下事件过程：Privat

在窗体上有两个命令按钮Command1和Commnd2，三个文本框Text1，Text2和Text3，有如下事件过程： Private Sub Comuand1_Click() Text3.Text= Text1.Text+Text2.Text End Sub Private Sub Command2_Click() Text3.Text= Text3.Text+Str(Val(Text1.Text)+Val (Text2.Text)) End Sub程序运行后，在Text1和Text2中分别输入123、456，然后依次单击Command1和Command2，则在Text3中显示的内容依次是______ 。

A．123456 579

B．123456 123456

C．579 579

D．579 123456

点击查看答案

第4题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：Dim y As IntegerPrivate S

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：

Dim y As Integer

Private Sub Command1_Click()

Dim x As Integer

x=2

Text1.Text=Fun2(Fun1(x),y)

Text2.Text=Fun1(x)

End Sub

Private Function Fun1(x As Integer) As Integer

x=x+y:y=x+y

Fun1=x+y

End Function

Private Function Fun2(x As Integer，y As Integer) As Integer

Fun2=2*x+y

End Function

当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是

A．2 4 2 4

B．2 4 4 8

C．10 10 58 58

D． 4 4 8 8

点击查看答案

第5题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序 Dim y As Integer Private

窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序

Dim y As Integer

Private Sub Command1_Click()

Dim x As Integer

x=2

Text1.Text=Fun2(Funl(x),y)

Text2.Text=Funl(x)

End Sub

Private Function Funl(x As Integer) As Integer

x=x+y ∶y=x+y

Funl=x+y

End Function

Private Function Fun2(x As Integer,y As Integer) As Integer

Fun2=2*x+y

End Function

当单击1次和单击2次命令按钮后,文本框Text1和Text2内的值分别是

A．2 4 2 4

B．2 4 4 8

C．10 10 58 58

D．4 4 8 8

点击查看答案

第6题

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：DimY As IntegerPrivate

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：

DimY As Integer

Private Sub Command1 Click（）

Dim X As Integer

x=2

Text1．Text=p2(p1(X)，Y)

Text2．Text=p1(x)

End Sub

Private Function p1(X As Integer)As Integer

x+x+v: y=x+y

p1=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

2 4

B.2 4

4 8

C.4 4

8 8

D.10 10

58 58

点击查看答案

第7题

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：Dim y As IntegerPrivate

窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：

Dim y As Integer

Private Sub Command1_Click()

Dim x As Integer

x=2

Text1.Text=p2(p1(x),y)

Text2.Text=p1(x)

End Sub

Private Function p1(x As Integer)As Integer

x=x+y:y=x+y

p1=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 2 4

B．2 4 4 8

C．4 4 8 8

D．10 10 58 58

点击查看答案

第8题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：Dim y As IntegerPrivate S

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(pl(x),y) Text2.Text=pl(x) End Sub Private Function pl(x As Integer)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 2 4

B．2 4 4 8

C．10 10 58 58

D．4 4

点击查看答案

第9题

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：Dim y As IntegerPrivate S

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=Fun2(Funl(x),y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer)As Integer x=x+y y=x+y Fun1=x+y End Function Private Function Fun2(x As Integer,y As Integer)As Integer Fun2=2*x+y End Function 当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是

A．2 4 2 4

B．2 4 4 8

C．10 10 58 58

D．4 4 8 8

点击查看答案

第10题

窗体上有一个名为List1的列表框，其中已经输入了若干个项目（如图所示)；还有两个文本框，名称分别为

窗体上有一个名为List1的列表框，其中已经输入了若干个项目(如图所示)；

窗体上有一个名为List1的列表框，其中已经输入了若干个项目（如图所示)；还有两个文本框，名称分别为

还有两个文本框，名称分别为Text1、Text2，一个名称为Command1的命令按钮，并有以下程序： Private Sub Command1_Click() Dim str As String,s As String,k As Integer s=Text1 str="" For k=List1.ListCount-1 To 0 Step-1 IfInStr(List1.List(k),s)＞0 Then str=str&List1.List(k)&" " End If Next k If str="" Then Text2="没有匹配项目" Else Text2=str End If End Sub 程序运行时，在Text1中输入“京”，单击命令按钮，则在Text2中显示的内容是______。

A．京

B．北京南京

C．南京北京

D．没有匹配的项目

点击查看答案

警告：系统检测到您的账号存在安全风险

为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！

微信搜一搜

简答题

点击打开微信

警告：系统检测到您的账号存在安全风险

抱歉，您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封，或联系客服。

微信搜一搜

简答题

点击打开微信