Das ist schlechter Code:
Dim t1, t2, a%, s$, b% -> t1 und t2 sind jetzt Variants. Kann in die Hose gehen
s = s + "a" -> + ist kein String-Concatenator
Print b & " --> " & (t2 - t1) * 1000 -> Typwandlung wird LS überlassen
Das Ganze geht hier gut, kann aber in der Praxis zu Ergebnissen führen, die ganz anders aussehen, als man beim Schreiben erwartet hätte.
Bernhard
PS: Ich würde die Zeitmessung erst nach dem Anlegen des Files starten, sonst spielt hier die API des Systems mit herein und die Organisation der HDD.