没有文本文件操作的实例,大虾能给些提示吗? 我有个文本文件,我首先要打开它,然后read一行,如果它的一行和我要找的文本一致,则在这个行上面添加一行,并APPEND几个字符。能否大虾指点一二,谢谢、。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Open tmp + "\stock.txt" For Output As #1 '写tmp = "aaaa"Print #1, tmpClose #1Open tmp + "\stock.txt" For Input As #1 '读Do While Not EOF(1)Line Input #1, temp1Close #1loop 日期:DateAdd(Interval as string,Number as long,Date)Interval:YYYY: 年M: 月D: 日H: 小时m: 分钟S: 秒Number: --Date: 日期####年3月1日的前一天:tmpDate = DateAdd("D",-1,cdate("####年3月1日")) 不好意思大虾还有个问题:FileCopy source, destination '拷贝某个文件夹下的所有文件(不是一个)有个问题啊在使用FileCopy时如果碰到已存在文件,则覆盖操作,不需要出现提示框,成功后也不需要它弹出成功框。原先在BAT文件里我是这样写的: XCOPY 原路径 目的路径 /y/e/f 请教这个"/y/e/f”在VB中用FileCopy命令时怎么解决的?如果这样解决:FileCopy如果目标文件存在,则出错同样可以用dir(文件)判断是否存在,如果存在。则用Kill 文件名删除。然后在拷贝碰到个问题,我有很多文件要拷贝,但是怎么在运行中知道哪个文件是否存在呢??请教高人!谢谢 FSO对象问题 VB如何定义全局变量 excel 换行写入数据怎么实现啊??在线等~~~ 关于对MSFlexGrid1单元格的计算 VB有以文本作为数据库的类吗? 水晶报表8.0按页分组的问题 Setup Factory 6.0 打包问题 关于VB界面构造的问题 中秋快乐,请接分 如何用程序实现将word文件转换成txt纯文本文件? 一个Flash游戏的讨论 谁用过drawing控件
tmp = "aaaa"
Print #1, tmp
Close #1
Open tmp + "\stock.txt" For Input As #1 '读
Do While Not EOF(1)
Line Input #1, temp1
Close #1
loop
DateAdd(Interval as string,Number as long,Date)Interval:
YYYY: 年
M: 月
D: 日
H: 小时
m: 分钟
S: 秒Number: --
Date: 日期####年3月1日的前一天:
tmpDate = DateAdd("D",-1,cdate("####年3月1日"))
FileCopy source, destination '拷贝某个文件夹下的所有文件(不是一个)有个问题啊
在使用FileCopy时如果碰到已存在文件,则覆盖操作,不需要出现提示框,成功后也不需要它弹出成功框。
原先在BAT文件里我是这样写的: XCOPY 原路径 目的路径 /y/e/f
请教这个"/y/e/f”在VB中用FileCopy命令时怎么解决的?如果这样解决:
FileCopy如果目标文件存在,则出错
同样可以用dir(文件)判断是否存在,如果存在。则用Kill 文件名删除。然后在拷贝碰到个问题,我有很多文件要拷贝,但是怎么在运行中知道哪个文件是否存在呢??请教高人!谢谢