🚀 go-pugleaf

Chikara Kakinuma wrote:
> 
> こんにちは、柿沼ＤＴＩと申します。
> ＃fj.lang.visualbasic,fj.os.ms-windows.programmingの
> ＃クロスポストです。
> 
> とっても初歩的な質問で大変恐縮なのですが、どなたかご教示
> 願います。
> 
> 現在、Win95 + VB5 + VC++5 で、Windowsアプリケーションを
> 作成しています。 VCは、VBから呼び出す関数を作成してDLLと
> して利用しています。
> 
> さて、本題ですが、VB側で、固定長 String 型の変数を定義して
> その値を VC側の関数へ引数として渡すと、文字列が NULL止され
> なくて困っています。
> 詳細は、以下の通りです。
> 
> [VB側]
> Declare Sub VcFunc Lib "test.dll" ( s As String )
> 
> Dim str As String * 5
> str = "ABC"
> VcFunc(str)
> 
> [VC側]
> void __stdcall VcFunc( char *str )
> {
>     printf( "[%s]\n",str ); <-- 実際はテキストファイル出力
> }
> --
> 上記のプログラムを動かすと、VcFunc()が出力した結果は、
> [ABC  ] とスペースが入ってしまいます。
> この右側のスペースをなくしたいと思うのですがどうもうまくいき
> ません。ＶＢ側から渡す文字列の最後に、ＮＵＬＬ文字を設定すれば
> うまくいくと思うのですがどうにもうまくＮＵＬＬ文字を設定でき
> ません。
> ＃ＶＣ側でスペースカットすればよいのですが、諸処の事情があり
> ＃ＶＢ側でＮＵＬＬ止したいのです。
> ＃また、可変 String型でやれば、問題ないのですが、これも事情が
> ＃あり、ＶＢ側は、固定長でなければなりません^^);;
> 
> 今までだめもとでやったことは、
> 1. VB側で、 str = RTrim("ABC")      ← 意味無し^^);;
> 2. VB側で、 str = "ABC"+Str(vbNull) ← 取りあえず適当に^^);
> 
> ＶＢのオンラインヘルプと数時間格闘しまｵたがうまくいきません。
> 
> どなたかご教示願います。
> 

熊川と申します。

str = RTrim("ABC") & Chr$(0)

でも駄目でしょうか？