| 
 | 
 
 
发表于 2015-4-21 21:26:33
|
显示全部楼层
 
 
 
 本帖最后由 panxixue 于 2015-4-21 22:59 编辑  
 
占座,一会儿放作业,谢谢罗老师! 
第一个: 
 
axlCmdRegister("myfifthskill" 'myfifthskillFunc) 
procedure( 
myfifthskillFunc(num)  
sprintf(string,"The Number  %d is  an odd",num); 
when(oddp(num) == t   axlUIConfirm(string)); 
);end procedure 
 
 
 
第二个 
 
axlCmdRegister("mysixthskill" 'mysixthskillFunc) 
defun( 
mysixthskillFunc ( @key  (height 161)  (name  ""))  
 
when(height > 160 axlUIConfirm(sprintf(nil,"height is more than 160"))); 
when(height == 160 axlUIConfirm(sprintf(nil,"height is equal to 160"))); 
when(height < 160 axlUIConfirm(sprintf(nil,"height is less than 160"))); 
 
 
when(name == ""  axlUIConfirm(sprintf(nil,"input your name!"))); 
 
);end defun 
 
 
 
再问罗老师,when之后没有else吗,只能一直when...吗 
 
 |   
 
 
 
 |