求助excel vba 连接到OBD数据库后的问题

请看下面的代码，有注释的！
Private Sub CommandButton5_Click()
Dim Conn As New ADODBConnection '定义ADODB连接对象
Dim ConnStr As String '定义连接字符串
Dim xiao As String
xiao = ComDataText
'对于SQL 2008，如果以IP方式访问服务器，必须要启动SQL Server Browser服务，如果是Express版本，要以“IP(计算机名)\实例名”方式访问
ConnStr = txtDataText
Dim Records As New ADODBRecordset '定义ADODB对象的记录集
Dim Sheet As Worksheet '定义工作表
Set Sheet = ThisWorkbookWorksheets("Sheet2") '给变量Sheet赋值，注意：是工作簿中索引为1的那个表（通常一个新的工作簿Sheet1的索引为1）
'SheetName = "Data" '把Sheet名称改为Data
SheetCellsClear '清空表中原有的数据
'连接状态是打开就不在进行Open *** 作
ConnOpen ConnStr

VAS5052A是德国大众和奥迪公司特约服务站指定的必备汽车检测仪。在全球范围内，德国大众、奥迪、捷克大众斯柯达、西班牙大众西雅特以及国内的上海大众、一汽大众-奥迪等服务站都采用了这种设备。它的功能是其他任何诊断仪器所不能替代的。相比VAS1552，它的功能更加完善强大，内存空间更大。同时，它还具有大屏幕显示、触摸屏 *** 作和中文菜单的特点。奥迪大众5052A专用诊断仪器产品配置包括发动机控制系统、空调电器仪表盘、变速器控制系统、安全气囊、电动天窗、制动控制系统、防滑控制、离合器控制、柴油泵控制系统、防盗系统、钥匙匹配等模块功能。VAS5052具有控制电脑型号、读取故障码、清除故障码、测试执行元件、基本调整、读测量数据块、单独通道数据、控制单元编码、自适应匹配、登录、设置服务商代码、传送汽车底盘号等多种 *** 作模式，具备OBD-诊断功能。此外，VAS5052还具有专家系统功能。该系统提供了详尽的原厂维修资料信息，如电路图、元件位置图、技术服务公告、拆装图以及各种准确的技术参数等。还可自动根据读入的故障代码或输入的故障现象引导维修人员从表到里进行故障分析、故障查询，直到排除故障。同时，还可以通过方便的升级及时跟踪、维修最新车型。VAS5052A的检测仪配置包括VAS5052A主机、蓝牙诊断接头、主机包、电源线、自诊断器、充电座、通用串行总线电缆、仪器箱、触摸笔等。除此之外，VAS5052A还可以进行更多的功能扩展。VAS5052A的英文简介称它为第二代诊断检测仪，现已到达我们的车间。它采用了最新的技术选项，为未来的诊断软件和硬件做好了准备，并对之前的型号进行了改进。车间兼容性、易用性和移动性也得到了优化。VAS5052A还具备准备与诊断软件ODIS一起使用的能力，并可通过安装必要的接口，访问本地服务器上的服务信息或互联网数据，从而为客户提供完整的诊断和服务信息解决方案。同时，VAS5052A的多媒体功能还允许直接连接到大众的服务培训概念。在技术数据方面，VAS5052A采用非常明亮的日光兼容显示屏，具有可更换接口条和轻质但坚固的镁压铸外壳等特点。VAS5052A配备DVD-ROM、宽范围电源装置、诊断接口、手提袋等一系列项目，使其具备更强大的诊断和服务能力。

位于车载终端设备中。车载终端设备是车联网系统的核心部件，它通过连接车辆的OBD接口或CAN总线等方式获取车辆的各种数据，如车速、油耗、转速、故障码等，并将这些数据发送给云端服务器进行处理。

车载T-BOX可深度读取汽车Can总线数据和私有协议，T-box终端具有双核处理的OBD模块，双核处理的CPU构架，分别采集汽车总线Dcan、Kcan、PTcan相关的总线数据和私有协议反向控制。
通过GPRS网络将数据传出到云服务器，提供车况报告、行车报告、油耗统计、故障提醒、违章查询、位置轨迹、驾驶行为、安全防盗、预约服务、远程找车、利用手机控制汽车门、窗、灯、锁、喇叭、双闪、反光镜折叠、天窗、监听中控警告和安全气囊状态等。
在新能源汽车上国家可以监控车辆的行驶信息。在规定的时间内达不到车辆行驶的里程数。对车企就会造成经济损失。

---