2013-04-03 26 views
0

我試圖從存儲在數據庫中的數據加載在組合框中某些項數據組合框項目。 點擊按鈕後,它會在相關框中正確填充公司詳細信息。 並在數據庫中我有一個像如何加載從存儲在數據庫中

Dev = Yes or No 
Fin = Yes or No 
Net = Yes or No 

其中開發是字段名稱,是的是存儲在數據庫中的文本三個字段。

我看一家公司的所有細節的讀者,所以我嘗試了這樣的事情。

If reader(14).ToString = "Yes" then 
    combobox1.items.add("Developer") 
else if reader(15).ToString = "Yes" Then 
    combobox1.items.add("Finance") 
Else if reader(15).ToString = "Yes" Then 
    combobox1.items.add("Networking") 
End iF 

它不工作任何想法如何實現這一目標?

+1

爲什麼不工作? – SysDragon

+0

它不會加載組合框中的項目,也沒有任何類型的錯誤消息...? – CrashOverride

+0

使用斷點進行調試時,讀取器(14或其他)會返回什麼值?你有沒有檢查過任何區分大小寫的問題? –

回答

0

試試這個,你在你的代碼檢查這個條件else if reader(15).ToString = "Yes" Then兩次,可能是這可能是你的問題。

If reader(14).ToString = "Yes" then 
    combobox1.items.add("Developer") 
else if reader(15).ToString = "Yes" Then 
    combobox1.items.add("Finance") 

'--------------\/ May be this could be your problem. 
Else if reader(15).ToString = "Yes" Then  
    combobox1.items.add("Networking") 
End iF 

請考慮這一點,這可能會解決您的套管問題。

If reader("Dev").ToString.ToUpper() = "YES" then 
     combobox1.items.add("Developer") 
    else if reader("Fin").ToString.ToUpper() = "YES" Then 
     combobox1.items.add("Finance") 
    Else if reader("Net").ToString.ToUpper() = "YES" Then  
     combobox1.items.add("Networking") 
    End iF 
+0

我沒有檢查過套管問題。 – CrashOverride

0

使用Equals檢查值,名稱爲領域,ElseIf(一起)規定的條件,並檢查是否能解決你的問題:

If reader("Dev").ToString.Equals("yes", StringComparison.InvariantCultureIgnoreCase) Then 
    ComboBox1.Items.Add("Developer") 
ElseIf reader("Fin").ToString.Equals("yes", StringComparison.InvariantCultureIgnoreCase) Then 
    ComboBox1.Items.Add("Finance") 
ElseIf reader("Net").ToString.Equals("yes", StringComparison.InvariantCultureIgnoreCase) Then 
    ComboBox1.Items.Add("Networking") 
EndIf 

但它會更好如果以不同的方式將值存儲在數據庫中。例如,您只能將類型存儲在一個字段中。例如「Dev」,「Fin」或「Net」。或者甚至更好,有一個新的表,ID,值和代碼,只使用ID。

0
If reader(9).ToString = "yes" Then 
    ComboBox1.Items.Add("Developer") 
ElseIf reader(9).ToString = "no" Then 
End If 
If reader(11).ToString = "yes" Then 
    ComboBox1.Items.Add("Finance") 
ElseIf reader(11).ToString = "no" Then 
End If 
If reader(10).ToString = "yes" Then 
    ComboBox1.Items.Add("Networking") 
ElseIf reader(10).ToString = "no" Then 
End If 
相關問題