VB サンプル

●ChDrive ステートメント

【機能】現在のドライブを変更します。

【書式】ChDrive ドライブ名

【例】ChDrive "D"

●ChDir ステートメント

【機能】現在のフォルダを変更します。

【書式】ChDir パス

【例】
  ChDir "C:\WORK\SAMPLE"
  ChDir "C:\WORK\SAMPLE\"

※ パスが存在しない場合は、エラーが発生します。
※ ドライブを変更しても、カレントドライブは変更されません。
    ChDrive "D"
    ChDir "D:\WORK\SAMPLE"

●CurDir ステートメント

【機能】現在のパスを返します。

【書式】result = CurDir
【書式】result = CurDir ドライブ名

【例】result = CurDir　 → 　C:\WORK\SAMPLE

●Dir 関数

【機能】指定のフォルダがあるかどうか調べる

【書式】フォルダ名 = Dir ( フォルダパス , vbDirectory )

【例】

result = Dir("c:\work\test", vbDirectory)	→ "test"
result = Dir("c:\work\test\", vbDirectory)	→ "."

※ 指定したフォルダが存在しなければ、ヌルストリングが返ります。

●Dir 関数

【機能】指定のファイルがあるかどうか調べる

【書式】ファイル名 = Dir ( ファイル名 )

【例】result = Dir("C:\WINNT\WIN.INI") 　→ "win.ini"

※ 指定したファイルが存在しなければ、ヌルストリングが返ります。

●FileCopy ステートメント

【機能】ファイルをコピーします。

【書式】FileCopy コピー元ファイル名 , コピー先ファイル名

【例】FileCopy "C:\WORK\TEST.TXT", "C:\WORK\SAMPLE.TXT"

※ コピー先ファイル名が存在した場合は、上書きされます。
※ 指定したファイルが存在しなければ、エラーが発生します。
※ ファイルが使用中の場合は、エラーが発生します。

●FileDateTime 関数

【機能】ファイルのタイムスタンプを示すバリアント型 (内部処理形式 Date の Variant) の値を返します。

【書式】result = FileDateTime (ファイル名)

【例】result = FileDateTime("C:\WORK\TEST.TXT") 　→　 2006/11/30 17:38:30

※ 指定したファイルが存在しなければ、エラーが発生します。

●FileLen 関数

【機能】ファイルのサイズをバイト単位で表す長整数型 (Long) の値を返します。

【書式】result = FileLen (ファイル名)

【例】result = FileLen("C:\WORK\TEST.TXT") 　→　 86016

※ 指定したファイルが存在しなければ、エラーが発生します。
※ ファイルが使用中だった場合は、使用される前のサイズを返します。

●GetAttr 関数

【機能】ファイルまたはフォルダの属性を表す整数型 (Integer) の整数を返します。

【書式】result = GetAttr ( パス名 )

戻り値	値	内容
vbNormal	0	通常ファイル
vbReadOnly	1	読み取り専用ファイル
vbHidden	2	隠しファイル
vbSystem	4	システムファイル
vbDirectory	16	フォルダ
vbArchive	32	アーカイブ (属性最後にバックアップした後で、変更されたファイル)

【例】

result = GetAttr("C:\WINNT\WIN.INI")	→　 32
result = GetAttr("C:\WINNT\WIN.INI") And vbArchive	→　 32
result = GetAttr("C:\WINNT\WIN.INI") And vbSystem	→　 0

※ 指定したファイル名が存在しなければ、エラーが発生します。

●Kill ステートメント

【機能】ファイルを削除します。

【書式】Kill パス名

【例】
　Kill "C:\WORK\SAMPLE\*.TXT"
　Kill "C:\WORK\SAMPLE\TEST.TXT"

※ ファイルが存在しなければ、エラーが発生します。
※ ファイルが読取専用の場合は、エラーが発生します。

●MkDir ステートメント

【機能】新しいフォルダを作成します。

【書式】MkDir フォルダパス

【例】
　MkDir "C:\WORK\SAMPLE"
　MkDir "C:\WORK\SAMPLE\"

※ 既に存在するフォルダを作成しようとすると、エラーが発生します。
※ 上位の階層フォルダ(例ではWORK\)が存在しなければ、エラーが発生します(上位からフォルダを作っていってくれません)。

●Name ステートメント

【機能】ファイルまたはフォルダの名前を変更(移動)します。

【書式】Name 変更前ファイル名(フォルダ名) As 変更後ファイル名(フォルダ名)

【例】
　Name "C:\WORK\TEST.TXT" AS "C:\WORK\SAMPLE.TXT"
　Name "C:\WORK\TEST.TXT" AS "C:\WORK\SAMPLE\TEST.TXT"
　Name "C:\WORK\" AS "C:\SAMPLE\"
　Name "C:\WORK" AS "C:\SAMPLE"

※ 変更前ファイル名(フォルダ名)が存在しなければ、エラーが発生します。
※ ファイル(フォルダ)が使用中の場合は、エラーが発生します。

●RmDir ステートメント

【機能】フォルダを削除します。

【書式】RmDir フォルダパス

【例】
　RmDir "C:\WORK\SAMPLE\"
　RmDir "C:\WORK\SAMPLE"

※ フォルダが存在しなければ、エラーが発生します。
※ フォルダ内にファイルが存在すると、エラーが発生します。

●SetAttr ステートメント

【機能】ファイルの属性を設定します。

【書式】SetAttr パス名 , 属性

属性	値	内容
vbNormal	0	(既定値) 通常ファイル
vbReadOnly	1	読み取り専用ファイル
vbHidden	2	隠しファイル
vbSystem	4	システムファイル
vbArchive	32	アーカイブ (属性最後にバックアップした後で、変更されたファイル)

【例】
SetAttr "C:\WORK\SAMPLE\TEST.TXT", vbHidden
SetAttr "C:\WORK\SAMPLE\TEST.TXT", vbHidden + vbReadOnly

※ ファイルが存在しなければ、エラーが発生します。
※ 使用中のファイルの属性を変更しようとすると、エラーが発生します。