Народ, кто подскажет
имеется такой код:
'генерируем 25 случайных чисел в интервале 1-8
For I = 0 To 4
For J = 0 To 4
Do
N(I, J) = Int(7 * Rnd) + 1
If J = 0 Then Exit Do
Loop Until N(I, J) <> N(I, J - 1) And (N(I, J) + N(I, J - 1)) < 9
Next J
Next I
' воспоизводим цифры
For I = 0 To 4
For J = 0 To 4
sndPlaySound App.Path & "\" & Right(Str(N(I, J)), 1) & ".wav", 1
Next J
Next I
В последнем цикле воспроизводится только файл соответствующий
последнему числу т.е N(4,4), как сделать, чтобы проговорили все цифры
Воспроизвести несколько *.wav файлов
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 4
• Страница 1 из 1
- Twin
- Начинающий
- Сообщения: 4
- Зарегистрирован: 03.08.2002 (Сб) 22:18
- Откуда: Ukraine
Воспроизвести несколько *.wav файлов
Twin » 31.01.2006 (Вт) 18:25
- BV
- Thinker
-
- Сообщения: 3987
- Зарегистрирован: 12.09.2004 (Вс) 0:55
- Откуда: Молдавия, г. Кишинёв
BV » 31.01.2006 (Вт) 22:37
SND_SYNC или заюзать clsMCI из кирпичей и менять псевдоним.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
Сообщений: 4
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Google-бот, SemrushBot, Yandex-бот и гости: 144