0

デスクトップにフォルダを作成したいのですが、一度作成したいです。ただし、プロジェクトがインストールされると、プログラムをデバッグすると、次のエラーが発生します。

文字列から " gfgffgfgfg " 型の整数への変換は無効です

これが私のコードです： 

 Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click

    Try
        MkDir(My.Computer.FileSystem.SpecialDirectories.Desktop("gfgffgfgfg"))

    Catch ex As Exception
        MsgBox(ex.Message.ToString)
    End Try
4

2 に答える 2

4

文字列を渡すことが何をDesktop意味するのかわかりません。また、他の形式のコンパイル エラーが予想されます (VB コンパイラについてはよくわかりませんが) が、これが必要な場合もあります。

Path.Combine(My.Computer.FileSystem.SpecialDirectories.Desktop, "gfgffgfgfg")

これにより、作成中のフォルダーの完全修飾パスが返されます。

于 2013-10-03T13:07:34.420 に答える
0 
  Dim SELEXPED_DIR As String = My.Computer.FileSystem.SpecialDirectories.Desktop + "\SELEXPED"

    If Directory.Exists(SELEXPED_DIR) = False Then
        Try
            Directory.CreateDirectory(SELEXPED_DIR)

        Catch ex As Exception
            'Nothing to do
        End Try
    End If
于 2013-12-30T17:04:20.220 に答える