掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Marshal (ID:146095)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
最近ＶＢ２００８を始めました。 それまではＶＢ６を使用してきました。 ＶＢ６側で Type TThLog Qso(3927) As Byte End Type Declare Function Vdbf_rcount Lib "Thdll2Vb.dll" (d As TThLog) As Long これをＶＢ２００８側での一部のコードですが下記のようにしています。 Marshal 関係が分からずにエラーが出ていますが記述のアドバイスをいただけたらと思います。 Ｗｅｂ検索などもしていますが難解で苦労しています。 Structure TThLog <VBFixedArray(3927)> Dim Qso() As Byte Public Sub Initialize() ReDim Qso(3927) End Sub End Structure <DllImport("Thdll2Vb.dll")> _ Private Shared Function Vdbf_rcount(<MarshalAs(UnmanagedType.LPTStr)> ByRef d As TThLog) As Integer End Function recno = Vdbf_rcount(log)
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.