2010-04-16 83 views
0

所以我在我正在工作的vb6項目中有flexgrid。它在每一行上都有名稱,我有一個下拉菜單,用戶可以選擇他們想要查看更多信息的名稱,這裏是我的。搜索後只顯示一行。 flexgrid vb6

Dim target_name As String 

昏暗R作爲整數

' Get the name. 
target_name = Combo1 
If Len(target_name) = 0 Then Exit Sub 

' Search for the name, skipping the column heading row. 
target_name = LCase$(target_name) 
For r = 1 To MSFlexGrid1.Rows - 1 
    If LCase$(MSFlexGrid1.TextMatrix(r, 0)) = _ 
     target_name Then 
     ' We found the target. Select this row. 
     MSFlexGrid1.Row = r 
     MSFlexGrid1.RowSel = r 
     MSFlexGrid1.Col = 0 
     MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1 

     ' Make the row visible. 
     MSFlexGrid1.TopRow = r 
     Exit Sub 
    End If 
Next r 

行之有效,但它表明名稱下的所有內容也一樣,我想它挑出唯一入選的名稱。 任何幫助將是偉大的。

回答

0

什麼是網格的數據源?您可以將篩選器放置在數據網格數據源上,以便用戶從下拉列表中選擇名稱時,只會將所選人員詳細信息從數據源返回到網格。 不完全是你問的,但它如何實現你想要的結果。

P.S.我已經在vb6中使用了flexgrid,我不知道有什麼辦法可以做到你在網格上的要求(可能在那裏,但我從來沒有注意到它)。