更多"在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为 "的相关试题:
[填空题]在名称为Form1的窗体上画一个名称为Text1的文本框，画一个名称为Command1的命令按钮。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。
请在空白处填上适当的内容，将程序补充完整。
Private Sub Command1_Click（ ）
Open "c:/test.dat" For Output As#1
For I=1 To Len(Text1.text)
(15) Next I
Ciose#1
End Sub
[单项选择]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：
Microsoft Visual Basic Programming
然后编写如下事件过程：
Private Sub Command1_CIick（ ）
Open"d:/temp/outf. txt" For Output As #1
For i=1 To Len(Text1. Text)
c=Mid(Text1. Text, i, 1)
If c＞="A" And c＜="Z" Then
Print #1, LCase(C)
End If
Next i
Close
End Sub
程序运行后，单击命令按钮，文件outf. txt中的内容是______。
A. MVBP
B. mvbp
C. M
D. m
[填空题]在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容，将程序补充完整。
Private Sub Command1_Click（ ）
Open"c:/test.dat"For Output As#1
Fori=1 to Len(Text1.Text)
(12)
Next
Close# i
End Sub
[单项选择]在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click（ ）
a = InputBox( "Enter an integer" )
b = Text1. Text
Text1. Text = b + a
End Sub
程序运行后，在文本框中输入456，然后单击命令按钮，在输入对话框中输入123，则文本框中显示的内容是( )。
A. 579
B. 123
C. 456123
D. 456
[单项选择]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写
如下事件过程：
Private Sub Command1_Click（ ）
Dim arrayl(10，10)As Integer
Dim i， j As Integer
For i=1 To 3
For j=2 To 4
arrayl(i，j)=i + j
Next j
Next i
Text1.Text=arrayl(2， 3)+arrayl(3， 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
A. 12
B. 13
C. 14
D. 15
[单项选择]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click（ ） Dim x，y，z As Integer x=5 y=7 z=0 Text1.Text=" " Call P1(x，y，z) Text1.Text=Str(z) End Sub Sub P1(ByVal a As Integer，ByVal b As Integer，c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是 ______ 。
A. 0
B. 12
C. Str(
D. 没有显示
