文字操作 ドライブを表す文字を返します。

VB&VBA
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[VB&VBA][文字操作 ドライブを表す文字を返します。]
Private Function GetDriveObjectStr(str As String) As String
'*******************************************************************************
'ドライブを表す文字を返します。
'*******************************************************************************
    Dim Fso
    Set Fso = CreateObject("Scripting.FileSystemObject")
    ''C:を返します
    GetDriveObjectStr = Fso.GetDriveName(str)
End Function





Production Japan Import Application. Since 1998