[RESOLVED] Need to get the total, but datatype prevents it...

[seema_s]

Hi,

I am facing the following problem. Please help me.

I am using MS Access database. The field GR84 has set to Text data Type. All the data entered in GR84 is in numeric. Now, I would like to calculate the Total of GR84 in a textbox. The following is the code. I am getting the type mismatch error. I think because the data type in database is Text, its showing that error. How to proceed without changing the data type in database?

Private Sub cmdShowTotal_Click()
 
Dim GR84Total As Long
GR84Total = 0
rs.MoveFirst
Do Until rs.EOF
GR84Total = GR84Total + rs("GR84")
rs.MoveNext
Loop
Me.txtShowTotal = GR84Total
End Sub

Regards.

Seema_s

[Hack]

Try

Val(rs("GR84"))

[seema_s]

Try

Val(rs("GR84"))

Hi, Hack! It works fantastic. Thanks for your kind help as usual.

Regards.

Seema_S