Вопрос
Как проще всего в вводимой строке (числа) поменять точку на запятую.
Ответ
Private Sub Text1_Change()
If InStr(Text1.Text, ".") > 0 Then Text1.Text = Replace(Text1.Text, ".", ",")
End Sub
Павел Сурменок
Copyright 2000-2004 Сообщество Чайников
Контактная информация