|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Miscelâneas)
|
|
 |
Título da Dica: Chamar executável via API
|
 |
|
|
|
Postada em 1/12/2003 por Fernando
Declare a seguinte api em seu form:
Private Declare Function WinExec Lib "kernel32" (ByVal _
lpCmdLine As String, ByVal nCmdShow As Long) As Long
'Essas constantes são poder indicar como o programa deve ser exibido
'Essas constantes são definidas para a função showwindow
Const sw_hide = 0
Const sw_shownormal = 1
Const sw_normal = 1
Const sw_showminimized = 2
Const sw_showmaximized = 3
Const sw_maximize = 3
Const sw_shownoactivate = 4
Const sw_show = 5
Const sw_minimize = 6
Const sw_showinnoactivate = 7
Const sw_showna = 8
Const sw_restore = 9
Const sw_showdefault = 10
Const sw_max = 10
Agora em commandbutton:
'este exemplo chama a calculadora mas pode ser qualquer outro programa
Private Sub Command1_Click()
Call WinExec("c:\windows\calc.exe", sw_normal)
End Sub
Espero que sirva para alguém
Um abraço
Fernando.
|
|
|
|
|
