Даю 99 баллов , в чем ошибка ?????это должен быть калькулятор , исправьте пожалуйста ,...

0 голосов
43 просмотров

Даю 99 баллов , в чем ошибка ?????это должен быть калькулятор , исправьте пожалуйста , или подскажите другую программу !


image

Информатика (429 баллов) | 43 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Под рукой был только VisualStudio 2008 Express Edition. Из кода видно, что вы используете Visual Basic. Создал в конструкторе форму, расположил на форме 3 textbox и 5 button. Заполнил процедуры - обработчики события click для каждой кнопки как в вашем коде. Запустил и все работает. Код почти не отличается от вашего.
Может быть вы ввели код а на форме не расположили нужные объекты.

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = "0"
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If Val(TextBox2.Text) <> 0 Then TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
    End Sub
End Class


image
(13.9k баллов)