pedie
Well-known Member
- Joined
- Apr 28, 2010
- Messages
- 3,875
Hi, I tried tried it like this and seems to work, but dont want to get into any problem latter...so please confirm if 'm declaring this in the right way....
Thanks alot!
Thanks alot!
Code:
[/FONT]
[FONT=Courier New]Option Compare Database
Dim AccessX As Boolean
Public Function VarialbeX()
Dim mycri As String
mycri = 1[/FONT]
[FONT=Courier New]
If mycri = 2 Then
AccessX = True
Else
AccessX = False
End If
End Function
Sub TestmyFunction()
MsgBox AccessX
End Sub