Cara melihat bilangan kecil menggunakan Visual Basic

Baca Juga

Yap, dengan menggunakan Visual Basic kita dapat membuat program melihat bilangan kecil diantara bilangan lain :D . Sep,,
Cara nya yah ini :

1. Buat proyek nya, tambahkan empat kontrol Label, lima TextBox, dan tiga CommandButton  pada form desain, sebagai berikut contoh nya :














2. Ubah Propertinya :
Label1      = Caption nya Nilai1
Label2      = Caption nya Nilai2
Label3      = Caption nya Nilai3
Label4      = Caption nya Nilai4
TextBox1  = Name nya TxtNiali1
TextBox2  = Name nya TxtNiali2
TextBox3  = Name nya TxtNiali3
TextBox4  = Name nya TxtNiali4
Command1= Name nya CmdProses, Caption nya = Proses
Command1= Name nya CmdUlang, Caption nya = Ulang
Command1= Name nya CmdTutup, Caption nya = Tutup

3. Klik ganda CmdProses dan ketikkan kode nya : :

Private Sub cmdproses_Click()
Dim a, b, c, d As Integer
a = Val(txtnilai1.Text)
b = Val(txtnilai2.Text)
c = Val(txtnilai3.Text)
d = Val(txtnilai4.Text)
If a < b And a < c And a < d Then
txthasil.Text = a
ElseIf b < c And b < d Then
txthasil.Text = b
ElseIf c < d Then
txthasil.Text = c
Else
txthasil.Text = d
End If

End Sub

4. Klik ganda CmdUlang dan ketikkan kode nya :

Private Sub cmdulang_Click()
txtnilai1.Text = ""
txtnilai2.Text = ""
txtnilai3.Text = ""
txtniali4.Text = ""

End Sub

5. Klik ganda CmdTutup dan ketikan kode nya :
Private Sub cmdtutup_Click()
End
End Sub

6. Jalan kan Programnya ^_^

Artikel Terkait


EmoticonEmoticon