① 改变声道数 ② 增加量化位数 ③ 降低音量
④ 提高采样频率 ⑤ 将其另存为mp3格式
a[1] | a[2] | a[3] | a[4] | a[5] | a[6] | a[7] |
all | bro | car | due | eve | fre | geo |
d[1] | d[2] | d[3] | d[4] | d[5] | d[6] | d[7] | d[8] |
206 | 216 | 210 | 222 | 218 | 208 | 220 | 202 |
Private Sub Command1_Click()
Dim a As String, b As String, c As String
a = InputBox("请输入a的值")
b = InputBox("请输入b的值")
c = a + b
Print c
End Sub
二进制 |
十进制 |
|
第1个数 |
10 000 0 |
32+0 |
第2个数 |
10 001 0 |
32+2 |
…… |
||
最后1个数 |
11 111 0 |
32+ |
Dim i As Integer, s As Integer
i = 0: s = 0
Do While
i = i + 1
Loop
Print s