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

[主观题]

在窗体上画一个文本框，名称为Text1（可显示多行)，然后再画三个命令按钮，名称分别为Commandl、Comma

在窗体上画一个文本框，名称为Text1(可显示多行)，然后再画三个命令按钮，名称分别为Commandl、Command2和Command3，标题分别为“读数”、“统计”和“存盘”，如图8所示。程序的其功能是：单击“读数”按钮，则把考生目录下的in5．txt文件中的所有英文字符放入Text1 (可多行显示)；单击“统计”按钮，找出并统计英文字母i、i、k、l、m、n(不区分大小写)各自出现的次数；单击“存盘”按钮，将字母i～n出现次数的统计结果依次存到考生目录下的顺序文件out5．txt中。注意：存盘时必须存放在考生文件夹下，工程文件名为sit5．vbp，窗体文件名为sjt5．frm。

在窗体上画一个文本框，名称为Text1（可显示多行)，然后再画三个命令按钮，名称分别为Command

查看答案

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

您可能会需要：

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

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

更多“在窗体上画一个文本框，名称为Text1（可显示多行)，然后再…”相关的问题

第1题

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

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

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

B．Private Sub Label 1_Change() Label1．Caption=Text1．Text End Sub

C．Private Sub Text1_Click() Label1．Caption=Text1．text End Sub

D．Private Sub Label1_Click() Label1．Caption=Text1．Text End sot

点击查看答案

第2题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如下事件过程： Privat

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如下事件过程：

Private Sub Command1_Click()

Dim i As Integer, n As Integer

n=0

For i=0 To 50

i=i+3

n=n+1

If i＞10 Then Exit For

Next i

Text1.Text=Str(n)

End Sub

程序运行后，单击命令按钮，在文本框中显示的值是______。

点击查看答案

第3题

设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编

设有如下通用过程：设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（）。

A. 30

B. 25

C. 20

D. 15

点击查看答案

第4题

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

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labe11)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。下列可以实现上述操作的事件过程是（）。

A.Private Sub Text1 Change（）

Labe11．Caption=Str(Len(Text1．Text))

End Sub

B.Private Sub Text1 Click（）

Labe11．Caption=str(Len(Text1．Text))

End Sub

C.Private Sub Text1 Change（）

Labe11．Caption=Text1．Text

End Sub

D.Private Sub Labe1 1_Change（）

Labe11．Caption=Str(Len(Text1．Text))

End Sub

点击查看答案

第5题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写．如下事件过程：Priv

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写．如下事件过程： Private Sub Command1_Click() Dim array1(10，10)As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i+j Next j Next i Text1.Text=array1(2，3)+arrayl(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是______。

A．12

B．13

C．14

D．15

点击查看答案

第6题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Pri

vate Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是

A． Visual

B．Basic

C．Program

D．出错

点击查看答案

第7题

在窗体上画一个命令按钮（名称为Command1)和一个文本框（名称为Text1)，然后编写如下事件过程： Priv

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

点击查看答案

第8题

在窗体上画一个水平滚动条，名称为HScroll1;再画一个文本框，名称为Text1。要想使用滚动条滑块的变化量来调用文本框中文字的大小，则可满足的语句是()。

A.Text1.FontName= HScroll1.Max

B.Text1.FontSize= HScroll1.Min

C.Text1.FontSize= HScroll1.value

D.Text1.FontBold= HScroll1.value

点击查看答案

第9题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Priva

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10，10)As Integer Dim i,j As Integer For i；1 TO 3 For i=2 To 4 array1(i,j)=i+j Next j Next i TextText=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，则文本框中显示的值是 ______。

A．12

B．13

C．14

D．15

点击查看答案

第10题

在窗体上画一个名称为Text1的文本框，并编写如下程序：Private Sub Form_Load（)ShowText1.Text="Te

在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" Text1.SetFocus End Sub Phvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single，Y As Single) Phnt“程序设计” End Sub Private Sub Textl_KeyDow

A．Visual Basic

B．程序设计

C．A程序设计

D．VisualBasic程序设计

点击查看答案

第11题

在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程：Pfivate Sub Text1_KeyPress（Keyasc

在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程：Pfivate Sub Text1_KeyPress(Keyascii As Integer) … End Sub 若焦点位于文本框中，则能够触发此事件的操作是()。

A．单击文本框

B．双击文本框

C．单击文本框

D．按键盘上的某个键