主题：数据类型单元格的编缉状态

第一个问题，看看这个方法：

http://help.foxtable.com/topics/0557.htm

不能合并，说明表事件设置不当，要么修改表事件，要么参考：

http://help.foxtable.com/topics/2218.htm

Dim ColNames As String() = {"日期","客户","雇员"}

Dim r As Row = Tables("表名").Current '获得当前行

If r isNot Nothing Then
    For Each ColName As String in ColNames
         e.DataRow(ColName) = r(ColName) 
    Next
End If