关于文件命名问题?

Question

我在VB中建立文件 
我想将其随机命名,请问该怎么做??
Dim h As New FileSystemObject
h.CreateTextFile ("c:\123.rnd")但是上面的是字符串C:\123.rnd
请问该怎么做才能随机产生文件名哦?

Answer 1

Dim h As New FileSystemObject
    Randomize
    h.CreateTextFile ("c:\" & Rnd)

Answer 2

你那个rnd放在"" 之间,系统当然将其认作一个常字符串而非一函数.

Answer 3

看一下，有没有用？
GetTempName 方法
返回随机生成的临时文件或文件夹的名称，用于执行要求临时文件或文件夹的操作。object.GetTempName 可选项参数 object 应为 FileSystemObject 对象的名称。说明
GetTempName 方法不创建文件，该方法仅提供临时文件名。CreateTextFile 使用该临时文件名创建文件。下面例子举例说明如何使用 GetTempName 方法：Dim fso, tempfile
Set fso = CreateObject("Scripting.FileSystemObject")Function CreateTempFile 
   Dim tfolder, tname, tfile
   Const TemporaryFolder = 2
   Set tfolder = fso.GetSpecialFolder(TemporaryFolder)
   tname = fso.GetTempName   
   Set tfile = tfolder.CreateTextFile(tname)
   Set CreateTempFile = tfile
End FunctionSet tempfile = CreateTempFile
tempfile.WriteLine "世界你好"
tempfile.Close