科,技照业学院 例3:二重循环实例:九九乘法表 For m=1 to 9 Forecolor-vbRed print m; Forecolor-vbBlue For n=l To m .九九乘法表 56786网 Print tab(n*4);m米n; 11 224 程序设计 Next n 4481216 551015202 661218243036 Print"换行 77142128354249 8816243240485664 27364554637281 Next m
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 例3：二重循环实例：九九乘法表 For m = 1 To 9 Forecolor=vbRed print m; Forecolor=vbBlue For n = 1 To m Print Tab(n*4); m*n; Next n Print '换行 Next m
科,技照业学院 For each.Next循环 For each.Next循环是以对象集合中的每 个元素作为重复依据的如果不知道一个集合有 多少元素, For each.Next循环非常有用。 语法格式: For each<元素>In<集合 程序设计 语句块 Next<元素>
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. For Each...Next循环 For Each...Next 循环是以对象集合中的每一 个元素作为重复依据的,如果不知道一个集合有 多少元素， For Each...Next 循环非常有用。 语法格式： For Each <元素> In <集合> 语句块 Next <元素>