Dim a As Stringa = DataTables("表A").Compute("min(第一列)","1=2")msgbox(a=Nothing)a = a.replace("m","n")
要判断是否为空才行的。