Dim dr As DataRow dr = DataTables("客户信息").SQLFind("客户名称 = '广州时达轴承有限公司'")If dr IsNot Nothing Then dr("等级") = "初次设计"
dr.SaveEnd If