Access automatically strips dot from text field

[panosss]

I have a form which has a subform.
This subform has as Sourc Object a table.
This table has a field of text type.
I 'm trying to loop through the form 's recordset:

Dim rs As Object
    Set rs = Form_foods.RecordsetClone
    On Error Resume Next
    rs.MoveLast
    On Error GoTo 0
    RecordCount = rs.RecordCount

    'Check to see if the recordset actually contains rows
    If Not (rs.EOF And rs.BOF) Then
        rs.MoveFirst 'Unnecessary in this case, but still a good habit
        Do Until rs.EOF = True                
            a = rs!proteinsPer100grOrmlOrpc
            Debug.Print rs!food & " a=" & a
            rs.MoveNext
        Loop
    Else
        MsgBox "There are no records in the recordset."
    End If

(the field 's name is 'proteinsPer100grOrmlOrpc'.)

But it prints '67' instead of '6.7' (which is the actual text of the field) !!!
I repeat, it's a text field!!


Why on earth is this happening?

[aytee111]

What is a and how is it defined?

[davegri]

        Do Until rs.EOF = True                
            a = rs!proteinsPer100grOrmlOrpc
            Debug.Print "rs= " & rs!proteinsPer100grOrm10rpc
            Debug.Print rs!food & " a=" & a
            rs.MoveNext
        Loop

Seeing the rs would prove a discrepancy....

[panosss]

I deleted and recreated the table from which Form_foods takes it's data and was fixed.
I don't know what caused the problem.
Thank you guys.

[Lena01]

• Strip Width Options:
  
• 
  
  • Auto Widen Entire Strip option. When this option is selected, the program automatically adjusts the width of the selected design strips to be consistent with the span distances of the strips in the transverse direction. That is, if the selected design strip(s) is in the Layer A direction, you should have strips defined in the transverse Layer B direction, as the program will adjust the widths of the selected strips based on the support points for the Layer B strips. The width of a strip may be verified using the View menu > Select Display Options command or button and checking the Show Width option in the Design Strips area on the Set Display Options form.
    
  • User Specified Strip Segment Width option. When this option is selected, enter the width data in the areas described below.
    
  • 
    
    • Select the Strip Segment to be Edited: Select the segment to be edited from the Segment drop-down list. The strip widths specified in the User Specified Strip Segment Widths area apply to the selected segment. If more than one design strip has been selected, and the selected design strips do not all have the same number of segments, some of the segments in the list will not apply to all of the design strips. This list is available only if the User Specified Strip Segment Width option was selected in the Strip Width Options area.
      
    • User Specified Strip Segment Widths: Enter into the edit boxes the starting widths and ending widths for both the left and right sides for the segment selected in the Select the Strip Segment to be Editedarea. These edit boxes are available only if the User Specified Strip Segment Width option was selected in the Strip Width Options area. The orientation of left and right are as you look along the design strip segment from point n to point n+1.