[单项选择]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
A. Private Sub Text 1_Change() Label 1．Caption=Str(Len(Text 1．Text)) End Sub
B. Private Sub Text 1_C lick() Label 1．Caption=Str(Len(Text 1．Text)1 End Sub
C. Private Sub Text 1_Change() Label 1．Caption=Text 1．Text End Sub
D. Private Sub Label 1_Change() Label 1．Caption=Str(Len(Text 1．Text)) End Sub

更多"在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1"的相关试题:

[单项选择]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是______。
A. Private Sub Text1_Change()Label1.Caption=Str(Len(Text1.Text))End Sub
B. Private Sub Text1_Click()Label1.Caption=Str(Len(Text1.Text))End Sub
C. Private Sub Text1_Change()Label1.Caption=Text1.TextEnd Sub
D. Private Sub Label1_Change()Label1.Caption=Str(Len(Text1.Text))End Sub

查看答案

[填空题]在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在______处填入适当的内容，将程序补充完整。
Private Sub Form_Load（　）
Command1.Enabled=False
End Sub
Private Sub Text1_ ______（　）
Command1.Enabled=True
End sub

查看答案

[填空题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在【6】处填入适当的内容，将程序补充完整。 Private Sub Form_Load( ) Command1.Enabled=False End Sub Private Sub Text1 【6】 ( ) Command1.Enabled=True End Sub

查看答案

[填空题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Colnmand1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮command1变为可用。请将程序补充完整。
Private Sub Form_Load（　）
Command 1.Enabled=False
End Sub
Private SubText1 【2】（　）
Command1.Enabled=True
End Sub

查看答案

[单项选择]在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1，然后编写如下两个事件过程：
Private Sub Command1_Click( )
　　a = InputBox("请输入一个字符串")
　　Text1.Text = a
End Sub
Private Sub Text1_Change( )
　　Label1.Caption = UCase(Mid(Text1.Text， 8))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串"Visual Basic"，则在标签中显示的内容是________。
A. visual basic
B. VISUAL BASIC
C. basic
D. BASIC

查看答案

[单项选择]在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
Private Sub Command1_Click（　）
strText=InputBox("请输入")
Text1. Text=strText
End Sub
Private Sub Text1_Change（　）
Label1. Caption=Right(Trim(Text1. Text), 3)
End Sub
程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是______。
A. 空
B. abcdef
C. abc
D. def

查看答案

[单项选择]在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Label1，文本框的Text1属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click（　）
x=Int(Val(Text1.Text)+0.5)
Label1.Caption=Str(x)
End Sub
程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是： ______。
A. 27
B. 28
C. 29
D. 30

查看答案

[单项选择]在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和 Command1，然后编写如下两个事件过程： Private Sub Command1_Click（　） str Text=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change（　） Label1.Caption=Right(Trim(Text1.Text)，3) End Sub 程序运行后，如果在对话框中输入abcdef，则在标签中显示的内容是 ______。
A. 空
B. abcdef
C. abc
D. def

查看答案

[单项选择]在窗体上画—个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：
Private sub Command1_Click( )
strText=lnputBox(“请输入”)
Text1.Text=strText
EndSub
Private Sub Text1_Change( )
Label1.Caption=Right(Trim(Text1.Text)，3)
End Sub
程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是
A. 空
B. abcdef
C. abe
D. def

查看答案

[单项选择]在窗体上画一文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为
A. Text1．Clear
B. Text1．Visible=False
C. Text1．Hide
D. Text1．Enabled=False

查看答案

[填空题]在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程：
Private Sub Form_Click( )
Open“d：/test/smText1.txt"For lnput As#1
Do While Not 【14】
Line lnput#1，aspect＄
whole＄=wholes+aspect＄+Chr＄(13)+Chr＄(10)
Loop
Text1.Text=whole＄
Close#1
Open“d：/test/smtext2.txt"For Output As #1
Print #1，【15】
Close#1
End Sub
上述程序的功能是，把磁盘文件，mText1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。

查看答案

[填空题]在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的 MultiLine属性设置为True，然后编写如下的事件过程： Private Sub Form_Click（　） 5 Open "d:/test/smtext1.txt" For Input As #1 Do While Not _________ Line Input #1, aspect$ whole$ = whole$ + aspect$ + Chr$(13) + Chr$(10) Loop Text1.Text = whole$ Close #1 Open "d:/test/smtext2.txt" For Output As #1 Print #1, _________ Close #1 End Sub 上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。

查看答案

我来回答:

提交