Skip to main content

Script Visual Basic - Belajar Materi Dasar Aplikasi VBSCRIPT

Script visual basic - Visual basic merupakan salah satu software yang wajib dikuasai bagi seorang programmer aplikasi. Sebelum belajar materi tentang visual basic lebih dalam, kita harus tahu dasar-dasar vbscript terlebih dahulu.
Script Visual Basic - Belajar Materi Dasar Aplikasi VBSCRIPT

Visual basic adalah salah satu bahasa pemrograman aplikasi yang cukup sederhana dan mudah dimengerti. Script dalam visual basic cukup sederhana dan syntaxnya atau cara penulisan kode visual basic sudah banyak dan dapat didownload di internet. Sekedar informasi, Visual basic dikembangkan oleh Microsoft sehingga mendukung pembuatan aplikasi windows.

Kumpulan script visual basic


Kegunaan utama visual basic sebenarnya ada pada pembuatan form aplikasi. Di form tersebut, pengguna aplikasi dapat menginput data yang diinginkan. Selain form komponen kedua yang ada di visual basic yaitu tombol itu sendiri.

Dalam dunia teknik informatika, Visual Basic diajarkan dalam mata kuliah Sistem Basis Data untuk membuat aplikasi database yang terintegrasi dengan Access atau pun dengan XAMPP.

Untuk lebih jelasnya, silahkan kunjungi Cara Koneksi Visual Basic Dengan XAMPP

Langsung saja pada inti artikel ini, berikut vbscript tutorial lengkap atau kumpulan script visual basic lengkap untuk pemula.

Script Visual Basic - Belajar Materi Dasar Aplikasi VBSCRIPT
Aplikasi Input Data Mahasiswa Visual Basic

1. Membuat tombol Add


Script vbscript di bawah ini adalah script untuk membuat tombol yang berfungsi untuk menambah data baru. 

Private Sub cmdAdd_Click()
Adodc1.Recordset.AddNew
End Sub

2. Membuat tombol keluar


Berikut script vbscript untuk keluar dari visual basic setelah aplikasi dirunning.

Private Sub cmdClose_Click()
Unload Me
End Sub

3. Membuat tombol delete


Tombol delete adalah tombol untuk menghapus data yang telah dibuat. Sekedar informasi aja, kalau sebenarnya semua fungsi dari suatu tombol di Visual Basic sebenarnya sudah dapat dibuat sesuai dengan keinginan tanpa harus coding.

Karena visual basic sendiri menyediakan fasilitas autofill atau isi otomatis script yang ditulis. Dalam contoh ini ini, tombol delete ini dibuat dengan menggunakan fungsi If.

Private Sub cmdDelete_Click()
If MsgBox("YAKIN INGIN MENGHAPUS DATA INI?", vbQuestion + vbOKCancel, "KONFIRMASI") = vbOK Then
Adodc1.Recordset.Delete
Adodc1.Recordset.MoveNext
End If
End Sub

4. Script vb untuk refresh


Vbscript tutorial berikutnya akan berbagi script visual basic yang berguna untuk merefresh data yang tampil. 

Private Sub cmdRefresh_Click()
Adodc1.Refresh
End Sub

5. Membuat tombol cari


Pernah lihat kotak pencarian? Saat kita memasukkan kata maka sistem akan otomatis mencarinya dan menampilkan hasil pencariannnya. Fitur find, itulah namanya adalah tombol dan kotak yang dibuat untuk mencari data. Pada aplikasi visual basic bisa menggunakan script di bawah ini.

Private Sub Command1_Click()
Adodc1.Recordset.Find "NAMA='" + Text1.Text + "'", , adSearchForward, 1
If Text1.Text = "" Then
MsgBox "ANDA BELUM MEMASUKKAN DATA", vbQuestion, "CARI DATA"
Adodc1.Refresh
Text1.SetFocus
Else
If Not Adodc1.Recordset.EOF Then
Else
MsgBox "MAAF DATA YANG ANDA CARI TIDAK ADA", vbQuestion, "CARI DATA"
Text1.SetFocus
Adodc1.RefreshEnd If
End If
End Sub

6. Membuat tombol maju dan mundur ke data terakhir


Tombol navigasi yang sering dipasang di dalam suatu aplikasi adalah tombol cari maju dan mundur ke data yang pertama dan data yang terakhir.

- Script vb untuk menuju ke data pertama

Private Sub Command2_Click()
Adodc1.Recordset.MoveFirst
End Sub

- Script vb untuk menuju data terakhir

Private Sub Command5_Click()
Adodc1.Recordset.MoveLast
End Sub

7. Membuat tombol navigasi maju dan mundur


Dalam suatu aplikasi juga terdapat tombol untuk maju dan mundur satu kali ke data yang lain. Dalam visual basic 6.0, kita bisa menggunakan kedua script vb di bawah ini.

- Vb script untuk tombol maju

Private Sub Command3_Click()
Adodc1.Recordset.MoveNext
If Not Adodc1.Recordset.EOF Then
Else
MsgBox "MAAF DATA YANG ANDA CARI TIDAK ADA", vbQuestion, "CARI DATA"
Text1.SetFocus
Adodc1.Refresh
End If
End Sub

- Vb script untuk tombol mundur

Private Sub Command4_Click()
Adodc1.Recordset.MovePrevious
If Not Adodc1.Recordset.BOF Then
Else
MsgBox "MAAF DATA YANG ANDA CARI TIDAK ADA", vbQuestion, "CARI DATA"
Text1.SetFocus
Adodc1.Refresh
End If
End Sub

Baik untuk program aplikasi sederhana tentang membuat form mahasiswa atau pun penjualan barang, tombol pada aplikasi yang dibuat pasti juga menggunakan script di atas agar berhasil. 

Lihat juga Membuat Aplikasi Sederhana dengan Access 2010

Demikianlah tulisan tentang script visual basic lengkap untuk belajar pemula. Materi tersebut sangat penting untuk membuat form dan tombol di Visual Basic dalam pembuatan aplikasi database. See you next time!
  January 15, 2019
Semoga Sukses: 1 Kalimat Terbaik dari Anda Adalah Motivasi Bagi Saya!
Bagaimana Pendapat Anda?
Terima Kasih!
close