Open Windows Explorer With Specific Directory VB6

Berikut ini adalah cara membuka Windows Explorer dengan direktori tertentu di visual basic 6, untuk mempraktekannya siapkan :

1. Buat 1 Project baru dengan 1 Form, 1 Module, dan 1 Commandbutton.
2. Copy-kan coding berikut ke Module dan Form yang bertalian.

          '--- Coding ini di Module...
          Declare Function ShellExecute Lib "shell32.dll" _

              Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal _
              lpOperation As String, ByVal lpFile As String, ByVal _
              lpParameters As String, ByVal lpDirectory As String, _
              ByVal nShowCmd As Long) As Long


          Public Const SW_SHOWNORMAL = 1
          '--- Batas coding di Module...


          '--- Coding ini di Form...
          Public Sub OpenExplorer(Optional InitialDirectory As String)
                ShellExecute 0, "Explore", InitialDirectory, _
                  vbNullString, vbNullString, SW_SHOWNORMAL
          End Sub


          Private Sub Command1_Click()
             'Tentukan nama direktori yang akan Anda buka dengan windows explorer
             OpenExplorer ("C:\Program Files\")

          End Sub
          '--- Batas coding di Form...

Tags:

contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module