Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBÖв¥·ÅWAVÎļþ

http://zhidao.baidu.com/question/33440250.html
ÔÚÄ£¿éÖÐÊäÈëÒÔÏ´úÂë
Public Declare Function sndPlaySound Lib "winmm" Alias _
"sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
' flag uitzetten
Public Const SND_SYNC = &H0
Public Const SND_ASYNC = &H1
Public Const SND_NODEFAULT = &H2
Public Const SND_MEMORY = &H4
Public Const SND_LOOP = &H8
Public Const SND_NOSTOP = &H10
Public Sub PlaySound(strSound As String)
sndPlaySound strSound, SND_ASYNC Or SND_NODEFAULT
End Sub
ÔÚ´°ÌåÖÐÊäÈëÒÔÏ´úÂë
Private Sub Form_Load()
PlaySound "D:\sound.wav"
End Sub
VBÖв¥·ÅWAVÎļþ
×÷ÕߣºÕÔÅô
ÔÚ¶àýÌåÈí¼þµÄ¿ª·¢Éè¼ÆÖУ¬ÉùÒôÊÇÒ»¸öÏàµ±ÖØÒªµÄ¶àýÌåÔªËØ£¬ÓÅÐãµÄÉùÒôÉè¼Æ»áΪ¶àýÌåÈí¼þÔöÉ«²»ÉÙ¡£¶øWAV¸ñʽµÄÉùÒôÎļþÊÇÒ»ÖÖ×î³£ÓõÄÉùÒôÎļþ¸ñʽ£¬Ò²×îÈÝÒ׵õ½£¬±ÈÈçͨ¹ýWin 95Öеē¼Òô»ú”³ÌÐò£¬ÀûÓÃÂó¿Ë·ç¾Í¿ÉÒԷdz£¼òµ¥µØÂ¼ÖÆWAVÎļþ¡£VBÊÇÒ»¸öÏ൱¾­µäµÄ¶àýÌ忪·¢µÄ¹¤¾ß£¬ÔÚVBÖв¥·ÅWAVÎļþµÄ·½·¨Ö÷ÒªÓÐÕâÑù¼¸ÖÖ¡£
     Ò»¡¢ÀûÓÃOLE¿Ø¼þ
     ½¨Ò»´°Ì壬ÓÃÊó±êÑ¡ÔñOLE¿Ø¼þ£¬ÔÚ´°ÌåÉÏÍϳöOLEÇøÓò£¬ÔÚͼһµÄ´°¿ÚÖÐÑ¡Ôñн¨ºÍÉùÒôÈ»ºó°´È·¶¨¼ü¾ÍÍê³ÉÁËÔÚ´°¿ÚÖÐÌí¼ÓOLE¿Ø¼þ£¬Èçͼ¶þ¡£
     ÕâÑù¾Í¿ÉÒÔÔÚOLE¿Ø¼þµÄResourceDocÊôÐÔÖÐÑ¡ÔñËùÒª²¥·ÅµÄÎļþ£¬³ÌÐòÔËÐÐʱ˫»÷OLE¿Ø¼þ¼´¿É¡£
ÔÚʵ¼ÊµÄ³ÌÐòÉè¼Æµ±ÖУ¬ÍùÍùÐèÒªµ¥»÷ij¸öͼ±ê»ò°´Å¥À´¿ØÖÆÉùÒôµÄ²¥·Å£¬ÆäʵÏÖ·½·¨ÊÇÕâÑùµÄ£ºÊ×ÏȽ«OLE¿Ø¼þµÄVISIBLEÊôÐÔÉèÖÃΪFALSE,È»ºóÔÚͼ±ê»ò°´Å¥µÄµ¥»÷ʼþÖбàдÈçϵijÌÐò£º
Private Sub Contol_Click()
OLE1.Action = 7
End Sub
     ¶þ¡¢ÀûÓÃMMControl¿Ø¼þ
     VB5.0ÌṩÁËÐí¶àÉè¼Æ¶àýÌåµÄ¿Ø¼þ£¬ÔÚPROJECT/COMPENENTS/CONTROLSÖÐÑ¡ÔñMMControls ¿Ø¼þ£¬´°ÌåÉϾͳöÏÖÁ˶àýÌå¿Ø¼þ¶ÔÏó£¬ÔÚÕâ¸ö¶ÔÏóÉÏÓв»Í¬µÄͼÐι¦Äܱêʶ£¬ÆäÃû³Æ´Ó×óµ½ÓÒ·Ö±ðÊÇPre¡¢Next¡¢Play¡¢Pause¡¢Back¡¢Step¡¢Stop¡¢Record ¡¢Eject ÈçͼÈý¡£
     Õâ¸ö¶àýÌå¿Ø¼þ¿ÉÒÔ²¥·Å¶àÖÖ¸ñʽµÄÉùÒô£¬²¥·ÅWAV¸ñʽÉùÒôÎļþµÄ³ÌÐò´úÂë
