vba程序流程控制语句.pptVIP

本节内容及要求： 1.熟练掌握行if语句、块if结构、Select Case情况选择结构有使用，掌握选择的嵌套结构； 2.熟练掌握实现循环结构的For/Next循环结构及Exit For语句、Do/Loop循环结构的使用，掌握多重循环。;执行语句分为3种结构：;分支语句;条件测试语句 ;条件测试语句 ;条件测试语句 ;条件测试语句 ;条件测试语句 ;条件测试语句 ;条件测试语句 ;条件测试语句 ;;条件测试语句 ;;;;【例】求阶乘n！ ; 编写程序代码。 Private Sub Command1_Click() Dim n As Integer,i As Integer Dim result As Long result=1 n=CInt(text1.text) If n=0 Then Label2.Caption=请输入正整数！ Exit Sub 结束过程 End if For i=1 To n result=result*i Next i Label2.Caption=Str(n)+!=+Str(result) End Sub ;;;;;【例】用Do…Loop循环结构实现求和sum=1+2+3+…+100。 ; 解法一：采用当型循环Do While…Loop Private Sub Comma