listbox’daki sayılardan en büyüğünü bulma Vb.Net

listbox’daki sayılardan en büyüğünü bulma Vb.Net

Daha fazla bilgi için : www.gorselprogramlama.com

 

[code language=”vbnet”]

Private Sub Hesapla_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim mak As Integer

mak = ListBox1.Items(0)

For i As Integer = 0 To ListBox1.Items.Count – 1

If Val(ListBox1.Items(i)) > mak Then mak = ListBox1.Items(i)

Next

Label1.Text = mak

End Sub  ‘Daha fazla bilgi için : www.gorselprogramlama.com

[/code]

Daha fazla bilgi için : www.gorselprogramlama.com

Yorumlar 5

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir