DBNullを文字列に変換する前にStringを文字列に変換する

Question

データベースのデータをdatagridviewに読み込む際にDBNullを文字列に変換する方法が必要です。以下は私のコード

Private Sub FetchData() 

    sql = "SELECT ContributionType,Status,PayMethod,BankName,AccountNo,Amount,FullName,District,Refno,ContributorGrp" 
    sql &= " FROM tblincome WHERE TxnID=@id" 

    command = New OleDbCommand(sql, connection) 
    command.Parameters.Add(New OleDbParameter("@id", OleDbType.VarChar)).Value = lbltxnid.Text 

    adapter = New OleDbDataAdapter(command) 
    dt = New DataTable 
    adapter.Fill(dt) 



    For Each row In dt.Rows 
     PopulateGrid(row(0), row(1), row(2), row(3), row(4), row(5), row(6), row(7), row(8), row(9)) 
    Next 

    dt.Rows.Clear() 
    dt.Dispose() 
End Sub 

Private Sub PopulateGrid(ContributionType As String, Status As String, PayMethod As String, BankName As String _ 
         , AccountNo As String, Amount As Double, FullName As String, District As String _ 
         , Refno As String, ContributorGrp As String) 

    Dim row As String() = New String() {ContributionType, Status, PayMethod, BankName, AccountNo, Amount.ToString("N") _ 
             , FullName, District, Refno, ContributorGrp} 
    dgvcontributions.Rows.Add(row) 
End Sub 

彼らはnull値を持つものである可能性が最も高いのでBankNameとAccountnoがnullのエントリを可能にフィールドがあります。

あなたがこの方法で使用することができ

Answer 1

：

：あなたが明示的に型を指定する必要があります（オプション）フォールバック値を指定しない場合

Dim bankName As String = ConvertDbVal(row(3), "") 
Dim accNumber = ConvertDbVal(row(4), "") 

：

Public Shared Function ConvertDbVal(Of T)(obj As Object, Optional nullFallbackVal As T = Nothing) As T 
    If obj Is Nothing OrElse obj.Equals(DBNull.Value) Then 
     Return nullFallbackVal 
    Else 
     Return CType(obj, T) 
    End If 
End Function 

使用上の

Dim bankName As String = ConvertDbVal(Of String)(row(3))