xiangtaochen 发表于 2018-9-6 21:54:03

VB6问题 If Dir("D:\forPrinter\N1.txt") <> "" Then

If Dir("D:\forPrinter\N1.txt") <> "" Then

这个N1的1能不能搞成个变量, 怎么表达?

jimlovecat 发表于 2018-9-6 21:55:15

dim DirStr as string

xiangtaochen 发表于 2018-9-6 21:56:16

jimlovecat 发表于 2018-9-6 21:55
dim DirStr as string

我要从1可以变成2,3,4,5,6,7,8,9,.....你这个是把这个整个转字符串了吧

jimlovecat 发表于 2018-9-6 22:00:26

vb很久没用了，供参考   dim DirStr as string DirStr="D:\forPrinter\"+txt1.txt+".txt"

xiangtaochen 发表于 2018-9-6 22:00:31

jimlovecat 发表于 2018-9-6 21:55
dim DirStr as string

我明白了

jimlovecat 发表于 2018-9-6 22:01:56

有个命令是数字转字符串，vb语言手册查一下

SkyGz 发表于 2018-9-6 22:08:22

是不是要这样

dim i as integer

for i=0 to 10
if dir("D:\forPrinter\N"+Cstr(i)+".txt") <>"" then
            
end if
next i

dong889 发表于 2018-9-6 22:11:35

"D:\forPrinter\N"&a&".txt"
这样就可以了，a为变量

xiangtaochen 发表于 2018-9-7 10:54:57

dong889 发表于 2018-9-6 22:11
"D:\forPrinter\N"&a&".txt"
这样就可以了，a为变量

这样没有搞成, 我哥只要10个, 我直接写了10次, 呵呵

modbus 发表于 2018-9-7 12:06:53

用数值转换为字符串函数和字符串连接即可完成
页: [1]
查看完整版本: VB6问题 If Dir("D:\forPrinter\N1.txt") <> "" Then