DBCommand = New sqlDataAdapter _
("Select * from employees Where employees.处室ID = ddlDepartments.SelectedItem.Value",DBConn) 
====>
DBCommand = New sqlDataAdapter _
("Select * from employees Where employees.处室ID = "&ddlDepartments.SelectedItem.Value,DBConn)