Information générale
Catégorie:
Codage, syntaxe et commandes
Titre:
New to FoxPro 6.0 and this doesn't want to work
DO CASE
CASE MBATCH = 1 .AND. BATCHTYPE = 1
DO FORM ADDBTCHMNT
THISFORM.RELEASE
CASE MBATCH = 1 .AND. BATCHTYPE = 2
nAnswer = MESSAGEBOX('ERROR MESSAGE', 0, 'This Batch Type is not available for this Option')
nanswer = 0
wait window 'Please choose another Option' nowait
ENDCASE
mbatch is the control source for the 1st optionbuttongroup and batchtype is the control source for the 2nd optionbuttongroup
there are more similar case statements to follow up to mbatch = 6 .and. batchtype = 6 but since I can't get the second case statement to work have stopped there. It just ignores that I have pressed the option2 after I have pressed option1.
The case statement is under the 2nd optionbuttongroup with the procedure valid
Thanks
Jennifer
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement