26
Октябрь
2008
Автоматическое преобразование строки
Как сделать автоматическое преобразование строки, если при вводе цифр должны отображаться 2 нуля после разделительной запятой?
Option Explicit Private Sub Text1_Change() Text1 = Format(Val(Text1), "0.00") Text1.SelStart = Len(Format(Text1, "0")) End Sub