2011-10-31 46 views
-2

使用VB6如何顯示所選記錄

列表框

checkbox EmpID 

Selected 001 
unSelected 002 
Selected 003 
.... 
.... 

我只想查看屬於選定僱員的記錄。

查詢

Select * from table where empid = "checkbox selected employees" 

期望輸出

EmpID Name Dept. 

001 Rajan IT 
003 Vijayan Accounts 

什麼代碼,我需要在列表框中選擇多個員工呢?

+0

你爲什麼要刪除數據庫和sql-query標籤? – Deanna

回答

3

你可以通過建立一個WHERE條件來做到這一點。

由於最終SQL必須沿着這些路線的東西:

SELECT EmpID, Name, Dept FROM Employees WHERE EmpID='001' OR EmpID='003'; 

或者,如果你的數據庫支持的話:

SELECT EmpID, Name, Dept FROM Employees WHERE EmpID IN ('001', '003'); 

你只需要通過所有的複選框,並創建字符串使用類似的東西:

'Find each checked item 
For Index = 0 to CheckListBox.ListCount - 1 
    If CheckListBox.Selected(Index) Then 
    'Append to an ID list string 
    If IDList <> "" Then IDList = IDList & ", " 
    IDList = IDList & "'" & Format(CheckListBox.ItemData(Index), "000") & "'" 
    End IF 
Next 

'Create the final SQL statement 
If IDList <> "" Then 
    Query = "SELECT EmpID, Name, Dept FROM Employees WHERE EmpID IN (" & IDList & ");" 
End If 

作爲任何更具體的比這是很難沒有知道您正在使用的數據庫引擎和庫,複選框控件結構或數據庫模式。

+0

我有n個EmpID .... – Gopal

+0

請原諒?在我能給出更詳細的答案之前,我仍然需要額外的信息。 – Deanna

+0

我需要vb6代碼幫助,而不是查詢幫助。 – Gopal