Menggabungkan Beberapa Projeck dengan Visual Basic 6.0

1.      Buatlah folder tempat menggabungkan Projeck

2.      Copy Projeck pertama yang sudah jadi ke folder tersebut termasuk file yang sudah

dibentuk , dan Copy juga Projeck kedua yang sudah jadi termasuk file yang

sudah dibentuk exe

3.      Buatlah sebuah project baru, di form baru tersebut buatlah menjadi menu

4.      Buatlah HIPO dengan contoh seperti gambar di bawah ini 

5.         Ketiklah koding berikut ini 

Private 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

Private Const SW_HIDE = 0

Private Sub mnakuntansi_Click()

Dim result As Long

result = ShellExecute(Me.hwnd, "open", "D:\Contoh Program VB\0 TNT

VB\Menggabungkan program\12 Program Akuntansi\Program AKUNTANSI.exe",

"", "", SW_HIDE)

End Sub

Private Sub mnkoperasi_Click()

Dim result1 As Long

result1 = ShellExecute(Me.hwnd, "open", "D:\Contoh Program VB\0 TNT

VB\Menggabungkan program\15 Program Koperasi\PROGRAM KOPERASI.exe", "",

"", SW_HIDE)

   End Sub

6. RUN program 

Menggabungkan Beberapa Projeck dengan Visual Basic 6.0 2012-12-15T21:00:00+07:00 Rating: 4.5 Diposkan Oleh: Unknown