SHFileOperationについて (ID:88057)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すいません。素人なもので… ＜モジュール部分＞ Private Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (ByRef lpFileOp As SHFILEOPSTRUCT) As Integer Private Structure SHFILEOPSTRUCT Dim hWnd As Integer Dim wFunc As Integer Dim pFrom As String Dim pTo As String Dim fFlags As Short Dim fAnyOperationsAborted As Integer Dim hNameMappings As Integer Dim lpszProgressTitle As String End Structure ＜プログラム部分＞ Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Ret As Integer '戻り値 Dim SH As MainModule.SHFILEOPSTRUCT 'SHFILEOPSTRUCT構造体 With SH .hwnd = Me.Handle 'ウインドウのハンドル .wFunc = FO_COPY '操作方法 .pFrom = "D:\TEST" '操作元のファイル名 .pTo = "D:\TEST2" '操作先のファイル名 .fFlags = FOF_MULTIDESTFILES 'フラグ .lpszProgressTitle = "test" End With '実行 Ret = MainModule.SHFileOperation(SH) End Sub こんな感じなのですがわかりますでしょうか？ よろしくお願いします。