Drive me INSANE (Dx8 sound)

[alkatran]

Alright, I've got this code... I don't understand how the error can happen:

I have a general "loadsound" sub, so I don't have to look at DX code, lalala... anyways:

Public Sub LoadSound(ByVal Path As String, ByRef Buffer As DirectSoundSecondaryBuffer8)
Dim DsDesc As DSBUFFERDESC
    
    DsDesc.lFlags = DSBCAPS_CTRLFREQUENCY Or DSBCAPS_CTRLPAN Or DSBCAPS_CTRLVOLUME
    
    Set Buffer = DSound.CreateSoundBufferFromFile(App.Path & Path, DsDesc)
'ERROR: byref argument type mismatch
'DsDesc is highlighted. what could cause this?
End Sub

[Electroman]

Originally posted by alkatran
Alright, I've got this code... I don't understand how the error can happen:

I have a general "loadsound" sub, so I don't have to look at DX code, lalala... anyways:

Public Sub LoadSound(ByVal Path As String, ByRef Buffer As DirectSoundSecondaryBuffer8)
Dim DsDesc As DSBUFFERDESC
    
    DsDesc.lFlags = DSBCAPS_CTRLFREQUENCY Or DSBCAPS_CTRLPAN Or DSBCAPS_CTRLVOLUME
    
    Set Buffer = DSound.CreateSoundBufferFromFile(App.Path & Path, DsDesc)
'ERROR: byref argument type mismatch
'DsDesc is highlighted. what could cause this?
End Sub

What type does the CreateSoundBufferFromFile() function take as the last parameter? The error is saying its not DSBUFFERDESC. If it is then put DxVBLibA.DSBUFFERDESC as the type.

[Electroman]

This is because your accessing both Dx7 & 8. so it doesn't know which library its getting the type from .

[alkatran]

That was actually my guess.. how do i get around the error?

[alkatran]

nevermind, noticed you were the same person and put DxVBLibA in front.

[Electroman]

Same person, multiple personalitys . Who said that