'Persiapan: 1. Buat 1 Project baru dengan 1 Form, dan 2 Commandbutton.

'           2. Copy-kan coding berikut ke dalam editor form yang bertalian.

'Deskripsi: Membulatkan setiap angka pecahan menjadi bilangan

'           bulat ke atas berikutnya. Contoh: Angka 6,01 (Enam

'           koma nol satu) akan dibulatkan menjadi 7, sedangkan jika

'           parameternya bilangan bulat, maka tidak dibulatkan ke atas.

'Persiapan: 1. Buat satu project standard exe dengan satu form

'           2. Tambahkan satu CommandButton ke atas form

'           3. Copy-kan code ini ke editor form yang bertalian

Simak penjelasannya melalui contoh code berikut ini. 

'Deskripsi: Perbedaan Penggunaan Operator Bagi Slash dan Back-Slash

'Persiapan: 1. Buat sebuah project standard exe dengan satu form

'           2. Tambahkan tiga buah CommandButton di atas form.

'           3. Copy-paste code ini ke editor form tersebut.

Dim FrameCount As Long
Private Sub Command1_Click()
  Timer1.Enabled = False
  If LoadGif(Text1, Image1) Then
     FrameCount = 0
     Timer1.Interval = CLng(Image1(0).Tag)
     Timer1.Enabled = True
  End If
End Sub

Private Sub Command1_Click()
With Me.CommonDialog1
.DialogTitle = "Ambil Gambar"
.Filter = "JPEG|*.jpg"
.ShowOpen

If .FileName <> "" Then
Set Me.Picture1.Picture = Nothing
Me.Picture1.Picture = LoadPicture(.FileName)
End If
End With
End Sub

'Private Sub Form_Load()
'Me.Picture1.Picture = LoadPicture("D:\gbr_motor\bikes_honda_01.jpg")
'End Sub

Untuk membuat mp3 Player kita hanya membutuhkan beberapa Item yaitu:

1. Commandbutton (5)
2. Listbox (3)
3. CommonControlDialog (1)
4. MediaPlayer (1)

Ket: untuk menambahkan item seperti Mediaplayer dapat menambahkan dengan menekan tombol ctrl+t. Dan untuk mediaplayer, list1 dan list3 ubah properties visible menjadi false. dan ubah nama mediaplayer menjadi player.

'Buat Form dan 1 Timer

Kita buat 1 buah label, 1 buah text dan 1 buah command

dan ketik source code dibawah ini:

Private sub command1_click()
Me.label1.caption=text1
end sub

program yang akan Anda buat mengharuskan dapat menambah control saat run-time, maka persyaratan utama adalah: Anda terlebih dulu harus menjadikan control-control tersebut sebagai Control Array. Silahkan jelajahi source code di artikel ini.