第五章vb循环结构1.pptVIP

循环结构 Do Loop之“当”循环 形式1: 形式2: Do While 条件表达式 Do 语句块(循环体) 语句块(循环体) Loop Loop While 条件表达式 Do Loop循环示例1 Private sub Form_click() Dim num% num=1 Do while num=10 Print num Num=num+1 Loop End sub S=1+2+3+……+100 Private Sub Form_Click() Dim i As Integer ‘i为累加数 Dim sum As Integer ‘sum为累加和 i =1 sum = 0 Do While i = 100 sum = sum + i i = i + 1 Loop Print sum End Sub S=1+2+3+……+100 Private Sub Form_Click() Dim i As Integer Dim sum A