第8章Access编程基础 大学计算机基础.pptVIP

第8章 Access编程基础 知识网络图 窗体结构 窗体类型 窗体类型 窗体类型 窗体类型 窗体类型 8．2 创建窗体 8.2.1使用向导创建窗体 8.2.1使用向导创建窗体 8.2.1使用向导创建窗体 8.2.1使用向导创建窗体 8.2.1使用向导创建窗体 8.2.1使用向导创建窗体 8.2.2使用设计视图创建窗体 8.2.2使用设计视图创建窗体 8.2.2使用设计视图创建窗体 8．3 设计窗体 8．3 设计窗体 8．3 设计窗体 8．3 设计窗体 8．3 设计窗体 8．3 设计窗体 8．4 模块 8．5 VBA编程基础 8.5.3 变量 8.5.4 表达式 条件语句 ——if语句 格式1： if 条件 then 语句序列1 end if 条件语句 —— Select Case语句 格式： Select Case 检验表达式 Case 比较列表1 语句序列1 Case 比较列表2 语句序列2 …… [Case Else] 语句序列n End Select 【例8.10】创建一个窗体“成绩绩点计算”，功能是能接受用户输入成绩，根据用户输入的成绩按照表8-6进行计算成绩绩点，窗体设计视图如图8.30 (a)，窗体运行图如图8.30 (b)，在第一个文本框输入成绩后，单击“计算”按钮，将计算出来的绩点分别显示在相应的文本框中。 循环——for……next语句 格式： For 循环变量=初值To 末值 [Step 步长] [语句序列1] [Exit For] [语句序列2] Next 循环变量 说明： 执行过程如图8.13所示。 循环变量必须是数值型。 步长默认为1。 一般初值小于末值，如果初值大于末值，步长要为负数。 【例8.11】创建一个窗体“计算1到10的累加和”，窗体设计视图和运行图分别见图8.31和8.32，要求单击“开始计算”按钮，将计算结果显示在文本框中。 Private Sub Command1_Click() Dim sum As Integer sum = 0 For i = 1 To 10 Step 1 sum = sum + i Next i total.Value = sum End Sub 注释： Dim sum As Integer声明一个整型变量sum，用来存放和。 Sum=0，在计算之前先初始化为0。 For i = 1 To 10 Step 1这里step 1可以省略。 Sum=sum+i表示将i的值累加到sum中。 Total.value=sum表示将计算的结果赋值给total，即显示在文本框中。 循环—— do ……loop语句 格式1： Do [while | until 条件表达式] [语句序列1] [Exit Do] [语句序列2] Loop 格式2： Do [语句序列1] [Exit Do] [语句序列2] Loop [while | until 条件表达式] 【例8.12】采用do while…Loop语句完成【例8.11】要求，界面和控件属性完全同【例8.11】。 Private Sub Command1_Click() Dim sum As Integer sum = 0 i=1 Do While i=10 sum = sum + i i=i+1 Loop total.Value = sum End Sub 1．数学运算 ＋：加法运算，也适合于字符串的之间的连接运算。 －：加法运算。 * ：乘法运算。 /：除法运算。用来进行两个数的除法运算并返回一个 浮点数。 \：整除运算。返回两数相除后的整数部分。 Mod：求余运算。例如：21 Mod 2表示21被1整除以后 的余数，结果为1。 ^：幂运算。例如：3^2 表示以3为底的2次方，结果为9。 关系运算也称比较运算，它表示不等式的真或假，主要用于数值、日期等之间的比较。VB共提供六种运算符，分别是： =（等于），（大于），（小于），=（大于等于），=（小于等于）和（不等于）。 3．逻辑运算 2．关系运算 F F T F F T F T T F T F F F T T T F T T Or或 And与 Not A非 B 　A 4．连接运算 连接运算符作用是将两个字符串连接起来，包含“+”和“”。 “+”只能连接两个字符串，“”可以将两个不同类型的表达式强制连接。 8.5.2 VBA数据类型 图8.26 立即窗口 在VBE窗口，运行菜单【视图】?【立即窗口】命令，弹出如图8.26立即窗口，输入“?”号，在问号后输入表达式，回车后即可显示表达式结果 8.5.5 系统函数 按功能来分，常用的可分为数学函数、字符函数