はじめまして、よろしくお願いします。
VB2005を使用しています。
Mci等でWAVファイルに音声を録音したいと考えたのですが、
はじめは、MciSendStringで試しましたが、
メディアプレイヤーで再生で傷に断念、、
MCIコントロールも使い方が分からずに断念、、
そうなるとどうしたら良いのか分からなくて困っています。
もし、MciSendStringなどで録音できる方法がありましたら教えてください。
他の方法でももちろんかまいません。
こちらが本家ですよね?:
http://hpcgi1.nifty.com/rucio/mb1/mb1.cgi
そうですね、そちらが本家ですね。
しかし、いろんなところに質問したら、
さまざまな回答を得られると思いましたので、こちらにも質問させていただきました。
うーん…気づいていないのだろうか…
http://glossary.tank.jp/t022B.html
そしてこちらは分家ですか?
http://dobon.net/cgi-bin/vbbbs/cbbs.cgi?mode=one&namber=15282&type=0&space=0&no=0
マルチは嫌われたりするのでかえって回答つかなくなるかもですよ。
大変失礼いたしました。
僕は、少しでもいろいろな回答を得ようと書き込んだつもりで、
このような違反行為を行っているとは思っていませんでした、
本当に、管理人さんにも皆さんにも、ご迷惑をおかけして申し訳ございませんでした。
今後、質問は一箇所だけにします。
やってしまったことは仕方ないので、
マルチした全ての掲示板に、
どのようなアドバイスをもらい
どのようなコードをくんだら解決までいたりました。
という報告をきちんとしてください。(リンクを張るのはダメ)
# 大抵のマルチをするひとが、これをやらずに放置するのでいっそう嫌われます。
分かっていただいて、良かったです。
>どのようなアドバイスをもらい
>どのようなコードをくんだら解決までいたりました。
>という報告をきちんとしてください。
分かりました、報告させていただきます。
Visual Basic 中学校の管理人さんに、こちらの掲示板でアドバイスを頂き、解決いたしました。「http://hpcgi1.nifty.com/rucio/mb1/mb1.cgi」
mciSendString("set file time format milliseconds channels 2 samplespersec 44100 bytespersec 44100 alignment 1 bitspersample 16", Ret2, 255, 0)
と言う、音質の設定コードを、
Dim CommandString As String
Dim SampleRate As Integer = 44100
Dim BitperSample As Integer = 16
Dim Channels As Integer = 2
Dim BytesPerSec As Integer
Dim BlockAlignment As Integer
BytesPerSec = (BitperSample * Channels * SampleRate) / 8
BlockAlignment = (BitperSample * Channels) / 8
CommandString = "set file time format milliseconds channels " & Channels & " "
CommandString &= "samplespersec " & SampleRate & " "
CommandString &= "bytespersec " & BytesPerSec & " "
CommandString &= "alignment " & BlockAlignment & " "
CommandString &= "bitspersample " & BitperSample
Ret = mciSendString(CommandString, Ret2, 255, 0)
のようにしたら、解決できました。
僕も、どうしてこのようにして解決で気なのかが分からないので、
アドバイスをいただいた管理人さんにお聞きしています。
ツイート | ![]() |