tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトル変換できない?!
記事No12389
投稿日: 2008/05/27(Tue) 13:22
投稿者VB
VC++で
typedef struct inf{
    char    test[256];
} __inf;
memset(INFO->test, ' ', 256);
memcpy(INFO->test, "テスト", 6);

VBで
Public Type inf
    test As String * 256
End Type
Public Declare Function test Lib "clhoshu.dll" (INFO As inf) As String

Dim str As String
Dim tmp As String
str = test(INFO(0))
tmp = Trim(INFO(0).test)
text.Text = tmp
このような感じで構造体の値をVC++でセットしそれをVBで読み取りさらにスペースをとって
テキストにはろうとしたのですが。
INFO(0).testには"rrテスト               ..."
と言う値が入ってしまい。
Trimでスペースを取ろうとしても出来ず。Replace関数でもだめでした。
そして更に、テキストには何も入らずに終了してしまいます。
どうすれば、文字列をうまく渡せますか?

[ツリー表示へ]
タイトルRe: 変換できない?!
記事No12391
投稿日: 2008/05/27(Tue) 15:09
投稿者VB
VBで
tmp = Trim(INFO(0).test)
↑これを改め。

tmp = Left(INFO(0).test, InStr(INFO(0).test, vbNullChar) - 1)
text.Text = tmp
↑このようなこともしてみましたが駄目でした・・・。

[ツリー表示へ]
タイトル自己解決w
記事No12392
投稿日: 2008/05/27(Tue) 15:15
投稿者VB
VC++で
strcpy(INFO->test, "テスト");
に変更し
VBで
tmp = Replace(INFO(0).test, vbNullChar, "")
これで出来ちゃいました(^^;
お騒がせいたしました。。

果たしてVC++でこの書き方に変えてしまったことが良かったかは定かではない・・・。

[ツリー表示へ]