Question

使用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

在列表框中选择多名员工需要哪些代码？

Answer 1

您可以通过构建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

如果不了解您正在使用的数据库引擎和库，复选框控制结构或数据库架构，那么比这更具体是很困难的。

如何显示所选记录

1 个答案: