Trim und Trim$

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

'Test 1 *************************************** Sub Test_ohne_Dollarzeichen() '2,257813 Dim sTime As Single Dim vAr(0 To 10000000) Dim A As Long For A = 0 To 10000000 vAr(A) = " Text" Next A sTime = Timer For A = 0 To 10000000 vAr(A) = Trim(vAr(A)) Next A Debug.Print Timer - sTime End Sub 'Test 2 **************************************** Sub Test_mit_Dollarzeichen() '2,269531 Dim sTime As Single Dim vAr(0 To 10000000) Dim A As Long For A = 0 To 10000000 vAr(A) = " Text" Next A sTime = Timer For A = 0 To 10000000 vAr(A) = Trim$(vAr(A)) Next A Debug.Print Timer - sTime End Sub

Hallo,
ja die unterschiede sind das mit $ schneller wird, allerdings frisst das Array jetzt eine Sekunde.

'Test 1 *************************************** 
Sub Test_ohne_Dollarzeichen() '3,679688 
Dim sTime As Single
Dim sAr(0 To 10000000) As String
Dim A As Long

For A = 0 To 10000000
 sAr(A) = " Text"
Next A

sTime = Timer

For A = 0 To 10000000
 sAr(A) = Trim(sAr(A))
Next A

Debug.Print Timer - sTime
End Sub

'Test 2 **************************************** 
Sub Test_mit_Dollarzeichen() '3,40625 
Dim sTime As Single
Dim sAr(0 To 10000000) As String
Dim A As Long

For A = 0 To 10000000
 sAr(A) = " Text"
Next A

sTime = Timer

For A = 0 To 10000000
 sAr(A) = Trim$(sAr(A))
Next A

Debug.Print Timer - sTime
End Sub

Gruß Tino

Option Explicit Const anz = 10000000 Const txt = " Hallo Du Da " Dim sTime As Single Dim y As String, a As Long 'Test 1 *************************************** Sub Test_ohne_Dollarzeichen() sTime = Timer For a = 0 To anz y = Trim(txt) Next a Debug.Print Timer - sTime End Sub 'Test 2 **************************************** Sub Test_mit_Dollarzeichen() sTime = Timer For a = 0 To anz y = Trim$(txt) Next a Debug.Print Timer - sTime End Sub

Hallo,
dennoch ist das Verhalten irgendwie nicht nachvollziehbar.
Bei identischen Aufbau (siehe erstes Beispiel) nur das Dollarzeichen wird hinzugefügt
dauert es etwas länger.
Also liegt es ja doch nahe das es einen Zusammenhang zwischen Trim$ und Trim geben muss.
Ich denke es liegt daran das Trim$ versucht den String nochmals in einen Sting zu wandeln,
Trim interessiert sich hingegen fürs Format nicht, obwohl es auch immer einen String zurückgibt
(da sind auch bei mir noch Fragezeichen),
ein eine andere Erklärung habe ich dafür nicht, am Array kann es nicht liegen da die Bearbeitung in beiden Beispielen gleich ist.
Ja gut eine hundertstel Sekunde interessiert wahrscheinlich niemanden aber es geht ja um die Sache.
Gruß Tino

Beliebteste Forumthreads (12 Monate)

17 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

17
Beiträge zum Forumthread

Beiträge zu diesem Forumthread