⑴ 大象發出的聲音用語言怎麼說
oink 吧。我記得是。。莫噴
⑵ 電腦耳機能聽見聲音，但是確對不了語言，我能聽見別人說話，別人聽不見我說話,耳機是好的
右鍵點右下角的小喇叭，調整音頻屬性，語聲，點錄音下面的音量，把麥克風打上狗即可。
點下面的測試硬體，按說明測試你的麥克風能用不。
⑶ 用VB[basic語言]讓電腦發聲的程序怎麼寫
給你個類模塊，用起來比較簡單。MMedia.cls '----------------------------------------------------
Option Explicit
'--------------TrueZq 最新更新2001-01-12---------------------
'文件名： MMedia.cls
'說明： : 一個多媒體類,能播放Avi、Wave、Midi文件
'用法：
'Dim Multimedia As New Mmedia
'Multimedia.mmOpen "c:\test.wav"
'Multimedia.mmPlay
'！記住：在程序結束時，一定要用Set Multimedia=nothing釋放資源！！！
'-----------------------------------------------------
' -=-=-=- 屬性 -=-=-=-
' sFilename 當前的文件名
' nLength 文件長度（只讀）
' nPosition 當前位置
' sStatus 當前狀態（只讀）
' bWait True/False.決定是否等待播放完
' -=-=-=- 方法 -=-=-=-=-
' mmOpen <Filename> 打開要播放的文件
' mmClose 關閉當前文件
' mmPause 暫停
' mmStop 停止 停止後可以跳到開始再次播放
' mmSeek <Position> Seeks to a position in the file
' mmPlay 播放
'--------------------------------------------------------------
Private sAlias As String '別名
'Private hWnd As Long
Private sFilename As String ' 當前的文件名
Private nLength As Single ' 文件長度Private nPosition As Single ' 當前位置
Private sStatus As String ' 當前狀態
Private bWait As Boolean ' 決定是否等待播放完
Const WS_CHILD = &H40000000
'------------ API 聲明 -------------
Private Declare Function mciSendString Lib "winmm.dll" _
Alias "mciSendStringA" (ByVal lpstrCommand As String, _
ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As LongPrivate Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
'Public Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Private Function GetShortPath(strFileName As String) As String
Dim lngRes As Long, strPath As String
'Create a buffer
strPath = String$(165, 0) '這句是關鍵
'retrieve the short pathname
lngRes = GetShortPathName(strFileName, strPath, 164)
'remove all unnecessary chr$(0)'s
GetShortPath = left$(strPath, lngRes)
End Function
'Private Declare Function GetActiveWindow Lib "USER32" () As Integer
'當sTheFile是一個Avi文件時，參數hWnd指定動畫在哪裡播放
'若hWnd=0，則新開一個窗口播放動畫。
'如果聽不到Midi音樂，請在Windows下用媒體播放器測試一下。
'文件名不能帶空格
Public Sub mmOpen(ByVal sTheFile As String, Optional hWnd As Long = 0)
Dim nReturn As Long
Dim sType As String '文件類型
Static nNum As IntegerIf sAlias <> "" Then '關閉開始打開的文件
mmClose
End IfsTheFile = GetShortPath(sTheFile)If (Dir(sTheFile) = "") Then '判斷是否是一個存在的文件
sFilename = "文件" & sTheFile & " 不存在！"
Exit Sub
Else
sFilename = sTheFile
' nNum = nNum + 1
End If
' Stop
sAlias = sFilename '用文件名作別名，避免別名沖突！
' 判斷文件類型
Select Case UCase$(right$(sTheFile, 3))
Case "WAV"
sType = "Waveaudio"
Case "AVI"
sType = "AviVideo"Case "MID"
sType = "Sequencer"
Case Else
' 未知文件格式，退出。
Exit Sub
End SelectIf sType = "AviVideo" And hWnd > 0 Then
nReturn = mciSendString("open " & sTheFile & " ALIAS " & sAlias _
& " TYPE AVIVideo parent " & hWnd & " style " & LTrim$(str$(WS_CHILD)), 0&, 0, 0)
Else
nReturn = mciSendString("Open " & sTheFile & " ALIAS " & sAlias _
& " TYPE " & sType, "", 0, 0)
End IfEnd Sub
'關閉當前打開的多媒體文件
Public Sub mmClose()
Dim nReturn As Long'如果沒有文件打開，則退出
If sAlias = "" Then Exit SubnReturn = mciSendString("Close " & sAlias, "", 0, 0)
sAlias = ""
sFilename = ""End Sub
'暫停
Public Sub mmPause()Dim nReturn As LongIf sAlias = "" Then
Exit Sub
ElseIf Status = "paused" Then '如果先前已經暫停了，則解除暫停
mmPlay
Else
nReturn = mciSendString("Pause " & sAlias, "", 0, 0)
End If
'nPosition = Position
End Sub
'播放
Public Sub mmPlay()Dim nReturn As LongIf sAlias = "" Then
Exit Sub
ElseIf Position = Length Then '如果已經到末尾
mmSeek 0 '跳到開始處
End If
If bWait Then
nReturn = mciSendString("Play " & sAlias & " wait", "", 0, 0)
Else
nReturn = mciSendString("Play " & sAlias, "", 0, 0)
End If
End Sub
'停止
'停止後跳到開始,以便再次播放
Public Sub mmStop()Dim nReturn As LongIf sAlias = "" Then Exit SubnReturn = mciSendString("Stop " & sAlias, "", 0, 0)
mmSeek 0 '跳到開始位置
End Sub
'跳到指定的位置,並且處於暫停狀態
'當nPosition的值>Length 或者nPosition<0時，將忽略這次操作
Public Sub mmSeek(ByVal nPosition As Single)Dim nReturn As Long
nReturn = mciSendString("Seek " & sAlias & " to " & nPosition, "", 0, 0)
End Sub
'方法Filename返回當前打開的文件名
Property Get filename() As String
filename = sFilename
End Property
'指定要播放的文件名，然後將它打開
'對於需要指定容器的Avi文件，不要以這種方式打開。
Property Let filename(ByVal sTheFile As String)
sTheFile = GetShortPath(sTheFile)
mmOpen sTheFile
End Property
'讀取屬性Wait的值
'Msgbox Multimedia.Wait
Property Get Wait() As Boolean
Wait = bWait
End Property
'設置等待屬性
'用法：Multimedia.Wait=True
Property Let Wait(bWaitValue As Boolean)
bWait = bWaitValue
End Property
'獲得長度值
Property Get Length() As SingleDim nReturn As Long, nLength As Integer
Dim sLength As String * 255If sAlias = "" Then
Length = 0
Exit Property
End If
nReturn = mciSendString("Status " & sAlias & " length", sLength, 255, 0)
nLength = InStr(sLength, Chr$(0))
Length = Val(left$(sLength, nLength - 1))
End Property
Property Let Position(ByVal nPosition As Single)
mmSeek nPosition
End Property
'獲取當前位置
Property Get Position() As SingleDim nReturn As Integer, nLength As IntegerDim sPosition As String * 255
If sAlias = "" Then Exit Property
nReturn = mciSendString("Status " & sAlias & " position", sPosition, 255, 0)
nLength = InStr(sPosition, Chr$(0))
Position = Val(left$(sPosition, nLength - 1))
End Property
'當前打開文件的狀態
'有以下幾種：playing paused stopped
Property Get Status() As StringDim nReturn As Integer, nLength As Integer
Dim sStatus As String * 255If sAlias = "" Then Exit Property
nReturn = mciSendString("Status " & sAlias & " mode", sStatus, 255, 0)nLength = InStr(sStatus, Chr$(0))
Status = left$(sStatus, nLength - 1)End Property
'從頭開始播放
Public Sub mmRestart()
Dim nReturn As LongIf sAlias = "" Then Exit SubmmSeek 0
mmPlay
End Sub
'類的初始化
Private Sub Class_Initialize()
' sAlias = "" '別名初值為空
End Sub
'關閉打開的多媒體設備
'當該類的對象所在的窗體（或模塊）卸載時，自動調用該過程
Private Sub Class_Terminate()
mmClose
End Sub
⑷ 我家電腦跟人語言說話有雜音怎麼辦
你說的雜音,首先要知道是環境雜音還是電磁干擾,還是電流聲.弄清楚這些才能對應處理.麥的聲音是可以調大的
⑸ 電腦里怎麼切換DVD語言發音
在暴風影音菜單欄點擊查看→選項→濾鏡→音頻切換器→啟用自定義聲道映射→根據實際聲回道來勾選即可。
立體答聲是通過2個以上喇叭的聲場作用來產生空間聽覺效果。
立體聲不僅依賴於音響設備，也依賴於聲源，也就是說錄制的時候決定了聲道的數量。
你的電影里已經使用了2個聲道，而且一個是英語一個是漢語，所以是沒法再實現單一語種的立體聲的，該設置其實只是讓兩個喇叭發出同一個聲道的聲音，這樣至少比響一邊要舒服些。
⑹ 地震緊報鈴的聲音如何用語言表示
地震警報量的生意如何用原表示那你在家怎麼表示都可以
⑺ 筆記本電腦上更改音頻和聲音外放的怎麼都是英文怎麼改成國語
系統語言不是中文？影視是國外的說英語很正常，看中文字幕就行了
⑻ 電腦用古老的語言怎麼說
非人哉!
竇娥冤!
⑼ 動物探險家，cctv老是播的那個！沒有的話，說幾個！！
世界著名野生動物探險家奈吉・馬爾文曾多次深入人跡罕至的幽林秘境，探尋野生動物的足跡。
野生動物探險家奈吉爾馬文
人稱「鱷魚獵手」的史蒂夫·厄文
⑽ 易語言如何捕捉電腦聲音
最簡單的內錄，簡單的說怎麼實現，你網路一下電腦怎麼設置內錄，用程序後台進行這樣的設置，然後進行錄音，錄音完成後再設置回來就行了。內錄的原理就是設置好以後，打開錄音機錄的就是電腦播放的聲音。