MENCARI NILAI MAKSIMAL DI VB NET 2010

langkah pertama untuk mencari nilai maksimal di vb net 2010 adalah dengan membuatan array,,,

Dim a(6) As Integer

pendeklarasian array bisa agan sesuaikan dengan tipe data

selanjutnya adalah dengan memasukan nilai kedalam array atau mengammbilnya dari textbox
a(0) = nomor.Text   --------> untuk nilai dari textbox
a(0) = 1                  --------> untuk nilai diinput sendiri atau pemberian nilai default

misalnya kita ambil contoh dari nilai diinput sendiri,,,,cekidot

dim temp As variantType
dim max As Integer


        a(0) = 6
        a(1) = 1
        a(2) = 2
        a(3) = 3
        a(4) = 4
        a(5) = 5

selanjutnya,,, menggunakan looping atau perulangan untuk menentukan nilai maksimal


temp = a(0)
        For i = 0 To UBound(a) - 1
            If (a(i) > temp) Then
                temp = a(i)

            End If
        Next
        max1 = temp

selanjutnya tinggal di RUN saja atau dengan menekan tombol F5,,,
maka nilai maksimal akan keluar yakni = 6

demikian cara mencari nilai maksimal di vb net 2010

Mohon Saran ^_^