观察一下我们的周围，就会发现金属的用途之广．

（1）根据如图的应用实例，可知金属具有的物理性质有______．

（2）铁制品锈蚀的过程，实际上是铁与空气中的______和______ 等发生化学反应的过程．请写出一条防止铁制品生锈的方法______．

（3）工人师傅切割铁板时，常用硫酸铜溶液在铁板上画线即可留下红色的印迹，此过程中发生反应的化学方程式为______．

在考生文件夹下有一个工程文件stj4.vbp，相应的窗体文件为stj4.frm，其功能是通过调用过程FindMax求数组的最大值，请装入该文件，程序运行后，在四个文本框中各输入一个整数，然后单击命令按钮，即可求得数组的最大值，并在窗体上显示出来(如下图所示)。这个程序不完整，请把它补充完整，并能正确运行。

试题源程序：

1 Option Base 1

2 Private Function FindNax(a( )As Integer)

3 Dim Start As Integer

4 Dim Finish As Integer，i As Integer

5 ’Start=(a)

6 ’Finish=(a)

7 ’Max=(Start)

8 For i=Start To Flnlsh

9 ’If a(i)Nax Then Nax=

10 Next i

11 FindMax=Nax

12 End Function

13 Private Sub Command1_Click( )

14 Dim arr1

15 Dim art2(4)As Integer

16 arr1=Array(Val(Text1.Text)，Val(Text2.Text)，Val(Text3.Text)，Val(Text4.Text))

17 For i=1 To 4

18 arr2(i)=CInt()

19 Next i

20 ’M=FindUax()

21 Print"最大值是："；M

22 End Sub