vb语句翻译在线等im strsql As StringOn Error GoTo ErrMsg

网友回答

这是一段ADODB代码,作用是向数据库中写入数据.
首先是判断输入数据的有效性（是有为空）,之后打开一个连接对象与数据库进行连接,写一段SQL语句,打印在界面,然后执行,最后关闭对象（奇怪的是这么没清空记录集）~之后调用一个RefreshTypeList过程,让adc_xgsj这个记录集移动到最后一条记录.一个MSGBOX提示添加完成~.
最后ERRMSG是一段出错提示代码.
这个过程就结束了.
还有不懂得可以问我,