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

[主观题]

在窗体上面有一个文本框，其名称为Text1，编写如下事件过程：Private Sub Text1_KeyPress（KeyAscii

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

A．aaa

B．AAA

C．AA

D．aa

查看答案

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

您可能会需要：

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

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

更多“在窗体上面有一个文本框，其名称为Text1，编写如下事件过程…”相关的问题

第1题

在窗体上面有一个文本框，其名称为Text1，然后编写如下事件过程：Private Sub Text1_KeyPress（KeyAs

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

A．aaa

B．AAA

C．AA

D．aa

点击查看答案

第2题

在窗体上添加一个文本框，其名称为text1，然后编写如下的Load事件过程，则该程序的运行结果是______

。Private Sub form_ load Text1. Text = " " t = 1 for k = 10 To 6 Step -2 t= t* k Next k Text1. Text = tEnd Sub

A．在文本框中显示120

B．文本框中仍为空

C．在文本框中显示480

D．出错

点击查看答案

第3题

有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为Command1，

标题为“确定”。再画5个单选按钮，名称分别为option1、Option2、 Option3、Option4和Option5，标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”，如图26所示。

有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为C

编写适当事件过程。选中一个单选按钮，并单击“确定”按钮，按照表3-1在文本框中显示相应的内容。

有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为C

提供Command1对象的Click事件源代码如下，请补充完整。

Private Sub Command1_Click()

If ？ Then

Text1.Text="需要1小时"

End If

If ？ Then

Text1. Text="需要10小时"

End If

If ？ Then

Text1. Text="需要20小时"

End If

If ？ Then

Text1. Text="需要100小时"

End If

If ？ Then

Text1.Text ="需要500小时"

End If

End Sub

注意：不得修改已经给出的程序。在结束程序运行之前，必须选择进行上面的一种操作．退出程序时必须通过单击窗体右上角的关闭按钮．存盘时必须存放在考生丈件夹下，工程文件名为ylc6.vbp，窗体文件名为ylc6.frm．

点击查看答案

第4题

在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设

置为True，然后编写如下的事件过程：

Private SUb Form_CnCk()

Open"d:\tes\smtext1.txt"For Input AS 1

Do While Not EOF(1)

Line Iput 1,aspect$

whole$=whole$+aspect$+Chf$(13)+Chr$(10)

Loop

点击查看答案

第5题

窗体上画一个文本框（其名称为Text1)和一个标签（其名称为Labell)。要求程序运行后，如果在文本框中

窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是：_______。

A．Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub

B．Private Sub Text1_Click() Labell.Caption=Text1.Text End Sub

C．Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub

D．Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub

点击查看答案

第6题

在窗体上画一个文本框（其名称为Text1)和一个标签（其名称为Labe11)，程序运行后，如果在文本框中输

在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是()。在窗体上画一个文本框（其名称为Text1)和一个标签（其名称为Labe11)，程序运行后，如果在文本

点击查看答案

第7题

在窗体上画一个文本框，其名称为Textl，然后编写如下程序：程序运行后，单击窗体，在文本框中显示的内

在窗体上画一个文本框，其名称为Textl，然后编写如下程序：

在窗体上画一个文本框，其名称为Textl，然后编写如下程序：程序运行后，单击窗体，在文本框中显示的内

程序运行后，单击窗体，在文本框中显示的内容是

A.7

B.8

C.9

D.10

点击查看答案

第8题

在名为Form1的窗体上绘制一个水平滚动条，其名称为HS1，设置滚动框Min属性为 1000，Max属性为2000，L

argeChange属性为100，SmailChange属性为2；然后再绘制一个文本框，其名称为Text1，初始内容为空白。编写适当的事件过程，使程序运行后，移动滚动框，则在文本框中显示滚动框的当前位置。程序的运行情况如下图所示。

在名为Form1的窗体上绘制一个水平滚动条，其名称为HS1，设置滚动框Min属性为 1000，Max

注意：

不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为execise98.vbp，窗体文件名为execise98.frm。

点击查看答案

第9题

在名为Form1的窗体上绘制一个文本框，其名称为Text1。编写适当的事件过程，程使序运行后，若单击窗体

，则可使文本框移到窗体的左上角；而如果在文本框中输入信息，则可使文本框移到窗体的右上角。程序的运行情况如下图所示。

在名为Form1的窗体上绘制一个文本框，其名称为Text1。编写适当的事件过程，程使序运行后，若单击

注意：

不得使用任何变量，只允许通过修改属性的方式移动文本框：文件必须存放在考生文件夹中，工程文件名为execise112.vbp，窗体文件名为execise112.frm。

点击查看答案

第10题

在名为Foma1的窗体上绘制一个标签（名称为Lab1，标题为Input)、一个文本框（名称为Text1，Text属性为

在名为Foma1的窗体上绘制一个标签(名称为Lab1，标题为Input)、一个文本框(名称为Text1，Text属性为空白)和一个命令按钮(名称为Cmd1，标题为Display)。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入Visual Basic，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如下图所示。

在名为Foma1的窗体上绘制一个标签（名称为Lab1，标题为Input)、一个文本框（名称为Text