Tuesday 17 November 2015

Aplikasi Konversi Angka ke Huruf dengan Visual Basic 2008

Aplikasi Konversi Angka ke Huruf dengan Visual Basic 2008 - Tutorial ini akan membahas pembuatan aplikasi konversi angka ke huruf. Berikut ketentuan pada aplikasi yang akan dibuat :
Ketentuan :

Jika nilai lebih besar dari atau sama dengan 90, maka huruf “A”
Jika nilai lebih besar dari atau sama dengan 80, maka huruf “B”
Jika nilai lebih besar dari atau sama dengan 70, maka huruf “C”
Jika nilai lebih besar dari atau sama dengan 60, maka huruf “D”
Jika nilai lebih keci dari 60, maka huruf “E”
1. Buatlah project baru Windows Form Application
2. Masukkan kontrol – kontrol berikut :
No
Object
Property
Nilai
1
Form
Text
Konversi Angka ke Huruf
2
Label1
Text
Masukkan nilai :
3
TextBox1
Name
Text
TxtNilai
-
4
Button1
Name
Text
BtnKonversi
Konversi
5
Label2
Text
Nilai huruf :
6
TextBox2
Name
Text
AutoSize
BorderStyle
LblHasil
-
False
Fixed3D
3. Desain project seperti gambar berikut :
4. Masukkan kode program berikut pada tombol BtnKonversi dengan Event Click
Private Sub BtnKonversi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKonversi.Click
        Dim nilai As Integer
        Dim huruf As String
        nilai = TxtNilai.Text
        If nilai >= 90 Then
            huruf = "A"
        ElseIf nilai >= 80 Then
            huruf = "B"
        ElseIf nilai >= 70 Then
            huruf = "C"
        ElseIf nilai >= 60 Then
            huruf = "D"
        Else
            huruf = "E"
        End If
        LblHuruf.Text = huruf
End Sub
5. Jalankan program dengan menekan F5 pada keyboard, kemudian masukan nilai angka pada TxtNilai dan klik tombol Konversi


EmoticonEmoticon