VB如何调用主板发音谢谢了，大神帮忙啊

主板规律性鸣笛打不开机谢谢了，大神帮忙啊~

主板报警音说明 自检通不过而关于鸣笛自检的问题如下，自己再看看自己的问题 AWARD BIOS响铃声的一般含义是： 1短: 系统正常启动。这是我们每天都能听到的，也表明机器没有任何问题。 2短: 常规错误，请进入CMOS Setup，重新设置不正确的选项。 1长1短: RAM或主板出错。换一条内存试试，若还是不行，只好更换主板。 1长2短: 显示器或显示卡错误。 1长3短: 键盘控制器错误。检查主板。 1长9短: 主板Flash RAM或EPROM错误，BIOS损坏。换块Flash RAM试试。 不断地响（长声）: 内存条未插紧或损坏。重插内存条，若还是不行，只有更换一条内存。 不停地响: 电源、显示器未和显示卡连接好。检查一下所有的插头。 重复短响: 电源问题。 无声音无显示: 电源问题。 AMI BIOS响铃声的一般含义是： 1. 一短声，内存刷新失败。内存损坏比较严重，恐怕非得更换内存不可。 2. 二短声，内存奇偶校验错误。可以进入CMOS设置，将内存Parity奇偶校验选项关掉，即设置为Disabled。不过一般来说， 内存条有奇偶校验并且在CMOS设置中打开奇偶校验，这对微机系统的稳定性是有好处的。 3. 三短声，系统基本内存（第1个64Kb）检查失败。更换内存吧。 4. 四短声，系统时钟出错。维修或更换主板。 5. 五短声，CPU错误。但未必全是CPU本身的错，也可能是CPU插座或其它什么地方有问题，如果此CPU在其它主板上正常， 则肯定错误在于主板。 6. 六短声，键盘控制器错误。如果是键盘没插上，那好办，插上就行；如果键盘连接正常但有错误提示，则不妨换一个好的 键盘试试；否则就是键盘控制芯片或相关的部位有问题了。 7. 七短声，系统实模式错误，不能切换到保护模式。这也属于主板的错。 8. 八短声，显存读/写错误。显卡上的存贮芯片可能有损坏的。如果存贮片是可插拔的，只要找出坏片并更换就行，否则显 卡需要维修或更换。 9. 九短声，ROM BIOS检验出错。换块同类型的好BIOS试试，如果证明BIOS有问题，你可以采用重写甚至热插拔的方法试图恢复。 10. 十短声，寄存器读/写错误。只能是维修或更换主板。 11. 十一短声，高速缓存错误。 12. 如果听不到beep响铃声也看不到屏幕显示，首先应该检查一下电源是否接好，在检修时往往容易疏忽，不接上主板电源就 开机测试。其次得看看是不是少插了什么部件，如CPU、内存条等。再次，拔掉所有的有疑问的插卡，只留显示卡试试。最后找到主 板上清除（clear）CMOS设置的跳线，清除CMOS设置，让BIOS回到出厂时状态。如果显示器或显示卡以及连线都没有问题，CPU和内存 也没有问题，经过以上这些步骤后，微机在开机时还是没有显示或响铃声，那就只能是主板的问题了。 POENIX的BIOS报警声（以前的老板上有许多POENIX的，可现在已经被AWARD收购了） 1短 系统启动正常 1短1短1短 系统加电初始化失败 1短1短2短 主板错误 1短1短3短 CMOS或电池失效 1短1短4短 ROM BIOS校验错误 1短2短1短 系统时钟错误 1短2短2短 DMA初始化失败 1短2短3短 DMA页寄存器错误 1短3短1短 RAM刷新错误 1短3短2短 基本内存错误 1短3短3短 基本内存错误 1短4短1短 基本内存地址线错误 1短4短2短 基本内存校验错误 1短4短3短 EISA时序器错误 1短4短4短 EISA NMI口错误 2短1短1短 前64K基本内存错误 3短1短1短 DMA寄存器错误 3短1短2短 主DMA寄存器错误 3短1短3短 主中断处理寄存器错误 3短1短4短 从中断处理寄存器错误 3短2短4短 键盘控制器错误 3短1短3短 主中断处理寄存器错误 3短4短2短 显示错误 3短4短3短 时钟错误 4短2短2短 关机错误 4短2短3短 A20门错误 4短2短4短 保护模式中断错误 4短3短1短 内存错误 4短3短3短 时钟2错误 4短3短4短 时钟错误 4短4短1短 串行口错误 4短4短2短 并行口错误 4短4短3短 数字协处理器错误

这个字是读“dun”.意思是逃离，比如说借尿遁，成语是奇门遁甲

