主题：如何将A、B两列中的最大值填入C列？

'查找最大值:
Dim Int() As Integer = {8,45,6,2,67}
Dim lst As New List(Of Integer)
lst.Add(Int(0))
For i As Integer = 1 To Int.Length - 1
    If Int(i) > lst(0) Then
        lst(0) = Int(i)
    End If
Next
Output.Show(lst(0))

'查找最小值:
Dim Int() As Integer = {8,45,6,2,67}
Dim lst As New List(Of Integer)
lst.Add(Int(0))
For i As Integer = 1 To Int.Length - 1
    If  Int(i) < lst(0) Then
        lst(0) = Int(i)
    End If
Next
Output.Show(lst(0))