VBNet - Форум - Помогите плз.Найдите ошибку...

Вопрос: Помогите плз.Найдите ошибку... Добавлено: 04.05.07 17:16

Автор вопроса: Shadow

Я делаю проект : "Решение квадратного уравнения".
Вот мой код :

Dim A As Byte, B As Byte, C As Byte

Private Sub Form_Load()
Txt1.Text = A
Txt2.Text = B
Txt3.Text = C
End Sub

Private Sub Cmd2_Click()
End
End Sub

Private Sub Cmd1_Click()
Lbl9.Caption = Val((B * B) - 4 * A * C)
Lbl1.Caption = Val((-B + Sqr(Val(Lbl9))) / 2 * A)
Lbl8.Caption = Val((-B - Sqr(Val(Lbl9))) / 2 * A)
End Sub

В чем проблема - понять не могу. Исправьте пожалуйста, или укажите на ошибку...
Ответить

Ответы Всего ответов: 4

Номер ответа: 1 Автор ответа: User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302	Профиль \| \| #1	Добавлено: 04.05.07 17:21
	http://www.vbnet.ru/samples/download.aspx?id=808 Ответить

Номер ответа: 2 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #2	Добавлено: 04.05.07 19:21
	А где проверка на отрицательность детерминанта? Ответить

Номер ответа: 3 Автор ответа: Neco ICQ: 247906854 Вопросов: 133 Ответов: 882	Web-сайт: neco.pisem.net Профиль \| \| #3	Добавлено: 05.05.07 13:35
	о-ё-ёй по-моему всё совсем страшно - перепутано направление оператора присваивания в процедуре form_load конечно, если это весь код приложения Ответить

Номер ответа: 4 Автор ответа: Silver Ferrum ICQ: 422640045 Вопросов: 12 Ответов: 144	Профиль \| \| #4	Добавлено: 05.05.07 13:46
	ого... Неко прав, и то что в form_load надо кинуть в начало Cmd1_Click... И типы переменных меняй на double, не правильно указал путь к числу (там Lbl9.Caption и ниже тоже добавь).. ...и ты не видишь, почему не работает? Ответить

Страница: 1 |