如何做到部分单元合并,部分不合并
编号:QA004437
建立日期: 2001年10月4日 最后修改日期:2001年10月4日
所属类别:
lyg:
使用环境:
VB6.0
Windows me
我现在需要将.TextMatrix(6, 3)和 .TextMatrix(6, 4)不合并,只合并 .TextMatrix(6, 1)和 .TextMatrix(6, 2)。按以下代码,是(6, 1)与(6, 2)合并,(6, 3)与(6, 4)也合并,代码如下:
Public Sub hjdx(ByVal msfGrid As MSFlexGrid)
With msfGrid
.MergeCells = flexMergeRestrictRows
.MergeRow(6) = True
'下两格相同值,但不合并。
.TextMatrix(6, 3) = jf
.TextMatrix(6, 4) = jf
'下两格相同值,合并。
.TextMatrix(6, 1) = "大写金额:" & ChMoney(.TextMatrix(6, 3))
.TextMatrix(6, 2) = "大写金额:" & ChMoney(.TextMatrix(6, 3))
End With
End Sub
回答:
你可以这样:
.TextMatrix(6, 3) = jf
.TextMatrix(6, 4) = jf + " "
因为在合并时,MSFlexGrid严格比较字符串是否相同,多了一个空格就不相同了,而看上去仍然是相同的。
此问题由李海回答。
| |
|
|
| |
|
|