Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Please HELP!!!
Message
De
09/10/1999 12:29:53
 
 
À
09/10/1999 12:23:39
Coann Teng
Computer Infobase System S/B
Kuala Lumpur, Malaisie
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00274609
Message ID:
00274610
Vues:
32
>Can anyone tell me what wrong on this code
>
>------------------------------------------------------------------
>
>Function Totalmf
>
>tmm=0
>tmf=0
>tcm=0
>tcf=0
>tim=0
>tif=0
>tom=0
>tof=0
>
>Sele Emp
>Set Filter To Resign = .f.
>Go Top
>
>Do While !Eof()
>Do Case
>	Case Sex='M' .And. Race ='Malay'
>		Tmm=tmm+1
>		
>	Case Sex='F' .And. Race = 'Malay'
>		tmf=tmf+1
>		
>	Case Sex='M' .And. Race='Chinese'
>		tcm=tcm+1
>		
>	Case Sex='F' .And. Race='Chinese'
>		tcf=tcf+1
>		
>	Case Sex='M' .And. Race='India'
>		tim=tim+1
>	
>	Case Sex='F' .And. Race='India'
>		tif=tif+1
>		
>	Case Sex='M' .And. Race='Other'
>		tom=tom+1
>	
>	Case Sex='F' .And. Race='Other'
>		tof=tof+1
>EndCase
>Skip
>EndDo
>
>Return (tmm,tmf,tcm,tcf,tim,tif,tom,tof)
>EndFunc
>------------------------------------------------------------------
>
>
>
>The Error Message when compile is : -
>Return (tmm,tmf,tcm,tcf,tim,tif,tom,tof)
>Error in line 107: Function name is missing ).

You can't return multiple variables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform