.NET 4.x Проверка TextBox и ComboBox на пустоту - Visual Basic .NET

  1. Будьте добры подскажите, имеется такая конструкцияvb.net1 2 3 4 5 6 7 8 9 10 11 12 13 14 Public Class Form2     Dim a1 As String     Dim a2 As String  Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged         a1 = ComboBox1.Text     End Sub Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged         a2 = TextBox1.Text  End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click           .......           .......  End Sub End Classкак правильно организовать проверку если не выбран ComboBox или нет данных в TextBox1


textual

Код:

    Dim Выбиралось_ли_что_то_в_комбобоксе_вообще As Boolean = False
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        If ComboBox1.Text <> "" Then Выбиралось_ли_что_то_в_комбобоксе_вообще = True
    End Sub
 
'Проверяем где-то
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox(Выбиралось_ли_что_то_в_комбобоксе_вообще)
    End Sub


Похожие ответы
  1. Всем здравствуйте. Какое событие TextBox следует использовать для проверки содержимого при вводе текста пользователем? Например, я ограничил размер текстового окна четырьмя символами и хочу чтобы при вводе пользователя каждый раз проверялось содержимое окна на значение = "asdf". Если пользователь пытается ввести "asdf" (не важно какую из четырёх букв он будет вводить последней) в текстовом окне должно оказаться значение "qwer".Добавлено через 16 минут Почему-то не хочет срабатывать следующая конструкция:vb.net1 2 3 4 5 6 7 8     Private Sub TextBox1_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating         If sender.Text = "asdf" Then             sender.Tag = "qwer"         End If     End Sub     Private Sub TextBox1_Validated(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Validated         sender.Text = sender.Tag     End Sub

  1. Всем знатокам доброго времени суток! Что-то в голове замкнуло....помогите перевести текст и картинки, которые в Richtextbox в массив байт. Спасибо за понимание.

  1. Доброго времени суток! Например есть строка содержащая текст "84312498534". Как можно определить содержится ли в тексте символ "5"?

  1. Как сделать так, чтобы в ТекстБоксе вводились только цифры?

  1. Здравствуйте! Мне нужно чтобы в текстбоксе было несколько значений. К примеру: 123 или 321. Пытался сделать так:vb.net1 2 3 4 If TextBox1.Text = "123" or "321" Then Form2.Show() Else MsgBox("INVALID!")Не получилось. Выделил первую строчку с "or" Помогите Добавлено: На Private Sub, End Sub не обращайте внимания!

  1. Подскажите, как не нагромождая гору кода по простому конвертировать то, что имею в textbox в другую кодировку? Заполняю textbox такvb.net1 2 3 4 5 6 If (BassTags.BASS_TAG_GetFromURL(Stream, TI)) Then             TextBox1.Text = TI.album             TextBox3.Text = TI.artist             TextBox2.Text = TI.comment             TextBox4.Text = TI.title         End IfВ итоге, если там есть кириллица, то все выглядит вот так:

  1. Добрый день, Товарищи! Совсем сломал голову, не могу придумать или еще не знаю методы. Обрыскал вроде все. Допустим на форме 50 текстбоксов, Я на них навешал проверки по средствам Validated (забегая вперед, из мднс порядок событий Enter GotFocus Leave Validating Validated LostFocus ) Так вот, когда я програмно меняю текст ( а это при загрузке проекта, из архива заполняется карточка, validated не происходит, потому что текстбокс не получает фокус или enter. У меня есть hastable всех боксов, возможно ли вызвать для каждого бокса событие validated?vb.net1 2 3 4 5 6 7         For Each x In TexB.Keys             Dim MyTb As TextBox = TexB(x)             ????????             Nextпробовал через MyTb.Focus(), но это беготня по экрану получается конечно же.... Спасибо!

  1. В общем все облазил, и на форуме и в гугле, делал по разному и никак не получается(( нужно что бы при НАЖАТИИ НА КНОПКУ введенное в TextBox1(Например Имя(Вася)) имя заносилось в DataGrid(Имя моей таблицы), и в TextBox2(Фамилия) так же заносилось в таблицу(DataGrid) и сохранялось там же. TextBox1,2 находятся на Form1 , а DataGrid находятся на Form2) Не ругайтесь сильно)) HELP))

  1. В общем проблема такая, пол дня уже пытаюсь выполнить небольшое задание... Нужно поставить защиту от всех букв и цифр кроме цифр "1,2,3,4,5" и BackSpace. По логик я понимаю как это сделать, но вот скомпоновать(добавить к этому коду фильтр) я не могу, уже по разному пробовал... HELP)) MS Visual Studio Basic 2015vb.net1 2 3 4 5 6 If TextBox1.TextLength()  >= 1 Then               MsgBox("Введите цифру от 1 до 5!!!", MsgBoxStyle.Critical)                 e.Handled = True           End If

  1. Если пользователь нажимал на checkbox, программа добавляла определенный текст в textbox. И если отменил выбор, именно тот текст который добавился стирался. После всего этого пользователю можно будет сохранить этот текст методом savedialog. Вроде просто, но как со стирание разобраться не знаю.