VB.NETからVCのDLL呼出で、時々DLLから正しくない結果が返る

Question

• 環境

開発環境:VB.NET 2015 VC++ 2015
OS:Windows10

• 質問

VB.NETからVCのDLL呼び出していますが、結果が文字列で受け取っています。
時々DLL側では正しく文字列を返していますが、VB.NET側では空白となってしまいます。
VC側の返し方に問題がありますでしょうか？

    <DllImport("hoge.DLL", CallingConvention:=CallingConvention.Cdecl, CharSet:=CharSet.Ansi)>
    Public Shared Function Foo(ByVal id As System.Text.StringBuilder) As Integer
    End Function
　　
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim id As New System.Text.StringBuilder
        Dim rtn As Integer = Identify(id)
        If rtn = 0 Then
           'ここでなぜか空白になる！
           MsgBox(id)
        End If 
    End Sub

    int Foo(char *message)
    {
        char lptszUserName[260];
        memcpy(message, lptszUserName, strlen(lptszUserName - 1));
        return 0
    }

Answer 1

strlen(lptszUserName - 1)はstrlen(lptszUsername)の間違いですかね

まぁ変なことせずにstrcpyかstrncpyを使いましょう。

Comments

[moto-a]

memcpy(message, lptszUserName, strlen(lptszUserName - 1));
これ変ですよね。
しかし、実際のソースも同じようになっていました。
これが原因でしょうか？どのような動きになるのでしょうか？

正しくは「strlen(lptszUsername)」ですね…

[asm]

どのような動きになるかはまったく分かりませんが
- １文字も取得できない
- 見た目は変わらない(が、\0の裏にこっそりゴミ文字列がくっついてる)
- 文字列先頭の3文字もしくは2文字もしくは1文字だけ取得でき、後半が切れる
- エラーが発生する

どれかがランダムに起こり得ます

訂正: ランダムで文字が取得できません

[moto-a]

早速のご回答ありがとうございます。
正しく修正してみましたが、うまくいきませんでした。
memcpy実行後にmessageのうしろにごみが入ってしまいます。
memcpy実行時にクイックウォッチでlptszUserNameの値を確認すると正しく入っています。
申し訳ございませんが、原因はわかりますでしょうか

【ソース】
//sqliteからデータを取得しています
sqlite3_stmt *pStmt = NULL;
sqlite3_prepare_v2(pDB, sql, -1, &pStmt, NULL);
const unsigned char *cd = sqlite3_column_text(pStmt, 0);
sprintf_s(lptszUserName, "%s", cd);
memcpy(message, lptszUserName, strlen(lptszUserName));

[moto-a]

度々申し訳ございません。
ソース中の
sprintf_s(lptszUserName, "%s", cd);
↓
sprintf_s(lptszUserName, "%s\0", cd);
に変更したらうまく動いているように思います。

[asm]

memcpy使うのならば
memcpy(message, lptszUserName, strlen(lptszUserName)+1);
です。

普通は
strcpy(message, lptszUserName);
(もしくはstrcpy_s(message, 16, lptszUserName);)

追記
あらsprintfの方の修正でうまくいきましたか

[moto-a]

sprintf_s(lptszUserName, "%s\0", cd);
と
memcpy(message, lptszUserName, strlen(lptszUserName)+1);
の両方で今のところ、うまく動いているように思います。

有難うございました。

Answer 2

stringbuilderがどのようなメモリの確保の仕方をするのか把握していませんのでハズレかもしれませんが

Dim id As New System.Text.StringBuilder(100)

などと受け取る最大長を確保しておくのはどうでしょうか