Hallo Group!

Zunächst vielen Dank an die, die mir auf meine letzte Frage geantwortet haben.
War genau richtig mit Left$(AAA, n) in der SQL-Abfrage. Bin auch selbst darauf
gekommen nur wohl irgendwie falsch angewendet, so dass es nicht richtig funzt
hat. Jetzt geht es. Danke. 

Ich stehe vor einer anderen Aufgabe. Ich habe eine Liste von Punkten, die je für
sich durch 3 Koordinaten beschrieben sind (Kartesisch, Pt.X, Pt.Y, Pt.Z).
Etwa wie im Folgenden gezeigt:

Pt_1 = Point3dFromXYZ(Pt_1.X, Pt_1.Y, Pt_1.Z)
Pt_2 = Point3dFromXYZ(Pt_2.X, Pt_2.Y, Pt_2.Z)
Pt_3 = Point3dFromXYZ(Pt_3.X, Pt_3.Y, Pt_3.Z)
....
Pt_N = Point3dFromXYZ(Pt_N.X, Pt_N.Y, Pt_N.Z)
....

Die zu lösende Aufgabe ist für _je_ einen Punkt dieser Liste die Entfernung
zu den restlichen zu überprüfen und 3 Punkte mit der kürzesten Entfernung
als Resultat der Berechnung auszugeben.
Ist die Prozedur z.b für den Punkt Pt_1 auf beschriebene Weise beendet,
so soll der nächste Punkt angewählt werden und dann von Vorne dasgleiche
durchgeführt werden. Dass die Ergebnisse danach doppelt Vorliegen ist mir
klar. Z. Zt. jedoch nicht von Interesse.

Wie könnte Eurer Meinung nach die entsprechende sub ausschauen?
Es ist für diese rein mathematischen Berechnungen auch nicht zwingend
nötig, dass ausschliesslich Methoden und Funktionen von VBA (MicroSta-
tion) verwendet werden. Ich denke es lässt sich mit VB bewerkstelligen.
Nur mit VB kenne ich mich noch weniger aus als mit VBA.

Vielleicht hat der eine oder andere ein Paar Minuten Zeit.

Vielen Dank!
AHeide
---
þ RIMEGate(tm)/RGXPost V1.14 at BBSWORLD * Info{at}bbsworld.com

---
 * RIMEGate(tm)V10.2áÿ* RelayNet(tm) NNTP Gateway * MoonDog BBS
 * RgateImp.MoonDog.BBS at 6/8/04 4:56:51 PM