计算机VB简单编程题目实训八.pptVIP

实训八 常用内部控件（二） 一、实训目的 1、掌握常用内部控件的主要属性、基本方法和重 要事件。 2、能够熟练地运用内部控件进行应用程序设计， 树立可视化的编程思想。 二、实训内容 1、列表框与组合框的应用 【实训要求】 设计一个用于设置字体属性的程序，界面如图： sx8_1. vbp 实训八 常用内部控件（二） 要求： （1）启动工程后，自动在“字体”列表框中列出当前系统中可用的屏幕字体供用户选择； （2）“字号”下拉组合框中列出部分字号供用户选择，默认值为10磅，用户也可根据需要在编辑区中直接输入字号大小； （3）所做的任何设置都直接在“示例”标签中显示效果，单击“取消”按钮将恢复初始设置，单击“确定”按钮将结束程序。 【实训步骤】 第1步：启动VB，打开一个新的标准工程。 第2步：在窗体上添加三个标签（Label1、Label2的 Caption 属性为空），二个组合框，一个框架，二个按钮，设置好属性后的状态如图所示： 第3步：编写相关控件的事件过程如下： Form_Load()的事件过程如下： Private Sub Form_Load() Dim i% For i = 0 To Screen.F