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

[主观题]

在窗体上画一个文本框，然后编写如下事件过程：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

查看答案

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

您可能会需要：

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

安装赏学吧APP，拍照搜题省时又省心！

更多“在窗体上画一个文本框，然后编写如下事件过程：Private …”相关的问题

第1题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（)x=InputBox（"请输入一个整

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

A． 123

B．456

C．479

D．123456

点击查看答案

第2题

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Textl.

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

Private Sub Form_Click()

Textl.Text="VB程序设计"

End Sub

Private Sub Textl_Change()

Picturel.Print"VB programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是【】，而在图片框中显示的内容是【】。

点击查看答案

第3题

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： PrivateSubForm_Click（）

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

Private Sub Form_Click（）

Text1.Text = "VB程序设计"

End Sub

Private Sub Text1_Change（）

Picture1.Print "VB Programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是_____。

点击查看答案

第4题

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click（)x=InputBox（“请输入一个

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

A．123

B．456

C．579

D．123456

点击查看答案

第5题

（10）在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_Click（) Te

（10）在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是，而在图片框中显示的内容是。

点击查看答案

第6题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress（KeyAscii As Integer)

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char = Chr(KeyAscii) KeyAscii = Asc(Ucase(char)) Print String(6, KeyAscii)End Sub 程序运行后，如果在键盘上输入字母a，则窗体上显示的内容为______。

A．a

B．A

C．aaaaaa

D．AAA

点击查看答案

第7题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_KeyPress（KeyAscii As Integer)D

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。

A．a

B．A

C．aaaaaaa

D．AAAAAAA

点击查看答案

第8题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_KeyPress（KeyAscii As Integer)D

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(6,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。

A．a

B．A

C．aaaaaaa

D．AAAAAAA

点击查看答案

第9题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_KeyPress（KeyAscii As Integer)D

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) TextText=String(6, KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为______。

A．a

B．A

C．aaaaaaa

D．AAAAAAA

点击查看答案