I am having trouble with setting controls on my subfrm

[Ultimateneo]

If Me.cbcompany = True Then
Me!subfrmbookingin.Form!CompanyName.Visible = True
''Me!subfrmbookingin.Form!CompanyName.SetFocus = True (This line does not work)
Me!subfrmbookingin.Form!FirstName.Visible = False (This line does not work)
Else
Me.subfrmbookingin.Form!CompanyName.Visible = False
Me!subfrmbookingin.Form!FirstName.Visible = True 
(This line does not work)
''Me!subfrmbookingin.Form!FirstName.SetFocus = True 
(This line does not work)
End If

I hope someone knows what i am doing wrong here as not sure why it doesnt like multiple commands in the same if.

Thank you in advance for any help

[CJ_London]

always helps to show code indented

If Me.cbcompany = True Then
    Me!subfrmbookingin.Form!CompanyName.Visible = True
   ''Me!subfrmbookingin.Form!CompanyName.SetFocus = True (This line does not work)
   Me!subfrmbookingin.Form!FirstName.Visible = False (This line does not work)
Else
   Me.subfrmbookingin.Form!CompanyName.Visible = False
   Me!subfrmbookingin.Form!FirstName.Visible = True 
   (This line does not work)      
   ''Me!subfrmbookingin.Form!FirstName.SetFocus = True 
   (This line does not work)
End If

no reason you cannot use multiple commands

'doesn't work' doesn't help us to help you. You get an error? if so what?

also you are only showing part of the code, if you have setwarnings set to false or other error hiding code, you may be masking the problem

[Ultimateneo]

If Me.cbcompany = True Then
Me!subfrmbookingin.Form!CompanyName.Visible = True
''Me!subfrmbookingin.Form!CompanyName.SetFocus = True (This line does not work)
Me!subfrmbookingin.Form!FirstName.Visible = False (This line does not work)
Else
Me.subfrmbookingin.Form!CompanyName.Visible = False
Me!subfrmbookingin.Form!FirstName.Visible = True 
(This line does not work)
''Me!subfrmbookingin.Form!FirstName.SetFocus = True 
(This line does not work)
End If

I hope someone knows what i am doing wrong here as not sure why it doesnt like multiple commands in the same if.

Thank you in advance for any help

error message is you cant hide a control that has the focus

[CJ_London]

that error message can only appear for one or both of these lines

Me.subfrmbookingin.Form!CompanyName.Visible = False
Me!subfrmbookingin.Form!FirstName.Visible = False

before hiding the control, you need to move the focus to another control

try changing the order
1. make control to receive the focus visible
2. set the focus to the newly visible control
3. hide the other control