VBA to populate range with textbox.value form UserForm keyboard input not working

Hi All

I have the below code which populates a cell with information from UserForm30.TextBox1
UserForm30 is a onscreen keyboard. When I type in a message such as "ABC" , Then TextBox1 gets populated with "ABC"....
Problem I have is that the actual "ABC" is not filling my cell when the code executes...It fills the cell with a random value i.e. 1 or sometimes a date value....Any Ideas

With Sheets("KP")
With .Range("A4")
.Offset(1, 3).Value = UserForm30.TextBox1.Text
End With
End With