Scrip Menjalankan Aplikasi lain di VB 6.0

Cara Menjalankan Aplikasi Lain Dengan Visual Basic 6.0

 Langsung aja ni ya gak pake ribet, kode / scrip vb 6 untuk menjalankan aplikasi lain yang di letakkan di command1:

 Private Sub Command1_Click()
dim panggil as interger
panggil = Shell("D:\NetGame\GarenaID\GarenaPBID\PBLauncher.exe", vbMaximizedFocus)
End Sub
panggil adalah deklarasi variable. berikut penjelasannya
panggil=shell([directory file yang ingin dibuka],[keterangan lebih lanjut])

Dimana vbMaximizedFocus bisa diganti sesuai kebutuhan kita / windowstyle , seperti :
 vbHide = jendela aplikasi tidak tampak di desktop & taskbar, benar-benar tersembunyi
vbNormalFocus = jendela aplikasi muncul normal dengan fokus
vbMinimizedFocus = jendela aplikasi minimized dan mendapat fokus
vbMaximizedFocus = jendela aplikasi maximized dan mendapat fokus
vbNormalNoFocus = jendela aplikasi muncul normal tanpa fokus
vbMinimizedNoFocus = jendela aplikasi minimized dan tanpa fokus