浙江理工大学VB课后练习七答案.docVIP

第四节 教材习题解答 一、判断题 12.√ 3.√ 4.× 5.× 6.√ 7.√ 8.√ 9.√ 二、选择题 12．A 3．C 4．C 5．B 6．D 7．B 8．D 9．B 三、填空题 12. ShowFont 3. Color 4. 工程、部件 5. Action=1、ShowColor 6. Click 7.工具 8.代码窗口、Click 9. 相同、不小于0 四、程序阅读题 六、程序设计题 题1．程序代码如下 Private Sub Command1_Click() CommonDialog1.ShowOpen: Label1.Caption = CommonDialog1.FileName End Sub 题2．程序代码如下 Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Private Sub File1_Click() Label1.Caption = File1.Path + File1.FileName End Sub 题3．程序代码如下 Pri