1

这是声明：

Public Class Client
Public Property Address() As String
    Get
        Return mAddress

    End Get
    Set(ByVal value As String)
        mAddress = value
    End Set
End Property
Public Property City() As String
    Get
        Return mCity

    End Get
    Set(ByVal value As String)
        mCity = value
    End Set
End Property
end sub

错误就在这里：

Public Function InsertClientRecordToDb(ByVal cli As Client) As Boolean
        Dim retVal As Boolean
        Dim dataSet As DataSet = New DataSet("dataSet")
        dataSet.EnforceConstraints = False
        'create table adapter object
        Dim ClientTblAdapter As New CaseStudyDBDataSetTableAdapters.Client_TableTableAdapter

    'check db connection
    If ClientTblAdapter.Connection.State = ConnectionState.Closed Then
        ClientTblAdapter.Connection.Open()
    End If

    'perform(insert)
    If ClientTblAdapter.InsertClientRecord(cli.Clientcode, cli.Clientname, cli.Address, cli.City, cli.Contactperson, cli.Contactnumber) > 0 Then
        retVal = True
    End If**

    Return retVal
End Function

“cli.Address”和“cli.City”下划线表示：

String 类型的值不能转换为 Byte 的一维数组

似乎是什么问题？

4

1 回答 1

1

对于错误，您似乎正在尝试将字符串分配给Byte()

就像是 ：

Dim bArr As Byte() = "hello world!"

这是错误的，要将字符串转换为Byte() 您需要使用Encoding该类

Dim bArr As Byte() = System.Text.Encoding.Default.GetBytes("hello world!")
于 2013-03-11T03:28:58.733 回答