DLLへの変換するには? (ID:114471)

名前

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

本文

kenさんに言われたとおりやりましたら、DLLファイルが生成されました。

そして、そのDLLファイルに実験で外部接続しようと思って、
参照の追加をしようとしたところ作成したDLLファイルがどこにあるか見つかりませんから実行ファイルと同じディレクトリに移動させて、
そして、そのDLLファイルの名前をtest1に変えて、
ソースに
Public Declare Function GetIni Lib _
        "test1.dll" _
        (ByVal INIFILEsection As String, _
    ByVal INIFILEKey As String, _
    ByVal INIFILEDefaultString As String, _
    ByVal INIFILEnFileName As String, _
    ByRef INIFILEstrTemp As String) As String
    Dim syutoku As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        With OpenFileDialog1
            .FileName = ""
            .Filter = "INIファイル|*.ini"
            .ShowDialog()
            GetIni("bbb", "sss", "パラメータが存在しません", .FileName, syutoku)
            'GetIni([]のついている所を読むための名称, _
            'xxx=とついている所の名前(分かりにくかったら下を参照), _
            ' 左で設定した値が存在しないときの戻る値や文字列, _
            '読み込むiniファイルのパスを記載, _
            '戻ってきた数字やパラメータの値を入れる所)
            MessageBox.Show(syutoku)
        End With
    End Sub
を記載したんですけれど、
動いてくれませんでした。
どこが原因なのでしょうか?

←解決時は質問者本人がここをチェックしてください。

戻る