1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программирован. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление
  2. Чат codeby в telegram перезагрузка. Обсуждаем вопросы информационной безопасности и методы защиты информации, программирование. Задавайте свои вопросы и комментируйте чужие. Подробнее ...

    Скрыть объявление

Проблема с Withevents

Тема в разделе "Visual Basic", создана пользователем PGAlex, 5 фев 2008.

  1. PGAlex

    PGAlex Гость

    Репутация:
    0
    Я написал программу для нахождения большего числа из трёх введённых (это было в Visual Basic 2003)
    Вот исходный код
    Dim FirstNum, SecondNum, ThirdNum As String
    Dim x As String

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    FirstNum = TextBox1.Text
    SecondNum = TextBox2.Text
    ThirdNum = TextBox3.Text
    If FirstNum > SecondNum Then
    x = FirstNum
    Else
    x = SecondNum
    End If
    If ThirdNum > x Then
    TextBox4.Text = ThirdNum
    Else
    TextBox4.Text = x
    End If
    End Sub

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

    ========================================================

    А когда я поставил Visual Studio 2008 и попытался написать точно такую же программу то выходит ошибка Проблема с Withevents
    Кто знает что надо дописать или исправить в этом коде что-бы всё заработало?
     
Загрузка...

Поделиться этой страницей