有一个getsqldecimal吧,试试,然后再用convert转换成decimal就可以了

解决方案 »

  1.   

    If i = 1 Then
         row1col.Controls.Add(New LiteralControl(dr(i).ToString))
      Else
         row1col.Controls.Add(New LiteralControl(dr(i).ToString))
      End If
      

  2.   

    For i = 0 To 12
      Dim row1col As New TableCell
      If i = 1 Then
         row1col.Controls.Add(New LiteralControl(dr.GetString(i).ToString))
      Else
         row1col.Controls.Add(New LiteralControl(dr.GetDecimal(i).ToString))
      End If
      r.Cells.Add(row1col)
    Next
    -->
    For i = 0 To dr.FieldCount
      Dim row1col As New TableCell
      row1col.Controls.Add(New LiteralControl(dr(i).ToString()));
      r.Cells.Add(row1col)
    Next
      

  3.   

    同意 cyp503(谁怕?一蓑烟雨任平生) 同时,如果你的数据中有NULL值,也可能出错,所以,做好在dr(i).ToString()时判断一下它的值是否为空
      

  4.   

    If not isdbnull(dr(i)) then ...