Dim A, B, C, Pos 
 
A="2,0" 
B=",010000 ALCOHOL 9651212 80" 
 
Pos=Instr(1,B," ")
B=Mid(B,1,Pos-1) 
 
A=FormatNumber(A,6) 
B=FormatNumber(B,6) 
 
C=CSng(A)+CSng(B) 
 
Msgbox(A) 
Msgbox(B) 
Msgbox(C)

Gru? Michi aus Hannover

1 + 1 = 3 f?r hinreichend gro?e 1