程序设计基础－Visual Basic教程第7章 选择结构程序设计.pptVIP

7.4 其他应用举例 例7-10 调整3个文本框中的数值，使其中 的数值按小到大的顺序排放 第7章 选择结构程序设计 学习重点 If语句、IIf函数、Switch函数、Select Case语句的格式与使用。 If 语句的嵌套使用。 掌握常用的选择结构算法。 本章内容 7.1 If语句 7.2 Select Case语句 7.3 基本算法及应用 7.4 其他应用举例 本章小结 7.1 If语句 If…Then…结构 格式1 块形式： If 条件表达式 Then 语句体 End If 格式2 单行形式： If 条件表达式 Then 语句体 7.1 If语句 例7-1 电子闹钟设计，主要利用文本框、按钮、计时器控件实现闹钟功能。 7.1 If语句 程序代码如下： Private Sub Command1_Click() Timer1.Enabled = Not Timer1.Enabled 用Not运算进行开关控制 End Sub Private Sub Timer1_Timer() Dim d As Date d = Text1.Text If Hour(Time) = Hour(d) And Minute(Time) = Minute(d) Then Beep