Public Function PanKong(ByVal Zhi, ByVal LeiXing)
Try
'DBNull.Value()
If IsDBNull(Zhi) Then
If LeiXing = "数字" Then
PanKong = 0
Else
PanKong = ""
End If
Else
If LeiXing = "字符" Then
PanKong = Trim(Zhi)
Else
PanKong = Zhi
End If
End If
Catch ex As Exception
Throw New DBAccessException(ERR_DBACCESS_409 & ex.Message)
End Try