这样的窗体如何做的

huangxiuwen

帮你顶到高手做出例子为止。。。。。。。。

huangxiuwen

我晕死掉。。。。顶了这么久。没有一个高手放一个例子上来。哎。。。。。。。。

huangxiuwen

茫茫人海中，你何时才现身？

yangzn

用VSFlexGrid控件
它的帮助文档的示例
Private Sub Form_Load()
        Dim i%

        ' initialize control
        fg.WordWrap = True
        fg.Cols = 9
        fg.FixedRows = 2
        fg.MergeCells = flexMergeFixedOnly

        ' create row headers
        fg.MergeRow(0) = True
' four cells, will merge
        fg.Cell(flexcpText, 0, 1, 0, 4) = "North"  
' four cells, will merge
fg.Cell(flexcpText, 0, 5, 0, 8) = "South"      
For i = 1 To 4
          fg.Cell(flexcpText, 1, i, 1) = "Qtr " & i
          fg.Cell(flexcpText, 1, i + 3, 1) = "Qtr " & i
        Next

        ' create column header
        fg.MergeCol(0) = True
' two cells, will merge
       fg.Cell(flexcpText, 0, 0, 1, 0) = "Sales by " & _ "Product"         
        ' align and autosize the cells
        fg.Cell(flexcpAlignment, 0, 0, 1, fg.Cols - 1) _  = flexAlignCenterCenter
        fg.AutoSize 1, fg.Cols - 1, False, 300

    End Sub

wjb5645

谢谢yanjzn!!
恳请弄个简单的案例,就是列是相同内容时能合并显示在一个大的单元格

再次感谢!!!!![:12] [:12] [:12]

huangxiuwen

终于见到了阳光与希望了。。。。。。。。
感谢“yangzn”，期待例子。

wjb5645

哈哈,想要的朋友来一起高兴下,丫头不用再梦里想了哟,再次感谢帮助的朋友!!!

tz-chf

完全得靠代码完成，并不适用新手。

su_xx

这种窗体,虽然不适用新人,但可以学习啊,很好,很强大,感谢“yangzn”

tz-chf

微软的层次FlexGrid控件可以绑定记录集（见《SQL Server 2000开发指南》P275）