Почему в приведенном коде при безформатном выводе не выходят значения - VB
Формулировка задачи:
Решение задачи: «Почему в приведенном коде при безформатном выводе не выходят значения»
textual
Листинг программы
Private Sub Command1_Click() Picture1.Cls h = Val(Text1.Text) R = Val(Text2.Text) pi = 3.14 S = 2 * pi * R * (R + h) V = pi * R ^ 2 * h If Check1.Value Then If Option2.Value Then Picture1.Print " S= "; Format(S, "##.000") If Option1.Value Then Picture1.Print " V= "; Format(V, "##.000") Else: Picture1.Print " S= "; S Picture1.Print " V= "; V End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д