Подскажите что я сделал не так!..
Хочу сделать чтобы при наличии записи в листбоксе выдавало запись а при ее отсутствии "нет данных"
Код:
If ListBox1.Items(index:=3) = vbNullString Then
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
Код:
if ListBox1.items.Count > 2 then...
Ато при отсутствии записи выходит ошибка
теперь всегда пишет "нет данных" даже если в листе данные есть
Цитата: Rayrat7
теперь всегда пишет "нет данных" даже если в листе данные есть
да лааадно.
честно..
если нажал и данных там нет выходит "нет данных" и даже если потом их туда заношу тоже самое пишет
покажи свой пример
есть ТехтBox с него заношу строки в ListBox, также есть PictureBox при нажатии по которому выдается строка из ListBox в Label
Беда в том что если в ListBox нет строки с соответствующим индексом то происходит ошибка
Вот и пробую сделать так чтобы при отсутствии списке строки выдавало в Label "Нет данных" а при наличии данные строки
Беда в том что если в ListBox нет строки с соответствующим индексом то происходит ошибка
Вот и пробую сделать так чтобы при отсутствии списке строки выдавало в Label "Нет данных" а при наличии данные строки
Код:
Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click
If ListBox1.Items.Count > 3 Then
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
If ListBox1.Items.Count > 3 Then
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
:facepalm:
я ж тебе написал
я ж тебе написал
Код:
If ListBox1.Items.Count > 2 Then '!!!ДВА
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
Label1.Text = ListBox1.Items(index:=3)
Else
Label1.Text = "Нет данных"
End If
у меня их там 10 шт такчто сути это не изменит)
и по 2 и 3 и 4 и 5 PictureBox кликал Данных нет) хотя в листе есть но вот если сначала данные занесешь а потом нажмешь то будут но если заносишь их после нажатия нету
А теперь расставь знаки препинания.
извиняюсь! все заработало спасибо