给你一个函数
Function Nvl(field As Variant, default As Variant) As Variant If (IsNull(field) = True) Then
Nvl = default
Else
Nvl = field
End If
End Function'test = Nvl(.Fields("test"), " ")
Function Nvl(field As Variant, default As Variant) As Variant If (IsNull(field) = True) Then
Nvl = default
Else
Nvl = field
End If
End Function'test = Nvl(.Fields("test"), " ")
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货