改成
Dim cmd As new SQLCommand cmd.CommandText = "Select 第一列,第二列 from {表A}"Dim Values = cmd.ExcuteValuesIf Values.Count > 0 Then Output.show(Values("第一列").tostring) Output.show(Values("第二列").tostring)End If