Skip to main content

Visualbasic: cara menghitung nilai rata-rata

CONTOH PROGRAM PERHITUNGAN RATA-RATA DENGAN VISUAL BASIC


Selamat Datang di Blog Orang IT . Ini adalah salah satu tugas saya pada matakuliah pemrograman visual 1 yaitu bagaimana cara membuat program sederhana untuk mencari nilai rata-rata dengan visualbasic mungkin bagi anda yang sedang mencari tutorialnya di internet tidak sengaja menemukan blog saya silahkan langsung diterapkan tutorial script dan contoh program sederhana berikut ini .


Buka program visual basic 6.0

1. Pilih standard EXE kemudian klik open

2. Buatlah minimal tiga label dan tiga textbox,dalam contoh kali ini saya memberi contoh dengan 5 Label dan 5 textbox kemudian beri nama tiap label dengan nama atau caption “ Input 1” sampai dengan “Input 5”

3. Tambahkan satu Command Button dan beri nama atau Caption  “Hitung Rata-rata”

Nah setelah kita beres membuat tampilan nya berarti langkah selanjut nya adalah tinggal pengkodingan nya,sementara koding/Kode program/Syntak/Scrift yang di butuhkan hanya untuk di Command Button nya saja,dan Koding nya adalah sebagai berikut dan silahkan langsung COPAS semua
Private Sub Command1_Click()
Jumlah = Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text)
Rata = Jumlah / 5
MsgBox ("jumlah : " & Jumlah)
MsgBox ("nilai rata rata : " & Rata)
End Sub

Private Sub Command2_Click()
Unload Me
End Sub

Private Sub Form_Load()
Dim Rata As Double
Dim Jumlah As Integer
End Sub

Sub Bersih()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
End Sub

Private Sub Text_KeyPress(KeyAscii As Integer)
If Not (KeyAscii < Asc9("0") & Chr(13) And KeyAscii <= Asc("9") & Chr(13) Or KeyAscii = vbKeyBack Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeySpace) Then
Beep
KeyAscii = 0
End If
End Sub
Simpan dan lihat hasilnya


Visual basic cara menghitung nilai rata-rata

Gagal ? yah beberapa orang pasti mengalami kegagalan itulah komentar yang sering saya terima ketika mempublikasikan artikel script seperti ini . . . silahkan download contoh programnya saja
Demikian postingan saya mengenai bagaimana cara menghitung rata-rata dengan visualbasic 6 semoga bermanfaat jika ada yang ingin ditanyakan silahkan saja memberikan komentar yang relevans sesuai isi artikel sekian dan terimakasih

Jika Anda merasa bahwa artikel-artikel di blog ini bermanfaat, Anda bisa memberikan donasi melalui Paypal.

Jangan lupa untuk mengulas blog ini lewat google my business Berikan ulasan

Diperbolehkan menyalin artikel diblog ini dengan syarat mencantumkan sumber . Blog anda tidak akan dihapus , deindex , adsense tidak akan menerima keluhan hak cipta dari saya dsb
Buka Komentar
Tutup Komentar