红袍老师，我做了个例子，有两个问题点：1.画框内的是双精度小数列，当“批号”列的行=“时间”时，扩展成时段列；2.主表与子表依靠编号进行关联，当子表的精度最大值等于5的时候，子表的其他精度也保持固定在5位小数，保持一致，详见画圈部分~~谢谢红袍老师了~~

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:小数位数统一与双精度扩展时段.foxdb

下面是小数位数，是我自己写的代码，可是应用后又不成功，把其他编号的位数也设置成了这个位数；另外再加一位数，代码就不生效了~~

Dim i As Integer
Dim i2 As Integer = 0
\'For Each c As Col In Tables("管制图样本测量").Cols
  For i3 As Integer = 1 To 30 
    For Each r As Row In Tables("管制图样本测量").Rows
\'If r("样" & i3)
        \'If c.name <> "批号" Or c.name <> "管制图编号" Or c.name <> "合计" Then
            \'If r("批号") <> "ΣX" Or r("批号") <> "Xbar" Or r("批号") <> "R" Then
                \'Dim r As Double = 0.005
                \'i = r.tostring().length-r.Tostring().lastindexof(".")-1
                i = r("样" & i3).tostring().length-r("样" & i3).Tostring().lastindexof(".")-1
                \'MessageBox.Show(c.name)
                If i > i2 Then
                    i2 = i
                    \'MessageBox.Show(i)
                \'End If
            End If
            \'
            \'MessageBox.show(d.tostring().length-d.Tostring().lastindexof(".")-1)
\'End If
        Next
Next
    \'Next

MessageBox.Show(i2)
DataTables("管制图样本测量").DataCols("样1").SetFormat("0.000000")

1、不可能根据一行修改某列的类型的，要改只能整列一起改；

2、如果你用字符列，你填什么都没问题；

3、设置精度，也是对整个列设置的，不能根据你不同的编号设置各种的精度；

4、你只能改成字符列，才行。