Type Mismatch

[Halfar]

Porque ocorre erro no seguinte codigo

X = Day(CmbDiaDebito.Text) & "/" & Month(TextDataMensalidade.Text) & "/" & Year(TextDataMensalidade.Text)

O erro que ocorre é run timer error 13 - type mismatch

[kuroi]

é porque o valor q você tenta passar à variavel x não corresponde ao tipo de variavel.

você declarou x como o q? string? inteiro? data?

se for data, tente fazer:

X = Conversion.CDate(Day(CmbDiaDebito.Text) & "/" & Month(TextDataMensalidade.Text) & "/" & Year(TextDataMensalidade.Text))

ou talvez seja porque o CmbDiaDebito.Text ou o TextDataMensalidade.Text não contem uma data valida.

exemplo, você digitou "abc" no TextDataMensalidade.Text. se você tentar usar a funcao Month() na string "abc", vai ocorrer esse erro.

por isso antes você tera q validar o TextDataMensalidade.Text com a funcao IsDate().