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

Gagal ? yah beberapa orang pasti mengalami kegagalan itulah komentar yang sering saya terima ketika mempublikasikan artikel script seperti ini . . . silahkan download contoh programnya saja

Download vb menghitung rata-rata

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

Baca juga : Visualbasic volume dan luas bangun