在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为e盘，选择File1中所列的图片文件（*.bmp，*.gif和*.jpg），则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。程序运行结果如下图所示。 程序如下，请补充完整。
在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为e盘，选择File1中所列的图片文件（*.bmp，*.gif和*.jpg），则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。程序运行结果如下图所示。 
程序如下，请补充完整。 
程序如下，请补充完整。 
参考解析
略
相关考题：
阅读以下说明和Visual Basic代码，将应填入(n)处的字句写在对应栏内。[说明]本程序实现的功能是查看磁盘上的图片及其基本信息。程序运行界面如下图所示，用户只要逐步选择适当的驱动器、目录和图片文件，图片内容随即显示在界面中央，文件的基本信息则呈现于右侧文本框中。用户还可以删除或复制选中的图片文件。在开发过程中，驱动器列表框名为Drivel，目录列表框名为Dir1，文件列表框名为File1，图片的显示由Image控件对象Image1来实现，文件信息文本框名为Text1，按钮“删除文件”和“复制到…”分别名为CmdDel和CmdCpy。[Visual Basic代码]Dim filename As StringDim fso As New (1), file As filePrivate Sub Form_Load()Set fso = CreateObject("Scripting.FileSystemObject")Drivel.Drive = "F:"End SubPrivate Sub Dir1_Change()File1.path=Dirl.path ’更新文件列表框的路径End SubPrivate Sub Drive1_Change()Dir1.path =(2) ’更新目录列表框的路径End SubPrivate Sub File1_Click()’文件列表框的单击事件响应代码If Right(Dir1.path, 1) ＜＞"\" Thenfilename = Dir1.path "\" Filel.filenameElsefilename = Dir1.path Filel.filenameEnd IfImage1.Picture =(3)Set file = fso.GetFile(filename)Text1. Text = "文件名称:" file.Name vbCrLf _"文件大小:" file. Size "字节" vbCrLf _"文件类型:" file.Type vbCrLf _"创建日期:" file. DateCreated vbCrLf _"修改日期:" file. DateLastModifiedEnd SubPrivate Sub CmdCpy_Chck()’按钮“复制到…”的单击事件响应代码Dim path As Stringpath = InputBox("请输入目标路径(含文件名):")(4)End SubPrivate Sub CmdDel_Click()’按钮“删除文件”的单击事件响应代码(5)End Sub
阅读以下应用说明及Visual Basic程序代码，根据要求回答问题1至问题4。[说明]某文件管理系统的图片浏览器如图3-19所示。运行程序时，用户只要通过驱动器列表框、目录列表框和文件列表框，选择文本文件所在的驱动器、文件夹及相应的文件名后，在图像框中将显示出相应的文件图像。在开发过程中，假设驱动器列表框名为drvFile，目录列表框名为 dirFile，文件列表框名为filFile，选择文件类型组合框名为cboFile，图像框名为IMG nClick=over(this) title=放大Show。图3-19 图片浏览器[Visual Basic程序]Private Sub Form_Load ()IMG nClick=over(this) title=放大Show.Stretch=TruecboFile.Addltem "位图文件(*.bmp)"cboFile.Addltem "图标文件(*.ico)"cboFile.Addltem "图元文件(*.wmf)"cboFile.Addltem "JPEG文件(*.jpg)"cboFile.Addltem "GIF文件(*.gif)"cboFile.ListIndex = 0(1)End SubPrivate Sub drvFile_Change ()(2)End SubPrivate Sub dirFile_Change ()(3)End SubPrivate Sub cboFile_Click ()(4)Case 0filFile. Pattern= "*.bmp"Case 1filFile. Pattern= "*.ico"Case 2filFile. Pattern= "*.wmf"Case 3filFile. Pattern= "*.jpg.Case 4filFile. Pattern= "*.gif"End SelectEnd SubPrivate Sub filFile_Click()If (5) ThenIMG nClick=over(this) title=放大Show. Picture= LoadPieture(filFile. Path+ filFile.FileName)ElseIMG nClick=over(this) title=放大Show. Picture= LoadPicture( (6) + "\" + (7) )End IfEnd Sub请根据[说明]和图3-19的显示结果，从以下备选答案中为程序(1)～(7)空缺处选择正确的答案。[备选答案]A. filFile.path B. dirFile.Path=drvFile.DriveC．Right(filFile.Path，1) = "\" D．filFile.Pattern ="*.bmp"E．filFile.Path = dirFile.Path F．filFile.FileNameG．Select Case cboFile.ListIndex
在名为Form1的窗体上绘制一个图片框，名为Pic1，高为2000，宽为1500，并放入文件名为pic1.bmp的图片(如下图所示)。请编写适当的事件过程，使得在运行时，若双击窗体，则图片框中的图片消失。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise28.vbp，窗体文件名为execise28.frm。
在名称为Form1的窗体上画一个名称为Text1的文本框，通过属性窗口设置文本框属性，在文本框中显示“AAAA”(如图2—1所示)；再建立一个名称为Cmd1，标题为“清除”的命令按钮，编写适当的事件过程。要求程序运行后，如果单击“清除”命令按钮，则清除文本框中所显示的信息。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sit3.vbp。2．在考生文件夹中有工程文件sit4.vbp，它包含一个窗体文件form1。在窗体上有一个列表框，名称为List1，一个文本框，名称为Text1，和一个命令按钮，名称为Command1，标题为“复制”。要求程序运行后，在列表框中自动建立四个列表项，分别为“项目1”、“项目2”、“项目3”、“项目4”。如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本框中(程序运行结果如图2—2)。要求：编写程序，以实现试题要求的功能。注意：存盘时必须放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。
阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在答题纸的对应栏内。【说明】某个文本文件中存放了若干个非零数值有效数据，每个数据占一行，最后一行以数字“0”作为结束标志。下面的程序用于计算该文件中这些数据之和，其运行窗口如下。用户只要通过驱动器列表框、目录列表框和文件列表框，选择文本文件所在的驱动器、文件夹及相应的文件名，再单击“累计”按钮，就能在“总计”文本框中看到该文本文件中的数据之和。在开发过程中，设驱动器列表框名为Drivel，目录列表框名为Dirl，文件列表框名为Filel，存放数据的文本文件名为D：\test\vb7\datA．txt，“累计”按钮名为sum，“总计”文本框(TextBox)名为textl。【Visual Basic代码】Private Sub Drivel_Change()Dirl．Path=(1) '户选择的驱动器反映到目录列表框中End SubPrivate Sub Dirl_Change()Filel．Path=(2) '用户选择的文件夹改变文件列表框内容End SubPrivate Sub sum_Click()Dim (3) As New FileSystemOject, (4) As TextStxeam'创建自己的文件系统对象，说明自己的文本流对象If Right (Dirl．Path，1)="\"ThenSetmyTextFile=fso．OpenTextFile (Dirl．Path+Filel．FileNamc)ElseSetmyTextFile=fso．OpenTextFile(Dirl．Path+”\’+Filel．FileName)End“S=0Dod=Val (myTextFilE．ReadRow)S=S+dLoop While (5)Textl．Text=Str$(S)End Sub
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。1．在考生文件夹下打开工程sjt3.vbp，在窗体Form1上建立一个名称为Text1的文本框和一个名称为Command1，标题为“计算”的命令按钮(如图2—1所示)。程序运行后，单击“计算”命令按钮，通过在对话框输入整数10，放入整形变量a中，然后计算a!，(提示：运算结果应放入Long型变量中)，在文本框中显示结果，并把结果存入文件out3.txt中。在考生文件夹中有一个标准模块mode.bas，该模块中提供了保存文件的过程putdata，考生可以直接调用。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sjt3.vbp。2．在名称为Form1的窗体上画一个驱动器列表框，其名称为Driver1，再画一个目录列表框，其名称为Dir1；然后添加一个文件列表框，名称为File1。请设置适当的控件属性和编写适当的事件过程，使得在运行时，实现驱动器列表框、目录列表框和文件列表框的同步操作，且在列表框中只显示后缀名为exe的文件；如果双击文件列表框中的文件，则执行该文件(如图2—2所示)。程序中不得使用任何变量。已知；可以用Shell函数来运行可执行文件。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。
窗体上有一个名称为List1的列表框，一个名称为Picture1的图片框。Form. Load事件过程的作用是，把Data1．txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中，如图所示，以下是类型定义及程序，请填空。Private Type PicgNane As String*10 ’物品名称picFile As String*20 ’物品图片的图片文件名End TypeDime p(4)As Pic，pRec As PicPrivate Sub Form_Load()Open”Data1．txt”For Random As1______=Len(pRec)For i=0 To 4Get1，i+1，p(i)List 1，Addltem p(i)gNameNext iClose1End SubPrivate Sub List 1_DblClick()For i=0 To 4If RTrim(List1．List(i))=RTrim(________)ThenPicture1．Picture=LoadPicture(p(i)．_______)Exit ForEnd IfNextEnd Sub
在窗体上有一个名称为Drivel的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化，并且在标签Label1中显示当前文件夹中文件的数量。下列能够正确实现上述功能的程序是（ ）。
在考生文件夹下有一个工程文件execise59.vbp及窗体文件execise59.frm。在窗体上有两个命令按钮，名称分别为Cmd1和Cmd2，标题为“添加”和“清除”；一个文本框，名称为Text1，程序运行前，文本框的编辑区为空白；一个列表框，名称为List1。程序界面如下图所示。在文本框中输入文本，若单击“添加”按钮，则将文本框中的文本作为列表框的一个列表项添加到列表框的末尾，且使“添加”按钮变为无效，“清除”按钮变为有效：若单击“清除”按钮，则使文本框中的内容为空，且使“添加”按钮变为有效，“清除”按钮变为无效。要求：去掉程序中的注释“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。保存时，工程文件名仍为 execise59.vbp，窗体文件名仍为execise59.frm。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drivel、Dirl和Filel。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dirl_Change事件过程中应使用的语句是______。A．Dirvel.Drive=Dirl.PathB．Dirl.Path=Drivel.DriveC．Dirl.Path=Filel.PathD．Filel.Path=Dirl.Path
在考生文件夹中有一个工程文件execise41.vbp和窗体文件execise41.frm。在名为 Form1的窗体上有一个名称为Text1的文本框，一个名称为Lid1的列表框，一个命令按钮 (名为Cmd1，标题为Insert)，如下图所示。程序的功能是：在运行时，如果在文本框中输入一行内容并单击Insert按钮，则把文本框中的内容作为列表项添加到列表框中；如果单击列表框中的某一项，则立即从列表框中删除该项。要求：去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序的其他部分，也不得修改控件的属性。最后原名保存修改后的文件。
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求；修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
在名为Form1的窗体上绘制一个文本框，名为Text1，无初始内容；再绘制—个图片框，名为Pic1。请编写Text1的Change事件过程，使得在运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容。运行时的窗体如下图所示。注意：程序中不能使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise68.vbp，窗体文件名为execise68.frm。
在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1，标题为“显示”的命令按钮，一个名称为List1的列表框。要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求：修改列表框的适当属性，使得运行时可以多选；去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
在考生目录下有一个工程文件sjt4．vbp。窗体上已有文本框Textl和图片框Picturel（两者位置重叠），并建立了菜单。要求单击“显示图片”菜单项时，隐藏文本框，在图片框中显示图片Pie4．bmp，同时将该菜单标题改为“清空图片”；单击“清空图片”菜单项时，清除图片框中的图片，同时将菜单标题改为“显示图片”；单击“显示文本”菜单项，则隐藏图片框，并将指定文件的内容显示在文本框中。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容。最后把修改后的文件按原文件名存盘。
目录列表框的Path属性的作用是( )。A.显示当前驱动器或指定驱动器上的某目录下的文件名 目录列表框的Path属性的作用是（ ）。A.显示当前驱动器或指定驱动器上的某目录下的文件名B.显示当前驱动器或指定驱动器上的目录结构C.显示根目录下的文件名D.显示该路径下的文件
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change事件过程中应使用的语句是______。A．Dirve1. Drive=Dir1. PathB．Dit1. Path=Drive1. DriveC．Dir1. Path=File1. PathD．File1. Path=Dir1. Path
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change事件过程中应使用的语句是 ______。A．Dirvel.Drive=Dir1.PathB．Dir1.Path=Drive1.DriveC．Dir1.Path=File1.PathD．File1.Path=Dir1.Path
列表框应用程序。要求从文本框中输入姓名，然后按“添加”按钮，把姓名添加到列表框中；当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；当选择列表框中某一项后，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。程序运行结果下图所示。 程序如下，请补充完整。
编写一个列表框应用程序，程序界面如下图所示。设“添加”、“删除”和“修改”按钮的名称定义为cmdAdd、cmdDel和cmdUpdate，列表框和文本框的名称为默认。要求从文本框输入姓名，然后按“添加”按钮把姓名添加到列表框中；当选择列表框中某一项时，按“删除”按钮，从列表框中删除；当选择列表框中某一项时，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改的信息送到列表框且“修改确认”按钮变为“修改”。
判断题使用驱动器列表框、目录列表框和文件列表框构成一个文件管理系统时，三者之间可以实现自动同步，即当在驱动器列表框改变驱动器时，目录列表框和文件列表框的内容立即同跟着变。A对B错