我實際上正在使用一個考勤系統,使用listbox我想監視「員工」是否進入或離開時間。 txtEmpNum.text作爲我的文本框, rdTin作爲我單選按鈕的時間, rdTout作爲我的單選按鈕超時, lblName,lblDept,lblinout只是標籤。我想,如果一個用戶已經在他/她的名字中出現的時間不會出現在我的列表框上,而是彈出msgbox。但是在這個代碼中,雖然msgbox被強化了,但員工的名字仍然出現在我的列表框中。VB.NET LISTBOX [輸入和輸出]
If txtEmpNum.Text = 8888 Then
If rdTin.Checked = True Then
For i As Integer = 0 To listEmp.Items.Count - 1
If (listEmp.Items(i).ToString.Contains("Bane Lim")) Then
MsgBox("String found at " & (i + 1).ToString)
Exit For
End If
Next
lblName.Text = "Bane"
lblDept.Text = "Admin"
lblinout.Text = "In"
listEmp.Items.Add("Bane Lim")
txtEmpNum.Clear()
ElseIf rdTout.Checked = True Then
lblName.Text = "Bane"
lblDept.Text = "Admin"
lblinout.Text = "Out"
listEmp.Items.Remove("Bane Lim")
txtEmpNum.Clear()
End If
在您展示MSGBOX相同的代碼塊,你也加入「貝恩廉」到列表中。我錯過了什麼嗎? – 2014-08-28 15:04:23