With objDT.Rows.Item(0)
If .Item("SRNO_CODE").ToString.Trim <> "" Then
''MASTER.SRNO_CODE <> "" 則送達MASTER.UNIT_CODE_MASTER
strDOWN_UNIT = .Item("UNIT_CODE_MASTER").ToString.Trim
Else
strDOWN_UNIT = .Item("UNIT_CODE").ToString.Trim
End If
End With