cmd.CommandText = "select Max(回车时间),状态,车号 from {车辆资料} where 车号= 'AB'"dim dt as datatable = cmd.ExecuteReaderdim dr as datarow if dt.Datarows.Count > 0 Then dr= dt.datarows(0)End If