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, ByVallpFile As String, ByVal lpParameters As String, ByVal lpDirectory AsString, ByVal nShowCmd As Long) As LongPrivate Const SW_HIDE = 0
Private Sub mnakuntansi_Click()Dim result As Longresult = ShellExecute(Me.hwnd, "open", "D:\Contoh Program VB\0 TNTVB\Menggabungkan program\12 Program Akuntansi\Program AKUNTANSI.exe","", "", SW_HIDE)End Sub
Private Sub mnkoperasi_Click()Dim result1 As Longresult1 = ShellExecute(Me.hwnd, "open", "D:\Contoh Program VB\0 TNTVB\Menggabungkan program\15 Program Koperasi\PROGRAM KOPERASI.exe", "","", SW_HIDE)End Sub
6. RUN program
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :