Jabarkan Sub Simpan() dari Visual Basic

strTanya = Msgbox ("Data Saat ini akan tersimpan. Apakah anda ingin melanjutkan?",vbQuestion + vbYesNo," Pilih")

If strTanya = vbYes then

msgbox "Data berhasil disimpan!",vbInformation," Simpan"

ElseIf strTanya = vbNo then

Beberapa contoh ActiveX Control dan kegunaannya:

DateTimePicker Control. Untuk menampilkan tanggal pada aplikasi dengan tampilan kalender yang mudah dinavigasikan. yang diinput melalui Date TimePicker Control telah memenuhi format penulisan tanggal yang benar.

Pogress Bar Control. Dengan penunjuk progress, aplikasi dapat terhindar dari tampilan yang monoton, yang bisa jadi pengguna akan mengira aplikasi tersebut mengalami hank jika tidak memiliki progress bar.

DataGrid Control. dapat menampilkan database pada sebuah grid.

TreeView Control. Berguna untuk menampilkan data dalam bentuk hierarki. Terutama jika data kita memiliki banyak level dan jenjang, maka dengan menggunakan TreView Control, illustrasi data akan menjadi jelas dan user friendly.

MsChart Control. menambahkan grafik pada aplikasi dengan berbagai pilihan hanya perlu menyediakan data yang berupa angka pada aplikasi untuk membentuk sebuah grafik yang diinginkan.