private sub score_lostfocus( ) x=val(score.text) if x100 then beepscore.text=""score.setfocuselsetotal=xend if end sub

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/27 11:07:09
privatesubscore_lostfocus()x=val(score.text)ifx100thenbeepscore.text=""score.setfocuselsetotal=xendi

private sub score_lostfocus( ) x=val(score.text) if x100 then beepscore.text=""score.setfocuselsetotal=xend if end sub
private sub score_lostfocus( )
x=val(score.text)
if x100 then
beep
score.text=""
score.setfocus
else
total=x
end if
end sub

private sub score_lostfocus( ) x=val(score.text) if x100 then beepscore.text=""score.setfocuselsetotal=xend if end sub
虽然看的不太懂.但可以明确的告诉你,你分类写错了.在这里估计帮不了你了.