raised exception class EVariantTypeCastError with message 
'Could not convert variant of type(Null) into type (String)'....................这个错误发生在打开数据库时,我的表连接用TADOConnection.ConnectString是
Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DBQ=E:\Stocks\分析练习\StockAnal.mdb;DefaultDir=E:\Stocks\分析练习;Driver={Driver do Microsoft Access (*.mdb)};DriverId=25;FIL=MS Access;FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\KevinAnal.dsn;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;"是系统评出来的,很奇怪.