查看單個文章
舊 2011-05-05, 10:12 PM   #1
飛行船大大
註冊會員
 
飛行船大大 的頭像
榮譽勳章
UID - 282126
在線等級: 級別:14 | 在線時長:264小時 | 升級還需:21小時級別:14 | 在線時長:264小時 | 升級還需:21小時級別:14 | 在線時長:264小時 | 升級還需:21小時級別:14 | 在線時長:264小時 | 升級還需:21小時
註冊日期: 2007-10-09
文章: 172
精華: 0
現金: 311 金幣
資產: 7311 金幣
預設 VB6+ MSFlexGrid 的問題

MSFlexGrid1 的屬性 SelectionMode 我因為其他因素必須設0
且 最左邊的col= 0的直欄 我是隱藏的
如下圖:
http://fancytom.myweb.hinet.net/P68_P50.JPG

圖中的右半邊 有一個MSFlexGrid1 控制項
所以現在希望當 user 若點中某一列某一行(例如畫面中第1 row 第1col 的 "100000" 或 第1 row 第2col 的 "上市加權" ) -->希望那一列整列的row就高亮反白.

問題來了:
當 user 若點中(例如畫面中第1 row 第1 col 的 "100000" 或是 第1 row 第2 col 的 "上市加權" ) 時 -->我想模擬成 使程式也自動點中 第1 row 第0 col (即被隱藏的的那個cell) .看看是否可以那一列整列的row就高亮反白

請問 MSFlexGrid1 此事件&指令 VB6應該如何寫 ??

---
我有試過 SelectionMode=0 情況下 (但是反白只有點中的cell的右邊有反白 左側沒有反白 , 所以不符需求)
語法:
Private Sub MSFlexGrid1_Click()
   Dim i As Long, x_代號 As String
'MSFlexGrid1.Row = MSFlexGrid1.RowSel 
' 取得列之索引值。
'strRowTitle = MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1)
'MsgBox strRowTitle

   For i = 0 To MSFlexGrid1.cols - 1
      MSFlexGrid1.ColSel = i
      MSFlexGrid1.BackColorSel = vbBlue
   Next
End Sub

此帖於 2011-05-05 10:24 PM 被 飛行船大大 編輯.
飛行船大大 目前離線  
送花文章: 178, 收花文章: 61 篇, 收花: 139 次
回覆時引用此帖