在窗体form1上有一个驱动器列表控件Drivel，一个目录列表控件Dirl，一个文件列表控件File1，一个富文本控件Richtexbox1。要求程序运行以后，用户可以利用。Drivel选择不同驱动器，同时Dirl中显示当前选中的驱动器的目录，用户利用Dirl选择文件所在的文件夹，在Filel控件中将显示当前选中的文件夹下的文件，用户选中其中某个文件(假设为文本文件)，则该文件的内容显示在控件Richtexboxl中。补充相应的语句，使之完成所述的功能。
Private Sub Dirl_Change()
【8】
End Sub
Private Sub Drive1_Change()
【9】
End Sub
Private Sub Filel _Click()
Dim fname AS String
If 【10】 Then
fname=Filel．Path & Filel．FileName
Else
fname=Filel．Path& "\" & Filel．FileName
End If
RichTextBox1．LoadFile(fname)
End Sub
