Problemer med at køre et VBscript via Access

Hejsa alle samme.
Når jeg starter min database skal den komme op og spørge med 2 options på en form :

Private Sub SelectNext_Click()

userselection = (Forms![AreaorCountry]!SelectBox)

Select Case userselection
Case 1 'User selected Country
DoCmd.OpenForm "Country select", acNormal, "", "", , acNormal
DoCmd.Close acForm, "AreaorCountry"

Case 2 'User selected Area
DoCmd.OpenForm "Area select", acNormal, "", "", , acNormal
DoCmd.Close acForm, "AreaorCountry"

Case 3 'User selected nothing
MsgBox "Please select Area or Country"
End Select

End Sub

Det skal så åbne en anden form, men for nogle virker det og form nr2 åbner, for andre gør det ikke og form 1 lukkes bare ned, hvad den også skal. så sker der ikke mere. 
Alle køre Access 2002 SP3