質問編集履歴
2
変数の指定
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -4,11 +4,14 @@
|
|
|
4
4
|
|
|
5
5
|
## コードの例
|
|
6
6
|
|
|
7
|
-
### ループの中でSet,Closeする
|
|
7
|
+
### ループの中でSet,Closeする
|
|
8
8
|
|
|
9
|
+
変数のスコープを狭めたい場合
|
|
10
|
+
|
|
9
11
|
```vbs
|
|
10
12
|
|
|
11
|
-
|
|
13
|
+
Const strCSVPath = "hoge.csv"
|
|
14
|
+
For Each str In Array("a","b","c")
|
|
12
15
|
Dim FSO: Set FSO = CreateObject("Scripting.FileSystemObject")
|
|
13
16
|
Dim TS: Set TS = FSO.OpenTextFile(strCSVPath, 8)
|
|
14
17
|
|
|
@@ -17,14 +20,17 @@
|
|
|
17
20
|
Next
|
|
18
21
|
```
|
|
19
22
|
|
|
20
|
-
### ループの外でSet,Closeする
|
|
23
|
+
### ループの外でSet,Closeする
|
|
21
24
|
|
|
25
|
+
Set,Closeの回数を減らしたい場合
|
|
26
|
+
|
|
22
27
|
```vbs
|
|
23
28
|
|
|
29
|
+
Const strCSVPath = "hoge.csv"
|
|
24
30
|
Dim FSO: Set FSO = CreateObject("Scripting.FileSystemObject")
|
|
25
31
|
Dim TS: Set TS = FSO.OpenTextFile(strCSVPath, 8)
|
|
26
32
|
|
|
27
|
-
For Each str In
|
|
33
|
+
For Each str In Array("a","b","c")
|
|
28
34
|
TS.WriteLine str
|
|
29
35
|
|
|
30
36
|
Next
|
1
題名の変更、コード → コードの例
title
CHANGED
|
@@ -1,1 +1,1 @@
|
|
|
1
|
-
[VBScript]FSO.OpenTextFileのCloseタイミングによる速度の違い
|
|
1
|
+
[VBScript]FSO.OpenTextFileのSet,Closeタイミングによる速度の違いはありますか？
|
body
CHANGED
|
@@ -2,7 +2,7 @@
|
|
|
2
2
|
|
|
3
3
|
CSVファイルにテキストをAppendする際、ループの外と中でSet,Closeした場合で速度に違いはありますか？
|
|
4
4
|
|
|
5
|
-
## コード
|
|
5
|
+
## コードの例
|
|
6
6
|
|
|
7
7
|
### ループの中でSet,Closeすることで、変数のスコープを狭める場合
|
|
8
8
|
|