Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Run-time error '28' - Out of stack space
Autor: caramba
Datum: 10.06.08 22:42
Hallo, ich laufe in der nachstehenden Routine auf den Runtime-Error 28. Die Zeile "If p.PrintQuality = .List(a) Then" ist gelb hinterlegt. In p.PrintQuality ist der Wert "-3" und in .List(a) der Wert "100 dpi". Ich sehe nicht, was hier falsch ist. Kann mir vielleicht jemand helfen? Vielen Dank Rainer Private Sub sevQuality_Click() With Me.sevQuality If .List(0) = "" Then Exit Sub End If For Each p In Printers If p.DeviceName = Me.sevPrinter.Text Then .ListIndex = 2 For a = 0 To 2 If p.PrintQuality = .List(a) Then .ListIndex = a Exit Sub End If Next a End If Next p End With End Sub

Run-time error '28' - Out of stack space	1.210	caramba	10.06.08 22:42
Re: Run-time error '28' - Out of stack space	737	Dieter	11.06.08 07:41
Re: Run-time error 28 - Out of stack space	703	caramba	11.06.08 08:20
Re: Run-time error 28 - Out of stack space	767	Dieter	11.06.08 08:50
Re: Run-time error 28 - Out of stack space	707	caramba	11.06.08 08:55
error 28 - Out of stack space / Jetzt Error "13"	770	caramba	11.06.08 16:02
Re: error 28 - Out of stack space / Jetzt Error "13"	772	Dieter	11.06.08 16:36

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen