VsFlexGrid点滴

一、获取鼠标左键点击的当前行列号
       Dim r&, c&
       r = VSFlexGrid1.MouseRow
       c = VSFlexGrid1.MouseCol
二、设置某一列显示格式
       VSFlexGrid1.ColFormat(col) = Format()  
       说明：其中Format()是String对象处理函数，Format()共有8中固定格式，
                 测试数据12345.12345
                1>General Number 格式：与原数据保持一致。Format("Gerneral Number")          12345.12345
                2>Fixed               格式：小数点右边按四舍五入保留两位小数。Format("Fixed")       12345.12
                3>Standard        格式：使用千分隔符，小数点右边按四舍五入保留两位数字。         12，345.12
                4>Percent           格式：乘100后加“%”符号，小数点右边四舍五入保留两位数字。1234512.34%
                5>Scientific        格式：按科学计算实用记数法。                                                       1.24E+04
                6>Yes/No            格式：数字为0时显示No，否则为Yes。                                          Yes
                7>True/False       格式：数字为0时显示False，否则为True。                                     True
                8>On/Off            格式：数字为0时显示Off，否则为On。                                           On
        除了固定格式之外，Format还可以自己定义输出格式：
               “0”：占位符，必须出现的数字位，如果该位没有数字以0补充。
               “#”：占位符，可以省略的数字位。
              “%”：百分号占位符。将表达式乘100后，加上%。
                ”.”：小数点占位符。
              “,“  ：千分隔符。
                 测试数据：1234567.1234567
                       #和0                 "##,#00.00"                     :1,234,567.12
                       加字符              "合计：##0E+##"            :合计：123E+4
                      加符号               "$00.0000"                       :$1234567.1235