If name = test1 then let , NOT WORKING ?

[caljohn527]

Hi, all can someone help me with a problem that I have.


Working in Access / Build Event

In my form I have two fields one is call ( name ) it is a text field and a lookup.
The other one is call ( Point1 ) it is a text field.


Private Sub number_BeforeUpdate(Cancel As Integer)
If name = Test1 Then Let point1 = 10
If name = Test2 Then Let point1 = 20
If name = Test3 Then Let point1 = 30
If name = Test4 Then Let point1 = 40

End Sub

Why this is not working.???????


Thank You

Johnny C

[Butterflies88]

Not sure if this will work but try:

Private Sub number_BeforeUpdate(Cancel As Integer)
If name = Test1 Then Let point1 = 10
ElseIf name = Test2 Then Let point1 = 20
ElseIf name = Test3 Then Let point1 = 30
ElseIf name = Test4 Then Let point1 = 40
End if
End Sub

Hi, all can someone help me with a problem that I have.
Working in Access / Build Event

In my form I have two fields one is call ( name ) it is a text field and a lookup.
The other one is call ( Point1 ) it is a text field.


Private Sub number_BeforeUpdate(Cancel As Integer)
If name = Test1 Then Let point1 = 10
If name = Test2 Then Let point1 = 20
If name = Test3 Then Let point1 = 30
If name = Test4 Then Let point1 = 40

End Sub

Why this is not working.???????


Thank You

Johnny C

[jya]

I am going off what is written, but I wouldn't use 'name' as a field name and I would use quotes when comparing against a text field.

ex. If TestName = "Test1" then ...

[caljohn527]

Thank You butterflies88 and Jya for your help but unfortunately it is not working, but here is the expression that I am using. And it is not working.

Private Sub number_BeforeUpdate(Cancel As Integer)
If Combo206 = Poor Then Let emppoint1 = 10
If Combo206 = Good Then Let emppoint1 = 20
If Combo206 = Fair Then Let emppoint1 = 30
If Combo206 = Excellent Then Let emppoint1 = 40

End Sub