くだすれVB6.0以前（超初心者向け）
4 ：デフォルトの名無しさん：
>>ttp://pc8.2ch.net/test/read.cgi/tech/1161517193/548
ElseIf以降の内容が
ログ左右桁揃え = " " & b
と全部同じなんだけど、誤記？それとも、仕様？
>>ttp://pc8.2ch.net/test/read.cgi/tech/1161517193/546
Dim Fso As Object
Dim FsoTS As Object
Set Fso = CreateObject("Scripting.FileSystemObject")
Set FsoTS = Fso.CreateTextFile(App.Path & "\" & Text1.Text, True)
FsoTS.Close
Set FsoTS = Nothing
Set Fso = Nothing
ElseIf以降の内容が
ログ左右桁揃え = " " & b
と全部同じなんだけど、誤記？それとも、仕様？
>>ttp://pc8.2ch.net/test/read.cgi/tech/1161517193/546
Dim Fso As Object
Dim FsoTS As Object
Set Fso = CreateObject("Scripting.FileSystemObject")
Set FsoTS = Fso.CreateTextFile(App.Path & "\" & Text1.Text, True)
FsoTS.Close
Set FsoTS = Nothing
Set Fso = Nothing
|
|
|