🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.lang.visualbasic
Article #12

Re: MIDIfile

#12
From: TAKAHASHI
Date: Sun, 14 Dec 1997 00:00
25 lines
1566 bytes
takahashi_jiyunichi wrote:
> 
> 高橋@中部大です。
> 
> VB5.0でMIDIを鳴らしたいのですが、
> 宣言文がわかりません。
API 使えば 音は出せる やってみなはれ
Declare Function midiOutOpen Lib "winmm.dll" Alias "midiOutOpen"
(lphMidiOut As Long, ByVal uDeviceID As Long, ByVal dwCallback As Long,
ByVal dwInstance As Long, ByVal dwFlags As Long) As Long
Declare Function midiOutGetNumDevs Lib "winmm" Alias "midiOutGetNumDevs"
() As Integer
Declare Function midiOutShortMsg Lib "winmm.dll" Alias "midiOutShortMsg"
(ByVal hMidiOut As Long, ByVal dwMsg As Long) As Long
Declare Function midiOutClose Lib "winmm.dll" Alias "midiOutClose"
(ByVal hMidiOut As Long) As Long
参考資料 
       技術評論社の「はじめてのVisualBasic5」 ちょこっとしか
ない 
       ジャストシスムの「コンピュータ音楽の傾向と対策」 ソース
win3.1のじゃが 使うDLLのあるAPIは上の4つ


       
Technical Details
Message-ID: <3492E180.71B5F096@mbox.sist.ac.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <66l8en$cjj$1@sally.isc.chubu.ac.jp>

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 105c2e,995ead6b9019179
X-Google-Attributes: gid105c2e,public
X-Google-Thread: 10092c,995ead6b9019179
X-Google-Attributes: gid10092c,public
From: TAKAHASHI <cs94048@mbox.sist.ac.jp>
Subject: Re: MIDIfile
Date: 1997/12/14
Message-ID: <3492E180.71B5F096@mbox.sist.ac.jp>
X-Deja-AN: 297906843
Content-Transfer-Encoding: 7bit
References: <66l8en$cjj$1@sally.isc.chubu.ac.jp>
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-2022-jp
Organization: SIST
Newsgroups: fj.lang.visualbasic,fj.comp.music