Ich beschäftige mich nun seit 3 Tagen mit Visual Basic. Leider klappen aber bisher meistens die im Internet vorgegebenen Codes nicht, da bestimmte teile im Code Fenster rot angezeigt werden. Woran kann das liegen ? Ich besitze das Programm Microsoft Visual Basic 6.0  
z.b bei diesem Code werden bei mir fehler angezeit, obwohl der code normalerweise richtig sein soll: 
'Die Funktion prüft, ob ein Drucker vorhanden ist und 
'gibt im Erfolgsfall True, andernfalls False zurück 
Public Funtion CheckForPrinter() As Boolean 
Dim sName As String 
On Local Error Resume Next 
sName = Printer.DeviceName 
CheckForPrinter = (Err=0) 
On Local Error Goto 0 
End Function 
'Beispiel 
Dim Msg As String 
If Not CheckForPrinter() Then 
Msg = "Das System kann die Druckerinformationen nicht ermitteln." 
Msg = Msg + vbCrLf + "Stellen Sie sicher, daß der Drucker " 
Msg = Msg + "richtigt installiert ist." + vbCrLf + vbCrLf 
Msg = Msg + "Evtl. wurde noch gar kein Drucker installiert." 
ShowMsgBox Msg, 16 
End If 
Rene Gast  | 








 naja du wirst verstehen ... ohne Plan nur Enttäuschungen ...