|
Ich versuche mit der API Fuktion:
Private Declare Function AllocConsole Lib "kernel32" () As Long
eine Konsole zu öffnen
Sub ConTest()
Dim lngRueck As Long
lngRueck = AllocConsole
Debug.Print lngRueck
End Sub
Der Rückgabewert ist immer 0, also nicht erfolgreich. Was mache ich falsch?
|