Private Sub form_load()
MMControl1.DeviceType = "waveaudio"
MMControl1.filen


Ïà¹ØÎĵµ£º

VB»ñÈ¡Íø¿¨MACµØÖ·´úÂë

Option Explicit
Private Const NCBASTAT = &H33
Private Const NCBNAMSZ = 16
Private Const HEAP_ZERO_MEMORY = &H8
Private Const HEAP_GENERATE_EXCEPTIONS = &H4
Private Const NCBRESET = &H32
Private Type NCB
ncb_command As Byte
ncb_retcode As Byte
ncb_lsn As Byte
ncb_num As Byte ......

vb ´®¿ÚͨѶ

MSComm¿Ø¼þÌṩÁËÁ½ÖÖ´¦ÀíͨÐŵķ½Ê½£ºÒ»ÖÖΪʼþÇý¶¯·½Ê½£¬¸Ã·½Ê½Ï൱ÓÚÒ»°ã³ÌÐòÉè¼ÆÖеÄÖжϷ½Ê½¡£µ±´®¿Ú·¢Éúʼþ»ò´íÎóʱ£¬MSComm¿Ø¼þ»á²úÉúOnCommʼþ£¬Óû§³ÌÐò¿ÉÒÔ²¶»ñ¸Ãʼþ½øÐÐÏàÓ¦´¦Àí¡£±¾ÎĵÄÁ½¸öÀý×Ó¾ù²ÉÓø÷½Ê½¡£ÁíÒ»ÖÖΪ²éѯ·½Ê½£¬ÔÚÓû§³ÌÐòÖÐÉè¼Æ¶¨Ê±»ò²»¶¨Ê±²éѯ MSComm¿Ø¼þµÄijЩÊôÐÔÊÇ·ñ·¢Éú±ä»¯£¬´Ó¶øÈ ......

vbºÍaspÈçºÎÓÃremote·ÃÎÊÔ¶³ÌÊý¾Ý¿â


Òý×Ô£ºhttp://blog.csdn.net/yizia/archive/2006/09/19/1248669.aspx
·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔ­ÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£ ......

vbºÍaspÈçºÎÓÃremote·ÃÎÊÔ¶³ÌÊý¾Ý¿â

·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔ­ÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£¬ÆäÓàÌõ¼þ²»±£Ö¤ÄÜÕý³£ÔËÐÐ
ÔÚmdacµÄService ProvidersÖаüÀ¨Microsoft ......

ÓÃVBʵÏÖ´øÍ¼Æ¬µÄXP·ç¸ñµÄ°´Å¥¿Ø¼þ

    ËäÈ»ÔÚVBÀïʵÏÖXP·ç¸ñºÜ¼òµ¥£¬µ«ÊÇҪʹÓÃXP·ç¸ñͬʱÓÖÈð´Å¥ÏÔʾͼƬ£¬ÔòʵÏÖÆðÀ´ÒªÂ鷳һЩ£¬Îª´Ë£¬ÎÒдÁËÒ»¸ö¿Ø¼þÀ´ÊµÏÖǰÊö¹¦ÄÜ£¬Í¬Ê±ÈöÁÕß¿ÉÒÔ´ÓÖÐÁ˽âXPÖ÷Ìâ½çÃæµÄ»æÖƹý³Ì¡£
    ʹÓð취ºÜ¼òµ¥£¬ÔÚVBÀïн¨Ò»¸ö¹¤³Ì£¬È»ºóÌí¼ÓÒ»¸ö¿Ø¼þÄ£¿é£¬Õ³ÌùÒÔÏ´úÂ룬ÔÙ½«¿Ø¼þ·ÅÖõ½´°¿Ú¼´ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