visualbasic程序设计典型例题解析(2)

《visualbasic程序设计典型例题解析(2)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualBasic程序设计典型例题解析（2）一、填空题1．以顺序输入模式打开“c:source1.txt”文件的命令是（1）；以输出方式打开“c:source2.txt”文件的命令是（2）。分析：Print#语句用于将把数据写入文件中。Print语句格式为：Open文件名[For模式]As[#]文件号“For模式”为指定打开文件的模式是数据的输入模式还是输出模式。结论：答案应为：（1）Open"c:source1.txt"ForInputAs#1（2）Open"c:source2.txt"ForOutputAs#22.在Vi

2、sualBasic中，文件系统控件包括（1）、（2）和文件列表框（FileListBox）。三者协同操作可以访问任意位置的目录和文件，可以进行文件系统的人机交互管理。分析：在VisualBasic中，文件系统控件包括驱动器列表框（DriveListBox）、目录列表框（DirListBox）和文件列表框（FileListBox）。驱动器列表框可以选择或设置一个驱动器，目录列表框可以查找或设置指定驱动器中的目录，文件列表框可以查找指定驱动器指定目录中文件信息，三者协同操作可以访问任意位置的目录和文件，可以进行文件系统的人机交互管理。结论：

3、答案应为：（1）驱动器列表框（DriveListBox）（2）目录列表框（DirListBox）3．每次重新设置驱动器列表框的Drive属性时，都将引发（1）事件。可在该事件过程中编写代码修改目录列表框的路径，使目录列表框内容随之发生改变。分析：在VisualBasic中，每次重新设置驱动器列表框的Drive属性时，都将引发Change事件。可在Change事件过程中编写代码修改目录列表框的路径，使目录列表框内容随之发生改变。驱动器列表框的默认名称为Drive1，其Change事件过程的开头为Drive1_Change()。结论：答案应

4、为：（1）Change4．目录列表框用来显示当前驱动器下目录结构。刚建立时显示（1）的顶层目录和当前目录，如果要显示其他驱动器上的目录信息，必须改变路径，即重新设置目录列表框的（2）属性。分析：在VisualBasic中，目录列表框用来显示当前驱动器下目录结构。刚建立时显示当前驱动器的顶层目录和当前目录，如果要显示其他驱动器上的目录，必须改变路径，即重新设置目录列表框的Path属性。结论：答案应为：（1）当前驱动器（2）Path5．对驱动器列表框来说，每次重新设置驱动器列表框的（1）属性时，将引发Change事件；对目录列表框来说，当（

5、2）属性值改变时，将引发Change事件；对于文件列表框，重新设置的（3）属性，将引发Change事件。分析：在Visual10Basic中，对驱动器列表框来说，每次重新设置驱动器列表框的Drive属性时，将引发Change事件；对于目录列表框和文件列表框改变路径，即重新设置列表框的Path属性，将引发Change事件。结论：答案应为：（1）Drive（2）Path（3）Path6．以下程序段简要说明驱动器列表框、目录列表框及文件列表框三者协同工作的情况。将程序段补充完整。PrivateSubDrive1_Change()（1）EndS

6、ubPrivateSubDir1_Change()（2）EndSub分析：首先设置目录列表路径随驱动器列表路径改变而改变：每当改变驱动器列表框的Drive属性时，将产生驱动器列表框的Change事件，执行Drive1_Change事件过程，使驱动器列表框和目录列表框同步，即将目录列表框中的目录（Dir1.Path属性）变为该驱动器的目录（Drive1.Drive属性）。然后，设置文件列表路径随目录列表路径改变而改变：当目录列表框Path属性的改变时，将产生目录列表框的Change事件，执行Dir1_Change事件过程，使目录列表框和文

7、件列表框同步，即在文件列表框（File1.Path属性）中显示目录驱动器所指目录下的文件信息（Dir1.Path属性）。这样三个文件系统控件就协同工作了。结论：答案应为：（1）Dir1.Path=Drive1.Drive（2）File1.Path=Dir1.Path7.为了在运行时把当前路径下的图形文件picturefile.jpg装入图片框Picture1，所使用的语句为（1）。分析：可以使用LoadPicture语句，必须先确定图片的位置，在本例中路径为当前路径可以采用默认路径；也可以在Picture1的Picture属性中直接设置

8、打开文件对话框，在对话框中选择图片进行设置。结论：答案应为：Picture1.Picture=LoadPrcture(“picturefile.jpg”)8.窗体Form1的左上角坐标为（0,600）窗体F