VB 读取列表文件名
摘要:
Private Sub Command1_Click()Dim d As String, s As String If Dir(App.Path & "\down", vbDirectory) = "" ThenLabel1.Caption = "img目录不存在无法执行下一步"Elsed = Di 阅读全文
posted @ 2019-02-16 15:38 猫头鹰111 阅读(452) 评论(0) 推荐(0) 编辑