縮めた形式のパスをテキストボックスに表示(VB)

説明:

"c:\windows\system32\kernel32.dll"というパスを、テキストボックスのText1に表示する。この際、テキストボックスの大きさに応じて"c:\win...\kernel32.dll"などとパスを縮めて表示する。

キーワード:

PathSetDlgItemPath, GetDlgCtrlID

サンプルコード:

Private Sub Command1_Click()
	Dim Path As String
	Dim ID As Long

	Path = "c:\windows\system32\kernel32.dll"
	ID = GetDlgCtrlID(Text1.hWnd)

	PathSetDlgItemPath Me.hWnd, ID, Path
End Sub

(original text:1999/08/05 更新)

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