用MSHFlexGrid显示小数时，它会显示小数点后很多位。而平时我们只需要精确到小数点后两位即可。
下面就用SQL语句来解决这个问题。

    Dim sql As String
   
    sql = "select format(折扣,''''##0.00'''') as 折扣 from Table1"
    rst.CursorLocation = adUseClient
    rst.Open sql, "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\tt.MDB;Persist Security Info=False", , , adCmdText
    Set MSHFlexGrid.Recordset = rst
    rst.Close

在Access数据库中用Format()函数
在SQL数据库中用Convent()函数