请问这种表格效果是用什么控件或是怎么做成的？

Question

如图：主要有二个问题。
一是最顶那里如何做到“基本尺寸”下面又有小栏目“d”“D”“B”等呢？
二是最左边那个黑色三角箭头如何做出来的？

Answer 1

MSHFlexGrid 控件MergeCol、MergeRow 属性
返回或设置一个值，决定哪些行和列可以把它们的内容合并。要使用 MergeCells 属性，这些属性必须为 True。  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 
http://feiyun0112.cnblogs.com/

Answer 2

先谢谢你的回答。
object.MergeCells [=value]
value 的设置值如下所示：
常数 值 描述 
flexMergeNever             0  不显示。包含相同内容的单元不分组。这是缺省设置。 
flexMergeFree              1  自由。包含相同内容的单元总是合并。 
flexMergeRestrictRows      2  限制行。只有行中包含相同内容的相邻单元（向当前单元左边）才合并。 
flexMergeRestrictColumns   3  限制列。只有列中包含相同内容的相邻单元（向当前单元上方）才合并。 
flexMergeRestrictBoth      4  限制行和列。只有在行中（向左）或在列中（向上）包含相同内容的单元才合并。 
象上面图的情况，一般是那个值，还是不太明白你所说的。可否麻烦你一下给个简单的例子来？
还有那个最左边黑色三角形选项是设置那个属性值得来的呢？

Answer 3

找到了这类答案了，可是新问题又出来了，我导入mdb数据时会复盖掉我的效果....With MSHFlexGrid1
                  .Rows = 10
                  .Cols = 4
                  .FixedCols = 0
                  .FixedRows = 2
                                    
                  .TextMatrix(0, 0) = "编号"
                  .TextMatrix(1, 0) = "编号"
                    
                  .TextMatrix(0, 1) = "姓名"
                  .TextMatrix(1, 1) = "姓名"
    
                  .TextMatrix(0, 2) = "总工资"
                  .TextMatrix(0, 3) = "总工资"
                    
                  .TextMatrix(1, 2) = "基本"
                  .TextMatrix(1, 3) = "奖金"
                    
                  .MergeCells = flexMergeFree
                  .MergeCol(0) = True       '合并第一列
                  .MergeCol(1) = True       '合并第二列
                  .MergeRow(0) = True       '合并第一行
                    
                  .ColAlignmentFixed(0) = 4       '列标题居中
                  .ColAlignmentFixed(1) = 4
                  .ColAlignmentFixed(2) = 4
                  .ColAlignmentFixed(3) = 4
          End With

Answer 4

在Delphi里面有中控件叫DBGird.跟上面的贴图就差不多.
估计上面的贴图是Delphi里面的DBGird控件.
如果你想实现这样的三角型效果
可以做一个这样的三角型出来.把它放在Picture控件中.
当事件中判断下鼠标位置就OK了.