Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
Форум программистов > Программирование, связанное с MS Office > Задача по vba передеать |
Автор: Uourin 3.4.2016, 20:36 |
Надо из цикла с параметром, переделать в цикс с предусловие помогите Hайти количество цифp в целом положительном числе. x = InputBox("Введите число", "Окно ввода данных") For i = 1 To 10 If x > 10 ^ (i - 1) And x < 10 ^ i Then Label2.Caption = " число " & i & " цифры" End If Next End Sub |
Автор: kapbepucm 7.4.2016, 16:28 | ||||
ели я правильно логику вопроса понимаю
вместо
|