Cara membuat program penghitung berat badan ideal dengan visual basic

Follow @misba_al

Hello para programing Visual Basic, selamat datang lagi di web saya. Postingan kali ini saya akan membagikan ilmu yang berbeda, yaitu cara membuat program penghitung berat badan ideal dengan vb .
Ini dia Screenshotnya..

Setelah melihat gambar tersebut, buat formseperti pada gambar di atas dengan 5 Label, 4 Textbox dan 3 Command button….. 

namadi properties command ganti masing-masing dengan nama Proses, Ulang danselesai…
.Kemudian klik 2 kali pada command Proses… lalu masukan code berikut :

PrivateSub proses_Click()
Dim nama As String
Dim TB, BB, BI, B As Long
nama = nm.Text
TB = Val(t2.Text)
BB = Val(t3.Text)
BI = (TB – 110) * 1.1
If (BB > (1.1 * BI)) Then
text4.Text = “Syalom ” + nama + ” Anda ini  gemuk juga ya ”
Else
If (BB < (0.9 * BI)) Then
text4.Text = “Syalom ” + nama + ” Anda belum ideal, makan yang  banyak ya”
Else
text4.Text = “Syalom ” + nama + ” Anda Sudah Ideal “
End If
End If
End Sub

klik 2 kali pada command ulang dan masukan code berikut :
Private Sub ulang_Click()
nm.Text = “”
text2.Text = “”
text3.Text = “”
text4.Text = “”
nm.SetFocus
End Sub

danterakhir masukan code berikut pada command selesai :
Private Sub Command3_Click()
Unload Me
End Sub

 Klik start atau f5 untuk menjalankan program..
selesai

NB :
untuk tulisan yang berwarna merah Syalom bisa di ganti dengan kata" yang anda inginkann contohnya hallo atau hello, hey
dan untuk yang tulisan yang  berwarna biru bisa di ganti dengan kata-kata yang anda ingin kan ..
mungkin anda sudah mengerti apa fuungsi itu .


Semoga bermanfaat

Anda sedang membaca Artikel tentang Cara membuat program penghitung berat badan ideal dengan visual basic dan anda bisa menemukan Artikel ini dengan URL https://z-chanel.blogspot.com/2012/03/cara-membuat-program-penghitung-berat.html Jangan lupa gunakan link " https://z-chanel.blogspot.com/2012/03/cara-membuat-program-penghitung-berat.html " sebagai Sumbernya jika anda hanya sekedar ingin Copy dan Paste.