DLLに文字列を受け渡しして、文字数を返すには？ (ID:86789)

名前

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

本文 >魔界の仮面弁士さん ByRefをByValに変えてみました。 ソースは以下のようになりましたが、 やはり帰ってくる数値は０のままです。謎です…。 因みに、帰ってくるまでの変な待ち時間は解消されましたー！。 //DLL側 _declspec(dllexport) int _stdcall stringLen(int strlen,char* filename){ strlen = 0; while (*filename != '\0'){ strlen++; filename++; } return(strlen); } 'VB Module内 Private Declare Sub stringLen Lib "stringlength.dll" (ByVal strlen As Single, ByVal filename As String) Public strlen As Single Public Sub getStrLen() Call stringLen(strlen, form.textbox.Text) 'textboxの文字列をDLLに渡す form.textbox2.Text = strlen 'textbox2に文字数を表示 End Sub