カレントディレクトリの表示(VB)

キーワード:

GetCurrentDirectory

サンプルコード:

' カレントディレクトリの表示
Private Sub DispCurDir()
	Dim CurrentDir As String * MAX_PATH

	'カレントディレクトリの取得
	GetCurrentDirectory MAX_PATH, CurrentDir

	'カレントディレクトリの表示
	MsgBox Left(CurrentDir, InStr(CurrentDir, vbNullChar) - 1)
End Sub

(original text:1998/12/25 更新)

本ドキュメントの内容は保証しません。本ドキュメントによって生じた結果について、一切の責任を負いません。