ファイルを移動する
ファイルを移動するサンプルです。
サンプルの実行画面
ソースコード
[MoveFile.frm]
'既存のファイルを移動する
'<引数>
'lpExistingFileName: 元のファイル名・ディレクトリ名
'lpNewFileName: 新しいファイル名・ディレクトリ名
'@戻り値@
' 正常終了0以外
Private Declare Function MoveFile Lib "KERNEL32" Alias "MoveFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String) As Long
Private Sub Command1_Click()
Dim Ret As Long
Dim OldName As String
Dim NewName As String
OldName = Text1.Text
NewName = Text2.Text
Ret = MoveFile(OldName, NewName)
If Ret <> 0 Then
MsgBox "移動しました"
Else
MsgBox "移動できませんでした"
End If
End Sub
ソースコード一式のダウンロード
vbapi_movefile.zip 959 バイト (959 バイト)
このサンプルの動作環境について
このサンプルは 「Windows98」及び「Microsoft Visual Basic 5.0 Professional Edition」で確認しております。環境が異なる場合は正常に動作しない場合もございますのでご了承下さい。
スポンサーリンク
関連記事
| 前の記事: | パス名からファイル名を取得する |
| 次の記事: | ごみ箱を操作する |
公開日:2015年03月04日
記事NO:00343
プチモンテ ※この記事を書いた人
![]() | |
![]() | 💻 ITスキル・経験 サーバー構築からWebアプリケーション開発。IoTをはじめとする電子工作、ロボット、人工知能やスマホ/OSアプリまで分野問わず経験。 画像処理/音声処理/アニメーション、3Dゲーム、会計ソフト、PDF作成/編集、逆アセンブラ、EXE/DLLファイルの書き換えなどのアプリを公開。詳しくは自己紹介へ |
| 🎵 音楽制作 BGMは楽器(音源)さえあれば、何でも制作可能。歌モノは主にロック、バラード、ポップスを制作。歌詞は抒情詩、抒情的な楽曲が多い。楽曲制作は🔰2023年12月中旬 ~ | |









