[试题]

(9)窗体上己有名称分别为Drive 1、Dirl、File 1的驱动器列表框、目录列表框和文件列表框,且有1个名称为Textl的文本框。以下程序的功能是:将指定位置中扩展名为".txt"的文件显示在Filel中,如果双击File 1中的某个文件,则在Textl中显示该文件的内容。

请填空。

Private Sub Form_ Load()

F.ilel.Pattern=(13)

E.nd Sub

Private Sub Drive 1_ Change()

D.ir 1.Path=Drive 1.Drive

E.nd Sub

Private Sub Dirl _Change()

F.ile 1.Path=Dirl.Path

E.nd Sub

Private Sub Filel_DblClick()

D.im s As String*1

If Right(Filel .Path, 1)="\"Then

f_ name=File 1.Path+File l .FileName

E.lse

f name=File 1.Path+"/"+File 1.FileName

E.nd If

Open f_ name(14)As#1

Text 1.Text=""

D.o While(15)

s=Input(1,#1)

Text 1 .Text=Text 1 .Text+s

Loop

C.lose#1

E.nd Sub

参考答案与解析:

相关试题

使用驱动器列表框drive1、目录列表框dir1、文件列表框file1时,需要设

[单选题]使用驱动器列表框drive1、目录列表框dir1、文件列表框file1时,需要设置控件的同步,以下能够正确设置两个控件同步的命令是A.)dir1.path=drive1.pathB.)file1.path=dir1.pathC.)file1.path=drive1.pathD.)drive1.drive=dir1.path

  • 查看答案
  • 窗体上有名为Drivel与Dirl的驱动器列表框与文件夹列表框,需要在选定驱动列

    [单选题]窗体上有名为Drivel与Dirl的驱动器列表框与文件夹列表框,需要在选定驱动列表框中的列表项时,文件夹表框中内容随之改变,正确的语句及语句的位置是()。A . Dir1.Path=Drive1.Drive′位于Drive1 Change()过程B . Dir1.Path=Drive1.Drive′位于Dir1 Change()过程C . Dir1.Path=Drive1.Path′位于Dir1 Change()过程D . Dir1.Path=Drive1.P

  • 查看答案
  • 假设有文件列表框File1、驱动器列表框Drive1和目录列表框Dir1,为了使

    [单选题]假设有文件列表框File1、驱动器列表框Drive1和目录列表框Dir1,为了使三者同步,在下列语句中,正确的语句是 ______。 Ⅰ.File1.Path=Dir1.Path Ⅱ.File1.FileName=Dirl.FileName Ⅲ.Dir1.Path=Drive1.Drive Ⅳ.Dir1.Path=Drive1.PathA.Ⅰ和ⅢB.Ⅰ和ⅣC.Ⅰ、Ⅲ和ⅣD.全部

  • 查看答案
  • 要使目录列表框(名称为Dir1)中的目录随着驱动器列表框(名称为Drive1)中

    [单选题]要使目录列表框(名称为Dir1)中的目录随着驱动器列表框(名称为Drive1)中所选择的当前驱动器的不同而同时发生变化,则应:A.在Dir1中的Change事件中,书写语句Dir1.Drive=Drive1.DriveB.在Dir1中的Change事件中,书写语句Dir1.Path=Drive1.DriveC.在Drive1中的Change事件中,书写语句Dir1.Path=Drive1.DriveD.在Drive1中的Change事件中,书写语句Dir1.Drive=Drive1.Drive

  • 查看答案
  • 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

    [单选题]在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是( )。A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_Change

  • 查看答案
  • 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

    [单选题]在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_Change

  • 查看答案
  • 在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。

    [单选题]在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时, 目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是 ______。A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_Change

  • 查看答案
  • 在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,

    [单选题]在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,两个名称分别为Label1、Label2、标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化,并且在标签Labell中显示当前文件夹中文件的数量。如下图所示。能够正确实现上述功能的程序是( )。A.B.C.D.

  • 查看答案
  • 在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框。

    [单选题]在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是A.Drivel changeB.Drive1_ClickC.Dirl_ClickD.Dirl_Change

  • 查看答案
  • 在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Driv

    [单选题]在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_Change事件过程中应使用的语句是______。A.Dirve1. Drive=Dir1. PathB.Dit1. Path=Drive1. DriveC.Dir1. Path=File1. PathD.File1. Path=Dir1. Path

  • 查看答案