这句代码去掉,不然就增加10000行空白行啊
CurrentTable.AddNew(10000)
------------ 删除数据的代码没有问题,你单独执行看有没有问题
------------导入数据的代码没问题
文本提示能不能再导入完成之后5秒 自动隐藏
去编写timertick事件
e.Form.TimerEnabled = False
e.Form.Controls("提示").Text = ""
--------------------
导入成功后执行
e.Form.TimerInterval = 5000
e.Form.TimerEnabled = True