如何实现选择列显示？？？

[lingdu1225]

我的代码是
Dim str As String = Label2.Text
Dim dt As New DataTable
Dim dv As New DataView
Me.dv.RowFilter = "姓名='" + str + "'"

OleDbDataAdapter1.Fill(dt)
DataGrid1.DataSource = dt
为什么datagrid里输出的还是整张表，而不是姓名=Label2.Text的行？？？？

刚看是学，请大家帮忙哈！！！！！！！！！！

[Jash_Qi]

手动建N个列.把不想显示的VISIBLE设置为FALSE
然后用DATASET循环绑定DATAGRIDVIEW
Dim nRowCount As Integer
Me.DGVMail.DataSource = Nothing
Me.DGVMail.Rows.Clear()

Try
DGVMail.RowCount = ds.Tables(0).Rows.Count
'数据显示在DataGridView控件中
For nRowCount = 0 To DGVMail.RowCount - 1

DGVMail(0, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("NOTICE_ID").ToString.Trim
DGVMail(1, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("NOTICE_TITLE").ToString.Trim
DGVMail(2, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("NOTICE_CONTEXT").ToString.Trim
DGVMail(3, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("NOTICE_TIME").ToString.Trim
DGVMail(4, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("USER_ID").ToString.Trim
DGVMail(5, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("DEPT_ID").ToString.Trim
DGVMail(6, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("KIND").ToString.Trim
DGVMail(7, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("IS_VALID").ToString.Trim
DGVMail(8, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("IS_VALID").ToString.Trim
DGVMail(9, nRowCount).Value = ds.Tables(0).Rows(nRowCount).Item("IS_VALID").ToString.Trim
Next
'Me.DGVMail.Refresh()
Catch ex As Exception
End Try
""中的部分为数据库字段名

[Jash_Qi]

在手动绑定数据这个环节GRIDVIEW和DATAGRIDVIEW是一样的

[lingdu1225]

DGVMail？？是什么意思啊？
我刚开始学不太会，抱歉！
我的实现方式不行吗？

[alvisyue]

把 Me.dv.RowFilter = "姓名='" + str + "'" 这句放到DataGrid1.DataSource = dt 后面试一下

[lingdu1225]

结果还是一样，全显示

[it_gz_xi]

[Quote=引用 3 楼 lingdu1225 的回复:]
DGVMail？？是什么意思啊？
我刚开始学不太会，抱歉！
我的实现方式不行吗？
[/Quote]
他的DGVMail就是DATAGRIDVIEW控件其基本性能和DataGrid控件差不多，功能比DataGrid要强大

[lingdu1225]

谢了，可是我没有找到这个控件啊！

[it_gz_xi]

DataGridView控件是VS2005的

[wy24789]

Dim str As String = Label2.Text
Dim dt As New DataTable

OleDbDataAdapter1.Fill(dt)
dt.DefaultView.RowFilter = "姓名='" + str + "'"
DataGrid1.DataSource = dt

2005测试通过

[lingdu1225]

我试了一下，还是有一点问题！
Dim str As String = Label2.Text
Dim dt As New DataTable

OleDbDataAdapter1.Fill(dt)
dt.DefaultView.RowFilter = "姓名='×××'"
DataGrid1.DataSource = dt
可以实现，可是换成 "姓名='" + str + "'"
就显示为空
我用的是2003，是定义的str的问题吗？？？

[alvisyue]

...你这个'''+str+''' 的意思是姓名=+STR+

[lingdu1225]

谢谢各位了，已经解决了
我加了个按钮触发了一下
多谢大家的帮忙！！！！！！！！！
以后请多关照哈！！！！！