主板蜂鸣器发声规律总结 最近研究了一下主板的蜂鸣器发声规律,前些日子看到一位朋友用VB写了一个<回到过去>由此启发,特地总结了一下发声规律: 有一定物理常识的人都知道,音调的高低与震动频率成正比,也就是说物体震动速度越快则音调越高 do re mi fa sol la si do 频率跟do的频率比 1:1 9:8 5:4 4:3 3:2 5:3 15:8 2:1 (以下单位均为Hz) 我们设do的频率为440(标准频率) 1 do 440 2 re 495 3 mi 550 4 fa 587 5 sol 660 6 la 733 7 si 825 提一个八度 1` 880 2` 990 3` 1100 4` 1174 5` 1320 6` 1466 7` 1650 我在编歌的时候发现VB不能写出空拍,但是发现VB的允许频率是37Hz到35000Hz左右.人耳的听力范围是20Hz到20000Hz,所以37Hz的频率空拍是不可取的.那么我们可以选择高频率来空拍,只要把频率定为20000Hz就听不到了(18000Hz的频率我就听不到了). 这样一来只要有谱而且看的懂,大多数歌都可以准确的编出其音调和速度了 下面是我编的一个音阶: Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Command1_Click() playsnd 440, 200 playsnd 20001, 75 playsnd 495, 200 playsnd 20001, 75 playsnd 550, 200 playsnd 20001, 75 playsnd 587, 200 playsnd 20001, 75 playsnd 660, 200 playsnd 20001, 75 playsnd 733, 200 playsnd 20001, 75 playsnd 825, 200 playsnd 20001, 75 playsnd 880, 200 playsnd 20001, 75 playsnd 880, 200 playsnd 20001, 75 playsnd 825, 200 playsnd 20001, 75 playsnd 733, 200 playsnd 20001, 75 playsnd 660, 200 playsnd 20001, 75 playsnd 587, 200 playsnd 20001, 75 playsnd 550, 200 playsnd 20001, 75 playsnd 495, 200 playsnd 20001, 75 playsnd 440, 200 End Sub Function playsnd(ByVal x As Long, y As Long) Beep x, y * 3 DoEvents End Function 复制下去别忘了建立一个Command

---

江孜县19695516537： VB主板发声 - ？
畅炊美敏： vb吧一贴'//给你一个例子 '//周杰伦的回到过去 Private Declare Function Beep Lib ＂kernel32＂ (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Form_Load() playsnd 587, 100: playsnd 784, 100: playsnd 880, 100: playsnd...

江孜县19695516537： VB怎么驱动音频设备？
畅炊美敏： Declare Function sndPlaySound Lib ＂winmm.dll＂ Alias ＂sndPlaySoundA＂ (lpszSoundName As Any, ByVal uFlags As Long) As Long Function PlaySound(F As String, Mode As SND_Play_Mode) As Long PlaySound = sndPlay(F, Mode) End Function Private Sub PlayM_Click() ed = PlaySound(＂C:\WINDOWS\MEDIA\CHIMES.WAV＂, SND_FILENAME) End Sub

江孜县19695516537： 用VB[basic语言]让电脑发声的程序怎么写？
畅炊美敏： Option Explicit Private Declare Function PlaySound Lib ＂winmm.dll＂ Alias ＂PlaySoundA＂ _ (ByVal lpszName As String, ByVal hModule As Long, _ ByVal dwFlags As Long) As Long Private Sub Command1_Click() Call PlaySound(＂C:\WINDOWS\Media\chimes.WAV＂, 0, 0) 'C:\WINDOWS\Media\chimes.WAV改为你要播放的声音文件的完整路径名 End Sub

江孜县19695516537： vb怎么调用系统tts朗读文本框里的内容? - ？
畅炊美敏： 先创建TTS对象,然后设置语言种类,设置音量,最后就是调用speak朗读文本框1中的内容,代码如下 Set objVoice = CreateObject(＂SAPI.SpVoice＂) Set colVoice = objVoice.GetVoices() objVoice.Volume = 100 For i = 0 To colVoice.Count - ...

江孜县19695516537： VB怎么调用已有的音频文件发声 - ？
畅炊美敏： 用API函数mciSendString 来播放音频 播放时间随机也好搞,用随机函数rnd,关于这2个函数用法,百度一下很多,我就不给你写代码了 帮你写写也行,要看明天上班有时间不,家里电脑没装VB

江孜县19695516537： vb读取主板型号？
畅炊美敏： Function GetMainboardSerialNumber() As String On Error Resume Next Dim strComputer Dim objWMIService Dim objItem Dim strOption Dim colItems GetMainboardSerialNumber = ＂＂ strComputer = ＂.＂ Set objWMIService = GetObject(＂...

江孜县19695516537： 在VB编程中,如何做到朗读文本框中文字? - ？
畅炊美敏： 这个问题老难呢.我只能说一点可行的笨法来朗读字符串. 法一:调用系统的英语语音引擎(我只知道可以用bat直接调用,但用VB调用不会)直接读英文字母或单词,若要读中文,可以把中文的发音写作相似的英文音标给引擎读,我试过,效果不错,就像外国人学说汉语.详情参看各大批处理论坛,估计都有详细用法介绍.若bat能做到,用VB调用bat即可. 法二:录制自己的单个汉字的小音频文件,逐个读文本框中的文字,索引发音文件发音.核心是用VB做音频播放器的技术. 法三:源自法一,代价最大.就是下载中文的发音引擎,不过我记得有四五百兆之大,考虑其用户支持,恩,好像很不可行. 估计帮不上忙.

江孜县19695516537： 汇编语言中如何驱动主板喇叭发声和关闭声音 - ？
畅炊美敏： 别的不多说 给程序啊 CODE SEGMENT ASSUME CS:CODE START: MOV DX,10 SING: PUSH DX MOV BX,1000 CALL MIDO call delay POP DX DEC DX JNZ SING ;JNZ不等于零\不相等 标志位ZF=0 MOV AH,4CH INT 21H MIDO PROC MOV ...

江孜县19695516537： 编写VB 语句 请大家帮忙 补充完整 还有调用 怎么用?谢谢？
畅炊美敏： 读写的过程都帮你写好了啊,你只需要调用就够了 你调用readdata1后Arr1就有数据了,调用readdata2后Arr2就有数据了啊 那个写数据的方法给定文件名和一个整形的值就可以了 直接用过程名来调用 如:ReadData2 这样就可以了 带参数的 ...

江孜县19695516537： 如何用让VB朗读中文?？
畅炊美敏： 语音朗读开发包[SmartRead SDK] 6.1 http://act.it.sohu.com/down/softInfo.php?id=12234 在你的软件中加入文本朗读,混读功能,支持中文,英文男女声混合朗读,免费提供多种语音库 ,在朗读文本时,可以自由设定朗读语音,语速,音量; 并...