Project Add-Ins Visual Basic 6 - Compile And Run

Pernahkah Anda mencoba kode yang mengharuskan dicompile terlebih dahulu dengan memanggil prosedur ini? tentu sering, bagaimana? sangat merepotkan sekali bukan? Nah, kode di bawah ini bisa mengatasinya:

Public VBInstance As VBIDE.VBE 
Public Connect As Connect 
 
Option Explicit 
 
Private Sub CancelButton_Click() 
    Connect.Hide 
End Sub 
 
Private Sub OKButton_Click() 
    CompileAndRun 
End Sub 
 
Private Sub CompileAndRun() 
    VBInstance.VBProjects.StartProject.MakeCompiledFile 
    Shell VBInstance.ActiveVBProject.BuildFileName, vbNormalFocus 
End Sub 

Jika Anda gabungkan dengan manifest injector, maka hasilnya akan lebih baik lagi.