更多"某人编写了下面的程序，希望能把Text1文本框中的内容写到out.tx"的相关试题:
[单项选择]某人编写了下面的程序，希望能把Text1文本框中的内容写到out.tXt文件中：
Private Sub Command1_Click（ ）
Open"out.txt"For Output As # 2
Print"Text1"
Close # 2
End Sub
调试时发现没有达到目的，为实现上述目的，应做的修改是( )
A. 把Print"Text1"改为Print # 2,Text1
B. 把Print"Text1"改为Print Text1
C. 把Print"Text1"改为Write"Text1"
D. 把所有#2改为#1
[单项选择]某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：
Private Sub Command1_Click（ ）
Open"out.dat"For Output As#2
Print"Text1"
Close#2
End sub
调试时发现没有达到目的，为实现上述目的，应做的修改是______。
A. 把所有#2改为#1
B. 把Print"Text1"改为Write"Text1"
C. 把Print"Text1"改为Print Text1
D. 把Print"Text1"改为Print#2，Text1
[单项选择]窗体上有名称为Command1的命令按钮和名称为Text1的文本框，编写如下程序：
Private Sub Command1_Click（ ）
Text1.Text="程序设计"
Text1.SetFocus
End Sub
Private Sub Text1_GotFocus（ ）
Text1.Text="等级考试"
End Sub
运行以上程序，单击命令按钮后______。
A. 文本框中显示的是"程序设计"，且焦点在文本框中
B. 文本框中显示的是"等级考试"，且焦点在文本框中
C. 文本框中显示的是"程序设计"，且焦点在命令按钮上
D. 文本框中显示的是"等级考试"，且焦点在命令按钮上
[单项选择]在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load( ) Show Text1. Text = " " Text1. SetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y _ As Single) Print "程序设计" End Sub Private Sub Text1_Ke!tDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic"; End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是 ______。
A. Visual Basic
B. 程序设计
C. A程序设计
D. Visual Basic程序设计
[单项选择]在窗体上画一个名称为Text1的文本框，并编写如下程序：
Private Sub Form_Load（ ）
Show
Text1.Text=""
Text1.SetFocus
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer, X As Single, Y As Single)
Print"程序设计"
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Print"VisualBasic";
End Sub
程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。
A. Visual Basic
B. 程序设计
C. A程序设计
D. Visual Basic程序设计
[单项选择]设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load（ ） Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_Mouse Up (Button As Integer，Shift As Integer，X As Single，Y As Single) Print"程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print"Visual Basic"； End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是（）。
A. Visual Basic
B. 程序设计
C. Visual Basic程序设计
D. a程序设计
[单项选择]文本框Text1的KeyDown事件过程如下：
Private Sub Text 1_KeyDown(KeyCode As Integer,Shift As Integer)
…
End Sub
其中参数KeyCode的值表示的是发生此事件时( )。
A. 是否按下了＜Alt＞键或＜Ertl＞键
B. 按下的是哪个数字键
C. 所按的键盘键的键码
D. 按下的是哪个鼠标键
[单项选择]文本框Text1的KeyDown事件过程如下：
Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)
End Sub
其中参数KeyCode的值表示的是发生此事件时( )
A. 是否按下了Alt键或Ctrl键
B. 按下的是哪个数字键
C. 所按的键盘键的键码
D. 按下的是哪个鼠标键
[单项选择]在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写如下程序： Private Sub Command1_Click（ ） A=InputBox("请输入日期(1～31)") t="旅游景点:" & IIf(A＞0 And A＜=10,"长城","")_ & IIf(A＞10 And A＜=20,"故宫","")_ & IIf(A＞20 And A＜=30,"颐和园","") Text1.Text=t End Sub 程序运行后，如果从键盘输入5，则在文本框中显示的内容是( )。
A. 旅游景点：长城
B. 旅游景点：长城颐和园
C. 旅游景点：颐和园
D. 旅游景点：故宫
[单项选择]在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写下列程序：
Private Sub Command1 click（ ）
A=InputBox("请输入日期(1～31)")
t="旅游景点："_
&Ⅱf(A＞0 And A＜=10,"长城","")_
&Ⅱf(A＞10 And A＜=20,"故宫","")_
&Ⅱf(A＞20 And A＜=30,"颐和园","")
Text1.Text=t
End Sub
程序运行后，如果从键盘输入5，则在文本框中显示的内容是( )。
A. 旅游景点：长城
B. 旅游景点：长城颐和园
C. 旅游景点：颐和园
D. 旅游景点：故宫
