MAKALAH KONDISI DAN KEPUTUSAN

Cara membuat Biodata Sederhana Menggunakan Visual Basic 6.0

Cara membuat Biodata Sederhana Menggunakan
Visual Basic 6.0

Oleh

Nama : Renotua Bagariang

Npm: 17150013

Dosen Pengampuh 

Januardi Rosyidi, S.Kom., M.Kom

 

kali ini saya akan membuat data mahasiswa sederhana menggunakan visual basic tapi sebelum itu silahkan sheree blog ini jika berguna untuk anda

 

jangan lupa kunjungi youtube kita di 

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg
jangan lupa 
Like, Comen dan Subscribe 
salam "@Yt Delevery
Conten Creator 

 

saya akan membuat biodata mahasiswa sederhana seperti gambar di bawah

gambar 1 : kita akan membuat daftar biodata simpe menggunakan vb 6.0 atau seperti gambar diatas

 

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg

 

 

gambar 2 : kita akan membuat text dimana kita akan mengganti namenya seperti gambar diatas dan sebelah pojok kanan tanda biru 

. disini kita perlu membuat kolom ada beberapa seperti saya membuat 4 kolom dimana kolonm pertama berisi nama, npm alamat, dan no hp 

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg

gambar 3 : disini juga kita akan mengisi atau mengganti nama seperti gambar 2 sebelaah pojok biru nah dini perlu kita perhatikan karena setiap kolom itu namanya berbeda dan jangan sampe salah jika salah akan gagal/ tidak bisa run/running

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg

 

 gambar 4 : di dalam gambar atau keterangan kali ini kita akan membuat rumusnya agar muncuul tampilan seperti gambar 1 caranya klik dua kali pada menu ok nanti akan muncul tampilan kosong disitulah kita isi rumusnya. saya akan buat rumusnya di bawah gambar ini

Private Sub Command1_Click()
MsgBox (" Nama Anda " + Text1.Text + " NPM " + Text2.Text + " Alamat " + Text3.Text + " No Teepon Anda " + Text4.Text)
End Sub

setelah selesai semua lakukan run atau klik di play di tegah atas seperti di bawah ini.

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg

  gambar 5 : cara run klik tanda play diatas
dan isi nama npm alamat dan no hp lalu pilih ok otomatis akan muncul tampilan seperti di bawah

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg

 terima kasih telah mengikuti langkah langkah ini semoga bermanfaat 

terima kasih 

salam yt delivery

 

jangan lupa kunjungi youtube kita di 

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg
jangan lupa 
Like, Comen dan Subscribe 
salam "@Yt Delevery
Conten Creator

 

Padangsidimpuan Oktober 2019

Penulis 

Renotua Bagariang

 

Cara Membuat Data Base Restoran Menggunakan Visual Basic 6.0 (VB)

Cara Membuat Data Base Restoran Menggunakan Visual Basic 6.0 (VB)

Oleh

Nama : Renotua Bagariang

Npm: 17150013

Dosen Pengampuh 

Januardi Rosyidi, S.Kom., M.Kom

 gambar 1 : Cara Membuat data base kasir restoran menggunakan vb 6.0

gambar 2 : Cara membuat huruf atau judul di atas disini cara membuat judul atas yang pertama pilih di samping kiri huruf A lalu klik di laman kerja lalu si samping pojok tanda biru disini dipilih atau ganti nama yang ingin di gunakan

gamabar 3: disini kita membuat atau memasukkan rumus setelah kita membuat daftar menu makanan dan minuman caranya klik dua kali pada salah satu menu makanan dini akan muncul semua mulai dari menu makanan dan minum dan rumusmnya akan saya copy di bawah gambar

Rumus Daftar Menu

Dim makanan As Currency
Dim minuman As Currency
Dim total As Currency
Dim bayar As Currency
Dim kembali As Currency
Private Sub Command1_Click()
makanan = Text1.Text
minuman = Text2.Text
bayar = Text3.Text
total = makanan + minuman
Text4.Text = total
kembali = bayar - total
Text5.Text = kembali
End Sub
Private Sub Label6_Click()

End Sub
Private Sub Option1_Click()
Text1.Text = 20000
End Sub
Private Sub Option10_Click()
Text1.Text = 5000
End Sub
Private Sub Option11_Click()
Text1.Text = 10000
End Sub
Private Sub Option12_Click()
Text1.Text = 10000
End Sub
Private Sub Option13_Click()
Text2.Text = 12000
End Sub
Private Sub Option14_Click()
Text2.Text = 12000
End Sub
Private Sub Option15_Click()
Text2.Text = 12000
End Sub
Private Sub Option16_Click()
Text1.Text = 12000
End Sub
Private Sub Option17_Click()
Text2.Text = 5000
End Sub
Private Sub Option18_Click()
Text2.Text = 10000
End Sub
Private Sub Option19_Click()
Text2.Text = 5000
End Sub
Private Sub Option2_Click()
Text1.Text = 25000
End Sub
Private Sub Option20_Click()
Text2.Text = 12000
End Sub
Private Sub Option3_Click()
Text1.Text = 15000
End Sub
Private Sub Option4_Click()
Text1.Text = 15000
End Sub
Private Sub Option5_Click()
Text1.Text = 20000
End Sub
Private Sub Option6_Click()
Text1.Text = 10000
End Sub
Private Sub Option7_Click()
Text1.Text = 15000
End Sub

Private Sub Option8_Click()
Text1.Text = 15000
End Sub
Private Sub Option9_Click()
Text1.Text = 10000
End Sub 

gambar 4 : gambar ini sama dengan gamabar ke tiga dan keterangannya sama cuman hal bedanya di gambar atas itu pada munu makanan di bagian ini menu minuman 

 

gambar 5: pada bagian ini kita megisi rumus pada bagian hitung atau menu tanda di atas disini kita mengisi rumus seperti di atas dan saya akan membuat rumusnya di bawah 

Rumus pada bagian menu HITUNG

Private Sub Command1_Click()
makanan = Text1.Text
minuman = Text2.Text
bayar = Text3.Text
total = makanan + minuman
Text4.Text = total
kembali = bayar - total
Text5.Text = kembali

gambar 6: dini si setelah kita selesai mengisi rumus kita lakukan RUN/RUNNING untuk run kita pilih tanda play diatas atau berwarna biru kecil disini kita mencoba mengisi sesuai pesanan atau seperti gambar di atas kita contohkan 

pilih menu makanan lalu pilih menu minuman setelah itu masukkan jumlah uang pelanggan lalu klik HITUNG otomatis akan nmuncul berapa biaya pelanggan berapa kembalian untuk pelanggan 

SEKIAN TERIMA KASIH SEMOGA BERMANFAAT 

jangan lupa kunjungi youtube kita di 

https://www.youtube.com/channel/UCn7qag_vobQ457A63bNBmFg
jangan lupa 
Like, Comen dan Subscribe 
salam "@Yt Delevery
Conten Creator

Padangsidimpuan Oktober 2019

Penulis 

Renotua Bagariang

(yt delivery)