资源描述：
《《VBA编程基础语句》PPT课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、全国计算机等级考试Access数据库程序设计（二级）万红波烟台大学VBA编程基础常量、变量、运算符和表达式；流程控制语句；过程调用和参数传递；常用操作的实现方法；VBA的数据库编程；2VBA程序流程控制语句VBA程序语句按照功能分为：声明语句：声明变量，常量或自定义类型；执行语句：执行赋值操作，调用函数或过程，实现各种流程控制；顺序结构：依次执行；条件结构：根据条件选择执行路径；循环结构：重复执行某一段代码；2.1程序语句的书写语句写法通常将一个语句写在一行上；续行符(_)将语句连续的写在下一行；可以将多个语句写在
2、一行上，使用(:)隔开；注释内容：Rem注释语句使用’2.2声明语句和赋值语句声明语句用来定义变量，常量，数组和过程；赋值语句为变量指定一个值或表达式；Rem下面的语句是声明语句DimageAsInteger‘下面的语句是赋值语句age=142.3语句标号和GoTo跳转语句GoTo语句实现无条件转移DimageAsIntegerage=Me.txtAge.ValueIfage<0ThenGoToErrorHandlerEndIfGoToEndProcessErrorHandler:MsgBox"年龄不得小于零！",
3、vbExclamationMe.txtAge.SetFocusEndProcess:......2.4条件语句IfIf...Then...EndIfRem例子8.4Dimx,yAsDoubleIfx>0Theny=Sqr(x)ElseIfx=0Theny=0Elsey=Abs(x)EndIfEndIfDimx,yAsDoubleIfx>0Theny=Sqr(x)ElseIfx=0Theny=0ElseIfx<0Theny=Abs(x)EndIf练习题在窗体上添加一个名称为Command1的命令按钮，然后编写如下单击
4、事件代码：PrivateSubCommand1_Click()a=75Ifa>60Thenk=1ElseIfa>70Thenk=2ElseIfa>80Thenk=3EndIfMsgBoxkEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是：A)1B)2C)3D)不确定2.4条件语句SelectCaseSelectCase...EndSelectSelectCase表达式Case表达式1,表达式2语句Case表达式3To表达式4语句CaseIs关系运算符表达式5语句CaseElse语句EndSelect例
5、子在标准模块中定义一个Sub子过程，根据字符的类型，显示响应的信息PublicSubcharInfo(aAsString)DimStrAsStringSelectCaseaCase"A"To"Z"Str="大写字母"Case"a"To"z"Str="小写字母"Case"0"To"9"Str="数字字符"Case"!","?",",",".",";"Str="标点符号"Case""Str="空字符串"CaseIs<32Str="特殊字符"CaseElseStr="未知字符"EndSelectMsgBoxStrEndS
6、ub练习题下列Case语句中错误的是A)Case0To10B)CaseIs>10C)CaseIs>10AndIs<50D)Case3,5,Is>102.4条件语句-支持选择操作的函数IIf函数IIf(条件式,表达式1,表达式2)根据“条件式”的值决定函数的返回值，“真”返回“表达式1”的值“假”返回“表达式2”的值‘返回a,b中较大的值Max=IIf(a>b,a,b)2.4条件语句-支持选择操作的函数Switch函数Switch(条件式1,表达式1,条件式2,表达式2,...)依次计算“条件表达式n”，直到为“真”
7、，返回对应的“表达式n”‘根据x的值，计算y的值y=Switch(x>0,1,x=0,0,x<0,-1)2.4条件语句-支持选择操作的函数Choose函数Choose(索引式,选项1,选项2,...,选项n)根据索引式的值(1~n)，返回对应的选项y=Choose(x,5,m+1,n)2.5循环语句循环语句可以重复执行一行或几行程序代码VBA支持的循环语句结构For...NextDo...LoopWhile...Wend2.5循环语句For...NextFor循环变量=初值To终值[Step步长]循环体Next循环
8、变量默认情况下，步长为1；步长>0:循环变量<=终值时候，执行循环体步长=0:循环变量<=终值时候，死循环步长<0:循环变量>=终值，执行循环体可以使用ExitFor提前退出循环；DimUChar(26)AsStringDimiAsIntegerFori=1To26UChar(i)=Chr(i+64)Nexti练习题设有如下窗体单击事件过程：PrivateS
