|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.03.2012, 23:44 | #1 |
Регистрация: 22.03.2012
Сообщений: 6
|
Нуждаюсь в консультации
Для ввода/вывода использовать пользовательскую форму) описать все используемые элементы управления)
Даны a, b, c, y, t, w вычислить: z = (a * y / (a + b) + c / a * x ^ 2 + b * x) ^ 3 + sinw * t Ну вобщем у меня получилось как-то так.... Private Sub CheckBox1_Click() TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" TextBox4.Text = "" TextBox5.Text = "" TextBox6.Text = "" TextBox7.Text = "" TextBox7.Visible = False TextBox1.SetFocus CheckBox1.Value = False End Sub Private Sub CommandButton1_Click() Dim a As Single Dim b As Single Dim c As Single Dim y As Single Dim t As Single Dim w As Single Dim z As Single a = CInt(TextBox1.Text) b = CInt(TextBox2.Text) c = CInt(TextBox3.Text) y = CInt(TextBox4.Text) t = CInt(TextBox5.Text) w = CInt(TextBox6.Text) z = (a * y / (a + b) + c / a * x ^ 2 + b * x) ^ 3 + sinw * t MsgBox "результат смотри в TextBox7" TextBox7.Visible = True TextBox7.Text = z End Sub Спасибо! |
31.03.2012, 00:02 | #2 |
Участник клуба
Регистрация: 28.06.2009
Сообщений: 1,950
|
В чём, собственно, вопрос?
|
31.03.2012, 15:05 | #3 |
Регистрация: 22.03.2012
Сообщений: 6
|
Вопрос в том: правильно ли я сделал?
|
31.03.2012, 17:56 | #4 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Не правильно
Код:
Анализ,обработка данных Недорого
Последний раз редактировалось doober; 31.03.2012 в 18:00. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вознаграждение за консультации по vs MFC + db (знаю visual c++) | askerpro | Фриланс | 2 | 29.04.2011 16:30 |
консультации delphi | Федеор | Фриланс | 3 | 01.11.2010 09:57 |