猫头鹰111

导航

2019年2月16日 #

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) 编辑