第2章控件的固有属性与结构设计.ppt

1．主要属性 Caption：在控件上显示文字 Font：设置文字字体。 AutoSize 和 WordWrap 属性：显示可变长度的行或变化的行数。 2．主要事件 单击（Click） 双击（DblClick） 改变（Change） Label 控件的主要作用是显示文本，一般不需要编写事件过程代码。 1．主要属性 （1）Text属性：文本内容。 （2）MaxLength属性:文本最大长度。 （3）MultiLine属性：多行显示。 （4）ScrollBars属性：滚动条。 （5）PasswordChar属性：密码。 （6）Alignment 属性：文本或数据的对齐方式。 2．主要事件 Change:文本改变 KeyPress：键盘敲击 3．主要方法 SetFocus：用来将光标从其他位置移动到文本框中。 如：Text1.setfocus 1．主要属性 （1）Caption属性：显示的文字 （2）Default默认属性：用户按回车可自动激活该按钮 （2）Style属性:按钮类型0—Standard标准1—Graphical图形 （3）Picture属性：图形背景 （4）ToolTipText：工具提示文字。 2.1.4 复选框（CheckBox） 2.1.5 单选按钮（OptionButton） 例2.1 复选框和单选按钮应用 例2.2 单选按钮、复选框应用 功能：电脑配置清单。 2.2 选择结构程序设计 一、单行If语句 1、格式语法 If 条件Then 语句组1[ Else 语句组2] 其中，If、 Then、 Else是关键字 输入框 我们知道，文本框可以接收用户的输入。输入框也可以接受用户的输入，但是其风格和用法有别于文本框。 VB提供的InputBox函数可生成输入框。 例如：p$=InputBox（请输入密码 ，密码框 ） 执行该语句后，屏幕上显示如图4-1所示的输入框。 用户可在文本区输入数据，然后按“确定”按钮，函数返回值是用户在文本区输入数据，其类型为字符型。如果用户然后按“取消”按钮，则函数返回值是空字符串。 每执行一次InputBox函数，用户只能输入一个数据，另外，输入框的样式是固定的，用户不能改变。用户能改变的是输入框的“提示”和“标题”的内容，“提示”和“标题”都是字符串表达式。 InputBox函数的一般格式： InputBox（提示[，标题][，缺省值][，x坐标位置][，y坐标位置]） 需要注意的是：各项参数次序必须一一对应，除了“提示”不能省略外，其余各项均可省略，但省略部分也要用逗号占位符跳过。 三、 块If的嵌套 所谓块If语句的嵌套，就是在语句块1或语句块2中又包含块If语句。 【例2.2】任意输入三个数，按照从大到小的顺序输出。 算法分析：排序的基本方法，就是比较大小，然后根据比较的结果分别加以处理。 本例把三个数分别放在A，B，C中。处理过程为：若AB为真， 交换A，B的值；否则不做处理。这样就保证了A≥B；然后再用C去比较。 具体流程如图2-3所示。按如图2-4所示设置界面。 属性设置如表2-2所示。 程序代码如下： 排序按钮代码 Private Sub Command1_Click() Dim a As Single, c As Single, b As Single a = Text1.Text b = Text2.Text c = Text3.Text 三个文本框的数据赋值给变量 If a b Then t = a a = b b = t ab时交换a、b的值 End If 保证AB If c a Then 用C去比较 Text4.Text = c CA成立，C最大 Text5.Text = a Text6.Text = b Else If c b Then Text4.Text = a CB成立，C最小 Text5.Text = b Text6.Text = c Else Text4.Text = a C处于中间 Text5.Text = c Text6.Text = b End If End If End Sub 退出按钮代码 Private Sub Command2_Click() End End Sub 注意： 1．保持块If结构的完整，不要漏掉End If。 2．尽量采用缩进式书写格式，使结构清晰。 3．尽量选择恰当的条件，使程序简单明了。 四、 Else If语句