| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2655 人关注过本帖, 1 人收藏
标题:[求助]关于获取VB随机生成的文件名
取消只看楼主 加入收藏
墓地幽灵
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2007-9-22
收藏(1)
 问题点数:0 回复次数:3 
[求助]关于获取VB随机生成的文件名

问题又来了,我用VB成功生成了随机名字的文件,但是我如何获取生成的文件叫什么名字呢?
可能我解释的不够清楚,例如:
我在D盘根目录下生成了hjyi.txt这个文件,我该用什么代码来获取这个文件的文件全名并把它写入到另一个文件中呢?
搜索更多相关主题的帖子: 文件名 随机 获取 
2007-10-19 13:54
墓地幽灵
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2007-9-22
收藏
得分:0 

不好意思,我补充一下问题,我列一下代码:
Function CreateFileName() As String
Dim Length As Integer
Dim FileName As String
Dim i As Integer
Dim aStr As String
Randomize
Length = Int(8 * Rnd() + 1)
For i = 1 To Length
aStr = Chr(25 * Rnd() + 97)
FileName = FileName & aStr
Next i
CreateFileName = "D:\" & FileName & ".txt"
End Function

Private Sub Command1_Click()
Open CreateFileName For Output As #1
Print #1, Form1.Label1.Caption
Close #1
Print CreateFileName
End Sub

我的另一个生成的文档内容是:
所记录的信息在()上.

我如何把那生成的随机文件名写入到()那里呢?


2007-10-19 14:21
墓地幽灵
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2007-9-22
收藏
得分:0 
谢谢楼上的解答,不过我想要的效果是把那随机的文件名写入到另一个文件中,例如
我生成的文件名是jjj.txt,我想把它写入到我预先建立好的001.txt中(或者是另外一个label的caption属性中),请问怎么做呢~~?
文档中有预先写好的"所记录的信息在()"

[此贴子已经被作者于2007-10-19 15:24:40编辑过]


2007-10-19 15:13
墓地幽灵
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2007-9-22
收藏
得分:0 

已经解决了,谢谢你~

2007-10-19 16:28
快速回复:[求助]关于获取VB随机生成的文件名
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.011860 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved