Я продолжаю получать ошибки, когда я пытаюсь щелкнуть элемент в списке, а затем попытаться запустить код. Это говорит мне что-то о преобразовании его в логическое, но я не совсем уверен. Я попробовал ToString(), но не повезло.Если оператор ListBox1.SelectedItem
Я не хочу, чтобы код запускался, если в списке не выбрано что-либо.
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If ListBox1.SelectedItem Then
ProgressBar1.Value = 0
Timer1.Start()
Button1.Enabled = False
System.Threading.Thread.Sleep(2000)
TextBox1.Refresh()
TextBox1.Text &= "Preparing"
TextBox1.Refresh()
System.Threading.Thread.Sleep(2000)
TextBox1.Refresh()
TextBox1.Text &= Environment.NewLine & ""
TextBox1.Refresh()
System.Threading.Thread.Sleep(2000)
TextBox1.Text &= Environment.NewLine & ""
Else
MsgBox("", 0, "")
End If
End Sub
Что вы пытаетесь сделать с вашим первым IF. Это не имеет смысла так, как написано. Вы хотите войти, если элемент выбран и в другом, если ничего не выбрано? –
Если 'Option Strict' был' On', этот код даже не мог компилировать, говоря, что он не знает, как отличить Object от Boolean в строке If (и это было бы большим ключом к проблеме) – Sehnsucht