1、“组织”的力量-二维数组问题引入342118656762341662155034624534322237716256899051582351404534616981154581203649454575674539481034100624681191123312345674123416354232161311915567893282019234561183451272912172231458190141837494523902671 如何输出第5行第8列元素的值？列表框 二维数组定义1 二维数组引用2 二维数组应用3二维数组二维数组概述二维数组概述 有2个下标的为二维数组。可这样表示：a(2,1
2、0)校园的文理楼北侧有二排柳树，每排10棵。如何用二维数组来表示？二维数组定义【示例】Dim t(2,2)As Integer【格式】Dim 数组名(下标1,下标2)As数据类型第0列第1列第2列第0行t(0,0)t(0,1)t(0,2)第1行t(1,0)t(1,1)t(1,2)第2行t(2,0)t(2,1)t(2,2)二维数组定义【说明】定义二维数组时，下标还可表示为：a(下界1 To 上界1，下界2 To 上界2)【示例】Dim score(1 to 4,1 to 3)As Integer 二维数组定义【说明】数组在定义时，数据类型也可用符号代替。【示例】Dim m%(3,4)定义4行5列
3、的整型二维数组m。二维数组引用【引用格式】数组名(下标1，下标2)【示例】定义一个整型二维数组a(2,3)，并给a(1,1)赋值10。Dim a(2,3)As Integer a(1,1)=10 给数组元素a(1,1)赋值10说明：使用时下标1、下标2可以是常量、变量或表达式。下标1、下标2取值范围不能超过所定义的上、下界。二维数组引用【示例】从键盘输入3个学生两门课的成绩。Dim s(3,2)As IntegerFor i=1 To 3 For j=1 To 2 s(i,j)=InputBox(“请输入成绩：”)Next jNext i二维数组应用【应用】有一双层书架，上层放5本书，下层放5
4、本书，找出其中单价最低的书。书的单价从键盘上输入。规划一下：book(2,5)二层，每层5本书 minb存放单价最小值二维数组应用【第1段程序】从键盘上输入10本的单价，并按2行5列的形式输出。Private Sub Command1_Click()Dim book(2,5)As Single For i=1 To 2 For j=1 To 5 book(i,j)=InputBox(“请输入单价：)Print book(i,j);Next j Print Next i二维数组应用【第2段程序】找最小值并输出。minb=book(1,1)For i=1 To 2 For j=1 To 5 If book(i,j)minb Then minb=book(i,j)End If Next j Next i Print minbEnd Sub二维数组拓展总总 结结 二维数组有两个下标。二维数组常与循环一起使用。二维数组用于处理行、列问题较多。
