摘要：
（一）双击展开，收缩字表ExpandedChild1 Private Sub ExpandedChild(ByVal sender As DevExpress.XtraGrid.Views.Grid.GridView)2 '找出焦点行3 Dim VIntPage As Integer = sender.FocusedRowHandle4 If sender.GetMasterRowExpanded(VIntPage) Then5 sender.CollapseMasterRow(VIntPage)6 Else7 sender.ExpandMasterRow(VIntPage)8 End 阅读全文
