if statemnets and variables

[Guest]

i am using this if statement:

stDateType = Appointmentdate

If Weekday(Appointmentdate, vbMonday) = vbMonday Then
MsgBox "you can only take 5 patients"

i would like to be able to have the user set the number of patients

eg. MsgBox "you can only take", monday variable , "patients"

is this possible to set a variable for the patient numbers?
any help would be great thanks

yours

david

 

[Kai Apel \(Berlin\)]

i am using this if statement:

stDateType = Appointmentdate

If Weekday(Appointmentdate, vbMonday) = vbMonday Then
MsgBox "you can only take 5 patients"

for sure:

Dim lgPat as Byte 'If you have not more than 256 Patient otherwise take
Integer
lgPat = Me.NameOfYourPatientFieldinForm 'for example
MsgBox"you can only take " & lgPat & " patients!"

Kai Apel (Berlin)