Sunday, May 27, 2012

Apakah Aplikasi Masih Dalam IDE Visual Basic 6.0

Ini merupakan tricky way (cara yang cerdik) untuk mengetahui apakah sebuah aplikasi masih dalam IDE Visual Basic 6.0 ataukah sudah dicompile. Procedurenya sangat sederhana sekali yakni dengan memanfaatkan handle error.
Public Function IsIDE() As Boolean 
On Error GoTo
ErrHandler
Debug.Print 1 / 0
ErrHandler:
IsIDE = Err
End Function
Contoh penggunaan kode di atas:
Private Sub Form_Load() 
If IsIDE Then
MsgBox "Jalankan aplikasi ini dari file .EXE", vbInformation, "Message"
End If
End Sub