首页 > 远程教育> 国家开放大学

网友您好，请在下方输入框内输入要搜索的题目：

请输入或粘贴题目内容搜题

搜题

拍照、语音搜题，请扫码下载APP

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

[主观题]

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()Dim x As Integerx = V

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（)Dim x As Integerx = V

在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click()

Dim x As Integer

x = Val(InputBox("请输入一个整数"))

Print x + Text1.Text

End Sub

程序运行时，在文本框中输入12，然后单击窗体，在输入对话框中输入34，单击"确定"按钮后，在窗体上显示的内容为______。

A.46

B.123

C.3412

D.1234

答案

查看答案

发布时间：2021-07-21

更多“在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()Dim x As Integerx = V”相关的问题

第1题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（)x = InputBox（"请输入一个整数")Print x + TextTextEnd Sub程序运行时，在文本框中输入然后单击窗体，在输入对话框中输入单击“确定”按钮后，在窗体上显示的内容是：（）

A.123

B.456

C.579

D.123456

点击查看答案

第2题

在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Comma

nd1_Click() Text1．Text="计算机" TextText=Text1．Text Text1．Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框(Text1和Text2)中的内容分别为【】和【】。

点击查看答案

第3题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text然后编写如下程序： Private Sub Command1_Click（) a=InputBox（“请输入日期（1~31）”) t=”旅游景点：” _ & IIf （a >0 And a<= 10,”长城”,””) _ & iif （a >10 And a<= 20,”故宫”,””) _ &

A.旅游景点：长城故宫

B.旅游景点：长城颐和园

C.旅游景点：颐和园

D.旅游景点：故宫

点击查看答案

第4题

窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox（

窗体上有一个命令按钮Command1，编写如下事件过程：

Private Sub Command1_Click()

x = InputBox("x=")

y = InputBox("y=")

Print x + y

End Sub

运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是()。

A、 444

B、 123321

C、 123+321

D、出错信息

点击查看答案

第5题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程： Private Sub Form_Load

() Show Text1.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为【】。

点击查看答案

第6题

创建学生信息查询窗体，如图5－44所示，在窗体的文本框中输入读者姓名，单击【查询】按钮可显示该学生的相关信息，

创建学生信息查询窗体，如图5-44所示，在窗体的文本框中输入读者姓名，单击【查询】按钮可显示该学生的相关信息，如图5-45所示。

点击查看答案

第7题

P53.窗体上有一个名为text1的文本框和一个名为command1的命令按钮,事件过程如下程序运行时单击命令按钮,文本框中显示的值是（）

A.2

B.3

C.4

D.5

点击查看答案

第8题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Comma

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。

A．4

B．5

C．6

D．7

点击查看答案

第9题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Di

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do Until num＞6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．13.45.8

B．135

C．1 4 7

D．无数据输出

点击查看答案