更多"编写一个过程把C盘中的Config. sys文件内容读出，并在文本框中"的相关试题:
[填空题]编写一个过程把C盘中的Config. sys文件内容读出，并在文本框中显示出来。在窗体Form1建立一个文本框Text1，将其MultiLine属性设置为True,将ScrollBars属性设置为3-Both。根据题意。请完善下列程序。
option Explicit
Private Sub Form C1ick（ ）
Dim chl As String, fn As Integer
Dim Str As String
fn= 【13】
Open "C:/Config. sys" For Input As fn
Do While Not EOF( 【14】 )
Line Input #fn, chl
Str=Str+chl+vbCrLf
Loop
Text1. Text= 【15】
End Sub
[填空题]编写一过程将C盘中的Config.sys文件内容读出，并在文本框中显示出来。在窗体Form1上建立一个文本框Text1，将其MultiLine属性设置为True，ScrollBars属性设置为3-Both。给定的程序不完整，请将程序补充完整。
Option Explicit
Private Sub Form _Click（ ）
Dim ch1 As String，fn As Integer
Dim Str As String
fn= 【13】
Open "C:/Config.sys" For Input As fn
Do While Not EOF( 【14】 )
Line Input #fn, ch1
Str = Str + chl+ vbCrLf
Loop
Text1.Text = 【15】
End Sub
[单项选择]在窗体．上画一个列表框、一个文本框及一个按钮，然后编写如下事件过程： Prirate Sub Form_Loab（ ） List.Addltem"357" Llst.Addltem"246" List.Addltem"123" List.Addltem"456" TEXTl.Text="" End ub Private Sub Commandl_Click（ ） List.LiSdndex=3 Print List.Text+Textl.Text End Sub 程序运行后，在文本框中输入“789”，然后双列表框中的“456”，则输出结果为 ( )。
A. 789123
B. 456789
C. 789456
D. 1245
[单项选择]窗体上有一个列表框和一个文本框，编写下列两个事件过程：
Private Sub Form Load（ ）
List1.Addltem"北京"
List1.Addltem"天津"
List1.Addltem"上海"
Text1.Text=""
End Sub
Private Sub List1 Click（ ）
Print Text1.Text+List1.Text
End Sub
程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。
A. 中国北京
B. 中国天津
C. 中国上海
D. 北京中国
[单项选择]窗体上有一个列表框和一个文本框，编写下列两个事件过程：
Private Sub Form Load（ ）
List1.Addltem"北京"
List1.Addltem"天津"
List1.Addltem"上海"
Text1.Text=""
End Sub
Private Sub List1 Click（ ）
Print Text1.Text+List1.Text
End Sub
程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果是( )。
A. 中国北京
B. 中国天津
C. 中国上海
D. 北京中国
[单项选择]窗体上有一个列表框和一个文本框，编写如下两个事件过程：
Private Sub Form_Load（ ）
List1.Addltem "北京"
List1.Addltem "天津"
List1.Addltem "上海"
Text1.Text= ""
End Sub
Private Sub List1_Click（ ）
Print Text1.Text+List1.Text
End Sub
程序运行后，在文本框中输入“中国”，然后单击列表框中的“北京”，则输出结果为( )。
A. 中国北京
B. 中国天津
C. 中国上海
D. 北京中国
[单项选择]在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程。
Private Sub Form_Load（ ）
List.Addltem"357"
List.Addltem"246"
List.Addltem"123"
List.Addltem"456"
Text1.Text=""
End Sub
Private Sub Command1_C/ick（ ）
List. ListIndex=3
Print List.Text+Text1.Text
End Sub
程序运行后，在文本框中输入“789”，然后双列表框中的“456”，则输出结果为______。
A. 789123
B. 456789
C. 789456
D. 1245
[填空题]在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click( )
Text1.Text=“VB程序设计”
End Sub
PrivmeSubText1_Change（ ）
Picture1.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
[填空题]在窗体上绘制一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click（ ）
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change（ ）
Picturel.Print"VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 ______，而在图片框中显示的内容是 ______。
