vb程序的设计——6数组.pptVIP

Visual Basic Programming Language 31 4. For Each …Next 语句 ? 格式 For Each 成员 In 数组 循环体 [Exit For] …… Next [ 成员 ] 变体变量 , 代表了数组中 的每个元素 没有括号和上下界的数组名 Visual Basic Programming Language 32 Dim a(10) As Integer, i%, x For i = 1 To 10 a(i) = Int(100 * Rnd) Next i For Each x In a Print x; ; Next x 说明： 程序运行时，通过 Rnd 函数为每个数组元素随机产生一个 0 ～ 100 之间 的随机数，然后通过 For Each …Next 语句输出每个数组元素的值 Visual Basic Programming Language 33 随机数 ? 0~1 rnd ? 0~n n*rnd ? a~b (b-a)rnd+a ? randomize Visual Basic Programming