Microsoft DirectX 8.0 (Visual Basic)

DirectMusicPerformance8.SendNotePMSG

ノートに関する情報を保持するパフォーマンス メッセージを送信する。

object.SendNotePMSG( _
  lTime As Long, _
  flags As Long, _
  channel As Long, _
  msg As DMUS_NOTE_PMSG)

指定項目

object
DirectMusicPerformance8 オブジェクトを指定する。
lTime
メッセージが演奏されるタイム。flags に DMUS_PMSGF_REFTIME を指定しない限り、このタイムはミュージック タイムで表される。lTime の値が 0 であり、flags に DMUS_PMSGF_REFTIME が設定されている場合、メッセージは即時に演奏される。
flags
メッセージ処理の方法とタイムを変更するフラグ。「CONST_DMUS_PMSGF_FLAGS」を参照すること。
channel
メッセージの送信先となるパフォーマンス チャンネル。複数のチャンネルにメッセージを送信するには、CONST_DMUS_PCHANNEL 列挙型のメンバの 1 つを使用する。
msg
ノートに関する情報を含む DMUS_NOTE_PMSG 型。

エラー コード

失敗した場合はエラーが発生し、Err.Number に次のいずれかの値が設定される。

DMUS_E_NO_MASTER_CLOCK
DMUS_E_ALREADY_SENT
DMUS_E_INVALIDARG

注意

次のサンプル コードでは、perfDirectMusicPerformance8 オブジェクトであり、メッセージを送信して、直ちに中間の C を演奏する。

Dim note As DMUS_NOTE_PMSG
 
note.midiValue = 60
note.mtDuration = 500
note.flags = DMUS_NOTEF_NOTEON
note.velocity = 127
Call perf.SendNotePMSG(0, DMUS_PMSGF_REFTIME, 1, note)