tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： 異なる構造体の関数渡し
投稿日： 2010/03/16(Tue) 14:52
投稿者： クン
■環境 VB6.0
種類の異なる構造体を引数として渡したいのですが、
下記の①が型不一致となってしまいます。
ネット、サンプル等、見てもヒントが見付かりません。
どうぞ、宜しくお願い致します。

<呼出側>
Public Type ENE_SHM_PWR_INFO
    failCount As Integer                    '連続計測失敗カウンタ
    refPower As Integer                     '消費電力量
End Type
Public Type ENE_SHM_REF_POWER
    makeTime As String * 14                 '最新計測年月日時分秒
    reserved As String * 2                  '予約
    powerInfo(1 To 16) As ENE_SHM_PWR_INFO  '要冷機電力情報
End Type
Dim wShm As ENE_SHM_REF_POWER
    wRet = Ene_VbCmnSmAccess(ENE_SHM_WRITE, ENE_SHM_MAP_REFPOWER, _
                             ENE_SHM_MTX_REFPOWER, ①wShm, Len(wShm), Me)
<関数側>
Public Function Ene_VbCmnSmAccess(iAcs As Integer, iMap As String, _
                                  iMtx As String, ByRef iSmp As Variant, _
                                  iSms As Integer, iFrm As Form) As Integer
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

古いスレッドにレスはつけられません。