100分求助,如果EXCEL中的内容(日期)为空,则出现异常,请问怎么解决.急!!!

[zameszhang]

dm->ADOQuery1->FieldByName("PlanStartDate")->Value = XLSheet.PG("Cells",i,12);


数据库中PlanStartDate字段类型为日期型
如果如果EXCEL中的内容(日期)为空,则出现异常,如果有数据,则正确.
异常提示为:不能从Variant(dispatch)类型转换为TDateTime类型
怎么解决啊?

[kubite]

variant a=XLSheet.PG("Cells",i,12);
if(VarToStr(a).Length()<=0)
{
//你的操作
}
else
{
//你的操作

}

• 打赏
• 举报

回复 赞

[runnerrunning]

good
up....

• 打赏
• 举报

回复 赞