在DrawCell上面写代码写这些代码非常卡,有什么好的建议吗?
Dim ftp1 As new FTPClientftp1.host=""ftp1.Account = ""ftp1.password = ""ftp1.UTF8=TrueIf e.Col.Name="编号" Then If ftp1.DirExists("\" & e.Row("编号"))=False Then e.Text="无图片" e.Style="hs" End IfEnd If