Avatar of isnoend2001
isnoend2001
Flag for United States of America

asked on 

trying to determine why i get a type mismatch

betmode is either 0 or 1
1= currency
0= credits



Private Function CreditMode0String(ByVal credit As String, ByVal betMode As Integer)
    credit = IIf(InStr(credit, "$") > 0, CCur(Mid(credit, 2)), CCur(credit)) highlighted line
    'credit = CCur(Mid(credit, 2))
    CreditMode0String = credit / GetPriceByBetMode(betMode)
End Function

why am i getting this error ?
Visual Basic Classic

Avatar of undefined
Last Comment
isnoend2001

8/22/2022 - Mon