Scrollbar et écrire 0.5 au lieu de 0,5 dans un fichier

Bonjour a tous,

je voudrais avoir, si possible, un petit conseil sur probléme est le suivant :
Comment écrire dans un fichier un nombre décilmal sous la forme 0.5 alors que celui ci est affiché par défaut sous la forme 0,5 dans une TextBox?

D'avance merci.

flo

Code:

Private Sub CommandButton1_Click()
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("C:\Windows\Bureau\test.txt", True)
a.Writeline TextBox1.Value
End Sub
Private Sub UserForm_Initialize()
ScrollBar1.Min = 0
ScrollBar1.Max = 10
ScrollBar1.Value = 5
ScrollBar1.SmallChange = 1
End Sub
Private Sub ScrollBar1_Change()
TextBox1.Value = ScrollBar1.Value / 10
End Sub
Private Sub ScrollBar1_Scroll()
TextBox1.Value = ScrollBar1.Value / 10
End Sub