主题：[求助]专业报表将份额和占比转换百分比？

这样：

 

rx.Text = Format(r("列名"),"#0.00%")

For Each Col AS DataCol In Dt.DataCols
    rt.Cells(0,Count).Text = Col.Caption
    For r As Integer = 0 To dt.DataRows.Count - 1
        If col.Name = "要百分比显示的列的名称" Then
            rt.Cells(r +1,Count).Text = Format(dt.DataRows(r)(Col.Name ),"#0.00%")
        Else
           rt.Cells(r +1,Count).Text = dt.DataRows(r)(Col.Name )
        End If
    Next
    Count = Count + 1
Next

是的

Select Col.Name
      case "百分比列名1"," 百分比列名2, "百分比列名3" ......
            rt.Cells(r +1,Count).Text = Format(dt.DataRows(r)(Col.Name ),"#0.00%")
      case else
           rt.Cells(r +1,Count).Text = dt.DataRows(r)(Col.Name )
End Select

这么设置后，显示的成什么样了？

你是不是列名错了，注意列名和标题不一定相同的。

那就是你代码中的列名不对，不会有别的原因的。

先查看此表的结构，参考：

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