VB.net将 DataRow()一行转换成String()

在VB.NET中，将 DataRow 对象转换为字符串通常涉及获取特定列的数据并将其连接起来形成一个字符串。以下是一个简单的示例：

Dim row As DataRow = '假设这是从DataTable中获取的一行数据
Dim columnToConvert As DataColumn = '指定你想要转换的列

'检查该行是否包含指定列
If Not row.Table.Columns.Contains(columnToConvert.ColumnName) Then
   Throw New ArgumentException("Column not found.")
End If

Dim cellValue As Object = row(columnToConvert.ColumnName)
'处理 null 或 DBNull的情况
If cellValue Is DBNull.Value OrElse cellValue Is Nothing Then
   Dim valueStr As String = "N/A" '或其他默认值
Else
   valueStr = cellValue.ToString()
End If

'如果需要，你可以选择连接多个列的值
Dim rowData As StringBuilder = New StringBuilder()
rowData.AppendLine(valueStr)

'如果你有多个列需要转换，可以添加更多的行到StringBuilder
For Each col In row.Table.Columns
   If col.ColumnName <> columnToConvert.ColumnName Then
       Dim cell As object = row(col.ColumnName)
       If Not (cell Is DBNull.Value) Then
           rowData.AppendLine($"{col.ColumnName}: {cell}")
       End If
   End If
Next

'最后，返回转换后的字符串
Dim result As String = rowData.ToString()

在这个例子中，我们首先获取指定列的值，然后判断它是否为 `DBNull` 或 `Nothing`，如果不是，我们就将其转换为字符串。如果需要，还可以遍历更多列并将它们连接到结果字符串。