Rabu, 28 Maret 2012

memanggil aplikasi lain

cara:

dim panggil as interger
panggil=shell([directory file yang ingin dibuka],[keterangan lebih lanjut])

contoh:

Private Sub Command1_Click()
Dim panggil As Integer
panggil = Shell("C:\Program Files\Mozilla Firefox\firefox.exe", vbNormalFocus)
End Sub

5 komentar:

  1. Untuk panggil file .txt gimana caranya

    BalasHapus
  2. kalau memanggil aplikasi lebih dari satu giman.
    kalau ini kand cumak bisa manggil 1 aplikasi gan.
    kalau di tambahin aplikasi sampai 5 gimana carannya

    BalasHapus
  3. gan mau tanya, apakah ada listing program untuk menginstal aplikasi lain seperti office, pemutar dll melalui vb 6.0 seperti aplikasi hbcd menu yang mana dapat memanggil aplikasi lain atau dapat menginstal aplikasi lain menggunakan hbcd menu

    BalasHapus
  4. File vbs bisa atau tidak

    BalasHapus