Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Compile error - Procedure declaration does not match...

Status
Not open for further replies.

din2005

Programmer
Mar 22, 2005
162
GB
Hi all,

I get this error msg when i compile my code Compile error - Procedure declaration does not match description of event or procedure having the same name.

it highlights this line of code

Private Sub DgnDictEdit1_PlaybackNowPlaying()
' Updates the visibile text selection based on information about
' the word size received in the PlayInfos collection
Dim curInfo As Object

If (bPlaySingle = True) Then
' Get the last PlayInfo
LastPlayInfo = eventArgs.PlayInfos(eventArgs.PlayInfos.Count)

' Update the start position for the next word
nStartPos = LastPlayInfo.Start + LastPlayInfo.NumChars

' Set the selection
SetSelection (LastPlayInfo.Start), (LastPlayInfo.NumChars)
Else
' Remembering start time, selection position...
nPlaybackStartTime = GetTickCount
nSelStart = Text1.SelectionStart
nSelLength = Text1.SelectionLength

' ...and clearing NowPlaying collection
Do
While (NowPlaying.Count() <> 0)
NowPlaying.Remove ((1))
Exit Do

Loop

' Store PlayInfos collection into NowPlaying to set selection
For Each curInfo In eventArgs.PlayInfos
NowPlaying.Add (curInfo)
Next curInfo
End If

End Sub


any suggestions where i gone wrong???
 
I find you will get this error if the declartaion does not match the expected declaration. For example:
Expected
Private Sub txtText_BeforeUpdate([blue]Cancel As Integer[/blue])
Causes error
Private Sub txtText_BeforeUpdate()
[ponder]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top