用vb如何开发具有卡拉ok的功能

Question

我想开发具有卡拉ok的功能，不知道怎么开发，比如：原声唱和没有原声唱怎么转化

Answer 1

我知道VCD格式是通过左右声道来区别原唱和音乐的。

Answer 2

vcd 的节目源，就是专门为卡拉ok准备的－－双声道，一个音乐、一个人声。

Answer 3

用MCI和函数实现，VCD版左右声道用inin = mciSendString("setaudio " & cccccc & " source to right", vbNull, 0, 0),DVD版用
inin = mciSendString("setaudio " & cccccc & " stream to 1", vbNull, 0, 0),具体你在看下mciSendString函数的介绍，GOOGLE下

Answer 4

Public Function SetAudioSource(sAudioSource As AudioSource) As Boolean 
 Dim RefInt As Long 
 Dim strSource As String 
 Select Case sAudioSource 
 Case 1: strSource = "left" 
 Case 2: strSource = "right" 
 Case 0: strSource = "stereo" 
 End Select  SetAudioSource = False 
 RefInt = mciSendString("setaudio NOWMUSIC source to " & strSource, vbNull, 0, 0)  If RefInt = 0 Then SetAudioSource = True End Function 

Answer 5

你可到以下網址 http://hk.geocities.com/ktv369hk/，內裏有一用MCI控制左右声道的VCD播放器的源碼，及一個功能十分齊全的卡拉OK播放程式。