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

结论：答案应为：（1）Drive（2）Path（3）Path

6．以下程序段简要说明驱动器列表框、目录列表框及文件列表框三者协同工作的情况。将程序段补充完整。

Private Sub Drive1_Change() （1） End Sub

Private Sub Dir1_Change() （2） End Sub

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

目录列表框和文件列表框同步，即在文件列表框（File1.Path属性）中显示目录驱动器所指目录下的文件信息（Dir1.Path属性）。这样三个文件系统控件就协同工作了。

结论：答案应为：（1）Dir1.Path=Drive1.DriveFile1.Path=Dir1.Path

7.为了在运行时把当前路径下的图形文件picturefile.jpg装入图片框Picture1，所使用的语句为 （1） 。

分析：可以使用LoadPicture语句，必须先确定图片的位置，在本例中路径为当前路径可以采用默认路径；也可以在Picture1的Picture属性中直接设置打开文件对话框，在对话框中选择图片进行设置。

结论：答案应为：Picture1. Picture = LoadPrcture(“picturefile.jpg”)

8.窗体Form1的左上角坐标为（0,600）窗体Form1的右下角坐标为（800,-200）。X轴的正向向 （1） ，Y轴的正向向

（

2

）

（2） 。

分析：窗体右下角坐标为负值，说明Y轴的正向向上。

结论：答案应为：（1）右 （2）上 9.

执

行

指

令

\后，CurrentX＝ 。

分析：语句中Step(500,500)的意思是相对于当前点（200，200）的坐标，则当前坐标CurrentX＝700。 结论：答案应为700

10.执行指令\后，CurrentX＝ 。

分析：语句中 (500,500)即为当前点坐标， CurrentX＝500。 结论：答案应为500

11.要使图像框能够自动调整大小以适应其中的图形，应将图像框 属性设置为 。

分析：Stretch属性设置为False时，图像框可自动改变大小以适应其中的图形，设置为True时，加载到图像框的图形可自动调整尺寸以适应图像框的大小。

结论：答案应为（1）Stretch （2）False 12.ADO模型中一般可通过Connection对象的 （1） 方法执行增加、删除、修改操作。使用ADO模型时，建立Recordset和Connection

对象连接的属性是

（2） 。

分析：应记住

结论：Execute ActiveConnection

协议的通讯协议。

分析：应记住 结论：UDP

14.VB中设置断点的按键是 ，逐语句调试的语句是 。 结论：答案应为F9 F8

13.Winsock控件主要用来编制TCP/IP或