Cara Membuka Control Panel Windows dengan Visual Basic 6.0 (VB6)

Private Sub Command1_Click()
Shell "rundll32.exe shell32.dll,Control_RunDLL", vbNormalFocus
End Sub

Cara Memanggil Aplikasi Lain Menggunakan Visual Basic 6.0 (VB6)

Memanggil Aplikasi dengan Pencarian ...

Private Sub Command1_Click()
Dim panggil As Integer
panggil = Shell("calc.exe", vbMaximizedFocus)
End Sub

atau dengan coding di bawah ini ...

Private Sub Command1_Click()
a = Shell("calc.exe", vbMaximizedFocus)
End Sub

atau dengan coding di bawah ini ...

Memanggil Aplikasi dengan Link Address ...

Private Sub Command1_Click()

a = Shell("C:\Windows\System32\calc.exe", vbNormalFocus)
End Sub

Cara-cara di atas hasilnya sama dan sangat mudah digunakan ...
Pilih cara coding yang mana aja yang disukai ...
Bila ada keterangan "variable not defined" ...
Maka jangan menyerah oprek codingnya ^_^
Selamat berkarya dan berkreasi ^_^