Злая функция PlaySound

[Киска]

Сижу, вот, ковыряюсь с ф-й
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Вызываю Call PlaySound(PathSound, 0, 1) - звук играет
Теперь хочу прервать звук, вызываю:
Call PlaySound("", 0, 64)
Звук продолжает играть! Звук - wav файл. Вместо первого параметра ставлю "" или 0. Вместо третьего параметра ставлю то 0, то 1, то 64. Испробовала все комбинации, ничего не получается, звук играется!
Если вместо первого параметра ставить 0, то комп ещё и пикает! Но звук не останавливается! Злая, как чёрт! Всё, ложусь спать

[tyomitch]

vbNullString не пробовала?

[Киска]

О, класс! Работает! Спасибо, Тёмыч! А чем vbNullString отличается от пустой строки ""?

[BV]

Мне, кстати, интересно, а почему 0 не работает аналогично vbNullString?

[Viper]

Видимо потому, что для использования 0, надо параметр объявить как Long вместо String.

2 Киска, vbNullString - это нулевой указатель на строку, а "" - строка нулевой длины. Вот и вся разница

[Киска]

Нус, мистер !Viper!, когда мы передаём функции путь к файлу - функции передаётся указатель? А когда мы пишем пустую строку, разве на неё не передаётся указатель?

[keks-n]

Передаётся. Но vbNullString - не указывает ни на какую строку. Соответственно, вместо адреса строки в памяти функция получает нолик.

[Киска]

а если я указываю просто 0, чего не так?

[tyomitch]

Передаётся строка "0"

[Киска]

а чего не выскакивает ошибка, я ведь передаю 0 как число (не беру 0 в кавычки)?

[Matew]

Киска, происходит преобразование типов.

[BV]

2 Киска

Объяви lpszName As Any, все будет и с 0, и с vbNullString.

[Конь]

Все равно что ты поставишь кавычки или CStr

[Киска]

А чего оно происходит, преобразование типов? Зачем это нужно? Так бы я видела, что аргумент 0 не подходит, а так получается неправильно!

[AntonGV]

API функции не выводят сообщения об ошибках, они возвращают значение по которому можно определить успешно ли было выполнение функции или нет

sndPlaySound запускает WAV-файл или определенный системой звук. При использовании флага SND_NODEFAULT , функция возвращает 0, если WAV-файл (или системный звук) не найден и 1,если звук существует. Если флажок не установлен, функция всегда возвращает 1 и запускает звук по умолчанию Windows, если указанный звук не может быть найден.

[Киска]

AntonGV, спасибо, но я говорю о передаваемых аргументах, а не о результате выполнения ф-и

[keks-n]

Это сделано исключительно для удобства использования. Однако, такие неявные преобразования могут здорово испортить жизнь.

[alibek]

А чего оно происходит, преобразование типов? Зачем это нужно? Так бы я видела, что аргумент 0 не подходит, а так получается неправильно!

Потому что ByVal.
Если бы было ByRef, то VB выдал бы ошибку о несоответствии типов.
Но в случае с API способ передачи аргумента ты выбрать не можешь, поэтому надо следить самостоятельно.