| 定数 | 値 | 説明 |
|---|---|---|
| ForAppending | 8 | 追加 |
| ForReading | 1 | 読取専用 |
| ForWriting | 2 | 上書き |
| 定数 | 値 | 説明 |
|---|---|---|
| TristateFalse | 0 | ASCII |
| TristateTrue | -1 | Unicode |
| TristateUseDefault | -2 | システム既定 |
" & vbCrLf & objTs.ReadAll & vbCrLf & "" objTs.Close 'オブジェクトを開放 Set objTs = Nothing Set objFl = Nothing Set objFs = Nothing %>