Как вывести результаты расчета в текстовое окно - VB
Формулировка задачи:
суть такова мне нужно полученые данные из расчета занести в отдельное текстовое окно с кнопкой распечатка( для распечатки всех данных в текстовом окне ) подскажите как это сделать . вот часть кода которую надо занести
Решение задачи: «Как вывести результаты расчета в текстовое окно»
textual
Листинг программы
Public a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z, a1, b1, c1, d1, e1, f1, g1, h1, i1, j1 As Single Private Sub Combo1_Change() If Combo1.Text = "Êèðïè÷Г*îå" Then i = 0.3 * c / Sqr(10 * a) j = 0.3 * c / Sqr(10 * b) k = 0.3 * b / Sqr(10 * c) q = 0.002 * c If Combo1.Text = "Æèëûå êðóïГ*îïГ*Г*åëüГ*ûå çäГ*Г*ГЁГї" Then i = 0.24 * c / Sqr(10 * a) j = 0.24 * c / Sqr(10 * b) k = 0.24 * b / Sqr(10 * c) q = 0.0016 * c If Combo1.Text = "Г
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д