Copy And Round With Click Event

I use a CommandButton on a UserForm to copy the contents of 12 TextBoxes into the last row on a sheet. I am getting numbers with too many places. I tried to use Round(), but it is not working.

Here is the original

With Range("A65536").End(xlUp)
For i = 1 To 12
.Offset(0, i).Value = Me.Controls("TB" & i + 4).Value
Next i
End With

This gives me all of the decimal places.

Here is my attempt to use Round():

With Range("A65536").End(xlUp)
For i = 1 To 12
.Offset(0, i).Value = Round(Me.Controls("TB" & i + 4).Value)
Next i
End With

This gives me a type mismatch error.