vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: Squall
Datum: 29.11.12 15:47
Hallo Ihr lieben Leute,

ich bin hier gerade am verzweifeln.
Ich möchte dieses Quicksort http://www.vbarchiv.net/tipps/details.php?id=966 verwenden.
Leider treten nach Funktionsaufruf Fehler auf, wo keine sind.

Hier ein kurzes Beispiel, um den Fehler nachzubauen. 
Private Sub Command1_Click()
ReDim test(2) As String
test(0) = "3"
test(0) = "2"
test(0) = "1"
 
QuickSort_Str(test)
progressbar.Max = 100 ' hier tritt der Fehler auf ("Ausdruck zu komplex")
End Sub
Sobald ich die Sortierung entferne läuft alles wie geschmiert.
Hat jemand diesbezüglich eine Idee?

Danke im vorraus.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: Manfred X
Datum: 29.11.12 16:41
Hallo!

Ändere mal Deine Indizierung von test, damit auch was drinsteht zum Sortieren.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: mst547
Datum: 29.11.12 18:16
Hallo Squall!

Das liegt sehr wahrscheinlich an dem Not-Not-Aufruf, der im Tipp verwendet wird.

Siehe hier: http://www.vbarchiv.net/forum/read.php?f=2&t=95575&i=95575

mfg mst547
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: ModeratorDieter (Moderator)
Datum: 30.11.12 06:36
Lass mal die Klammer weg, also so: 
QuickSort_Str test

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: Squall
Datum: 30.11.12 08:16
Hallo Manfred,

das mit dem Index war jetzt nur ein copy & paste Problem, in meinem Code steht das natürlich richtig.
Abend danke für den Hinweis.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: Squall
Datum: 30.11.12 08:39
Hallo,

ich hatte das mit dem not-not Aufruf gestern auch schon gesehen.
Konnte mich erinnern das ich darüber schonmal was gelesen hatte, das man das nicht so schreiben sollte,wenn man prüft ob ein array leer ist.
Ich wußte nur nicht das genau dieser Fehler dann immer auftaucht.

Ich danke Dir für die Lösung des Rätsels.

Folgendes habe ich jetzt gemacht damit alles sauber läuft:

Im API Bereich folgendes hinzugefügen. 
Public Declare Function SafeArrayGetDim Lib "oleaut32" (pArray() As Any) As Long
Bei der Funktion kommt das rein. 
' Array gefüllt ?
' If (Not (Not StrSort)) = 0 Then Exit Sub ' vorher
If (SafeArrayGetDim(StrSort) = 0) Then Exit Sub ' neu
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: nach Quicksort Aufruf tritt die Fehlermeldung "Ausdruck zu komplex" auf 
Autor: Squall
Datum: 30.11.12 08:44
Hallo Dieter,

also in den Klammern hat es nicht gelegen, ich danke Dir aber trotzdem.
Die Lösung des Problem habe ich hier bereits gepostet so das das Thema geschlossen werden kann.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel