Question

我在将VB.NET应用程序安装到其他计算机时遇到问题。

按下按钮添加并选择项目时，程序说输入字符串的格式不正确。我的数据表声明在这里：

Private Sub prvFillDT()
        dtSales = New DataTable
        dtSales.Columns.Add("no", System.Type.GetType("System.String"))
        dtSales.Columns.Add("goodscode", System.Type.GetType("System.String"))
        dtSales.Columns.Add("goodsname", System.Type.GetType("System.String"))
        dtSales.Columns.Add("information", System.Type.GetType("System.String"))
        dtSales.Columns.Add("qty", System.Type.GetType("System.Double"))
        dtSales.Columns.Add("price", System.Type.GetType("System.Double"))
        dtSales.Columns.Add("discount", System.Type.GetType("System.Double"))
        dtSales.Columns.Add("total", System.Type.GetType("System.Double"))
End Sub

这是按钮添加代码

Dim arrFields() As String = {"GoodsCode", "GoodsName", "Stock", "UnitPrice"}
Dim kn As SqlConnection = OpenKNS(Settings.ConnectionString)
Dim cmd As SqlCommand = New SqlCommand("usp_is_Goods_SLC_01", kn)
If fLookup.GetLookUpSP("List Goods", cmd, arrFields, "", "") Then
    Try
        If fLookup.pubLookUpDone Then
            If arrFields(2) = "0" Then
                MsgBox(arrFields(1) & " stock is not enough !")
                   Exit Sub
            End If
            bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "goodscode", arrFields(0))
            bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "goodsname", arrFields(1))
            bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "qty", 1)
            bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "price", arrFields(3))
            bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "total", 1 * arrFields(3))
        End If
    Catch ex As Exception
    bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "goodscode", "")
    bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "goodsname", "")
    bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "qty", 0)
    bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "price", 0)
    bndReport2.SetRowCellValue(bndReport2.FocusedRowHandle, "total", 0)
    End Try
    bndReport2.UpdateSummary()
End If

这里是Storedprocedure：

SELECT GoodsCode,GoodsName,Stock,
CONVERT(varchar,UnitPrice,1) UnitPrice 
FROM Ms_Goods WHERE [Status]=1

问题只出现在其他计算机上，但我的问题是代码或计算机上的问题？

Answer 1

我在测试一些样本后已经找到了自己的答案。

这个问题的答案是因为Region＆amp;语言我的计算机使用英语（美国）和其他计算机使用不同的格式（印度尼西亚，印度，新加坡等）

其他计算机显示输入字符串格式不正确

1 个答案: