N
New_Access
I have a code on 'on load' event of my form.In the beginning,
it did work for me but now It won't.Why?
I bound all text boxes to a table field with data type is text.
And bound all optiongroup ( fra_.......) to fields number.
But now there is an error message from VBA :
Error -2147352567 ( 80020009 )
You can't assign value to this object
Why?Any assist would greatly appreciated.
Thank's.
Private Sub Form_Load()
Me.SpeedMode_opt = 1
Me.fra_Rotationspeed1 = 1
Remarkrotationspeedspec1.Value = "Min"
Me.fra_Freeaircurrent1 = 1
Re_freeaircurrentspec1.Value = "Min"
Me.fra_Lockcurrent1 = 1
Re_lockcurrentspec1.Value = "Min"
Me.fra_Rotationspeed2 = 1
Re_rotationspeedspec2.Value = "Min"
Me.fra_Freeaircurrent2 = 1
Re_freeaircurrentspec2.Value = "Min"
Me.fra_Lockcurrent2 = 1
Re_lockcurrentspec2.Value = "Min"
End Sub
it did work for me but now It won't.Why?
I bound all text boxes to a table field with data type is text.
And bound all optiongroup ( fra_.......) to fields number.
But now there is an error message from VBA :
Error -2147352567 ( 80020009 )
You can't assign value to this object
Why?Any assist would greatly appreciated.
Thank's.
Private Sub Form_Load()
Me.SpeedMode_opt = 1
Me.fra_Rotationspeed1 = 1
Remarkrotationspeedspec1.Value = "Min"
Me.fra_Freeaircurrent1 = 1
Re_freeaircurrentspec1.Value = "Min"
Me.fra_Lockcurrent1 = 1
Re_lockcurrentspec1.Value = "Min"
Me.fra_Rotationspeed2 = 1
Re_rotationspeedspec2.Value = "Min"
Me.fra_Freeaircurrent2 = 1
Re_freeaircurrentspec2.Value = "Min"
Me.fra_Lockcurrent2 = 1
Re_lockcurrentspec2.Value = "Min"
End Sub