在编程中使用数组计划

7. 把Visual Studio .Net的当前窗口切换到【（设计）】窗口，并从【工具箱】中的【Windows窗体组件】选项卡中往Form1窗体中拖入下列组件，并执行相应操作：

四个Button组件，分别用来创建一个“创建一维数组”、创建“创建二维数组”、实现对“对一维数组排序”和实现“重定义一维数组”。并在这四个Button组件拖入Form1的设计窗体后，分别双击这四个组件，这样系统会在文件分别产生这四个组件的Click时间对应的处理代码。

一个ListBox组件，用来显示创建的一维数组的内容。

8. 按照表03中数值来设定设定组件的主要属性：

组件类型 组件名称 属性 设置结果

Form Form1 Text 数组篇

Form1 MaximizeBox False

Form1 MinimizeBox False

Form1 FormBorderStyle FixedSingle

ListBox ListBox1 ItemHeight 12

ListBox1 Location Point ( 28 , 169 )

ListBox1 Size Size ( 246 , 136 )

Button Button1 Text 创建一维数组

Button1 FlatStyle Flat

Button2 Text 创建二维数组

Button2 FlatStyle Flat

Button3 Text 对一维数组排序

Button3 FlatStyle Flat

Button4 Text 重定义一维数组

Button4 FlatStyle Flat

表03：【数组】项目窗体中各组件的主要属性设定数值表

9. 把Visual Studio .Net的当前窗口切换到【】，进入文件的界面。然后用下列的代码替换中Button1组件的Click事件对应的处理代码，下列代码的功能是通过创建输入对话框来创建一个一维数组：

Private Sub Button1_Click ( ByVal sender As ject ,

ByVal e As entArgs ) Handles ick

Dim i As Integer

For i = 0 To 3

arrString ( i ) = InputBox ( \"请在下面文本框中输入字符串\" ,

\"请输入字符串 , 来初始化创建的一维数组！\" , \"Item \" i )

Next

abled = True

abled = True

DisplayArray ( arrString )

End Sub

10. 用下列的代码替换中Button2组件的Click事件对应的处理代码，下列代码的功能是创建一个二维数组，并进行初始化：

Private Sub Button2_Click ( ByVal sender As ject ,

ByVal e As entArgs ) Handles ick

Dim arrDate ( , ) As String = {{\"星期一\" , \"18号\"} , {\"星期二\" , \"19号\"}}

其他将领看他如此当然不甘示弱啊 \'\'创建一个二维数组，并初始化

MsgBox ( arrDate ( 0 , 1 ) )

\'\'访问这个二维数组中的元素

End Sub