科学应用程序接口创新设计及代码编写.pptVIP

应用程序接口设计及代码编写 一、简单的计算器应用程序任务 任务概述 界面布局 界面设计 代码设计 计算器应用程序分析 二、可视化界面设计基础 三、可视化界面高级设计 菜单设计 框架、单选钮和复选框控件 列表框控件 组合框控件 工具栏、状态栏和图标列表控件 通用对话框控件 其他常用控件 （七）其他常用控件 水平滚动条(HScrollBar) 垂直滚动条(VScrollBar) 四、代码设计基础 变量的声明 基本数据类型 变量初始值 变量的作用域 变量的生命周期 常量 运算符和表达式 常用函数 流程控制语句 流程控制语句 在代码设计阶段，VB主要采用结构化程序设计方法，它一般包括三个基本结构 分支结构 分支结构是根据一定的条件来决定执行何种操作的一种数据结构 在VB中有五种语句来实现分支结构： If…Then If…Then…End If If…Then…Else If…Then…ElseIf Select Case If…Then 语法规则 If 条件表达式 Then 语句 例： Private Sub Command1_Click() Dim temp As Single temp = Val(InputBox(What is the tempture?)) If temp 25 Then MsgBox it is hot End Sub If…Then…End If 语法规则 If 条件式 Then 程序段 End If If…Then…End If 语句实例 If…Then…Else 语法规则 If 条件式 Then 程序段1 Else 程序段2 End If If…Then…Else 语句实例 If…Then…ElseIf 语法规则 If 条件式 Then 程序段1 ElseIf 条件式2 Then 程序段2 …… ElseIf 条件式n Then 程序段n [Else 默认程序段] End If If…Then…ElseIf 语句实例 Select Case 语法规则 Select Case 测试表达式 Case 表达式1 程序段1 [Case 表达式2 程序段2] …… [Case Else 默认程序段] End Select Select Case语句实例 循环结构 循环是一组重复执行的指令，重复次数由条件决定 For…Next语句 Do…Loop语句 For…Next语句 主要用于执行循环次数确定的循环 语法规则 For 循环变量 = 初值 To 终值 [Step 步长] [程序段] [ Exit For] Next [循环变量] For…Next语句实例 Private Sub Command1_Click() For i = 1 To 10 Step 1 Print i Next i End Sub For…Next语句实例 Do…Loop语句 当循环次数无法预先确定时，可以使用Do…Loop语句，它有两种格式 Do…Loop语句 当型循环（先判断，后执行） Do [{While|Until} 条件式] 程序段（一组语句） [If 条件式 Then Exit Do] [程序段] Loop 当型循环 Do While语句实例 Private Sub Command1_Click() Dim Sum As Integer Dim i As Integer i = 1 Do While i = 10 Sum=Sum+i i = i + 1 Loop Text1.Text=Sum End Sub 当型循环 Do Until语句实例 Private Sub Command1_Click() Dim Sum As Integer Dim i As Integer i = 1 Do Until i 10 Sum=Sum+i i = i + 1 Loop Text1.Text=Sum End Sub Do…Loop语句 直到型循环（先执行，后判断，至少执行一