08/09/10 12:12:07
>>719,722
ありがとうございます！
以下のようにしたら十二平均律の周波数を算出できました。
Dim i As Integer, fr(12) As Double
For i = 0 To 12
fr(i) = Math.Pow(Math.Pow(2, i), 1.0 / 12.0)
Next
08/09/10 12:12:07
>>719,722
ありがとうございます！
以下のようにしたら十二平均律の周波数を算出できました。
Dim i As Integer, fr(12) As Double
For i = 0 To 12
fr(i) = Math.Pow(Math.Pow(2, i), 1.0 / 12.0)
Next