高手来帮忙看看，是在不知道怎么改了！！在线！！

  问题是这样，我将EXCEL表中数据导入SQL2000中，其中EXCEL中有个字段叫“编码”，里面的数据是1，2，3，4、、、、、、、、到1000，然后我导入数据库想他格式统一为4位有效数字，就是0001，0002，，，，，，，实际上就是怎么自动补0的问题，我用了Format这个函数，但是要报错
ADOQuery1.FieldByName('UserCode').asstring:=Format('%.4d',[ADOQuery2.fieldbyname('编码').AsString]);