21. 如有如下Sub过程: Sub sfun(x As Single,y As single) t=x x=t/Y y=t Mod y End sub 在窗体中添加一个命令按钮Command33,对应的事件过程如下: Private Sub Command33_Click( ) Dim a As Single Dim b As Single a=5:b=4 sfun(a,b) NsgBox a&chr(10) +chr(13) &b End Sub 打开窗体运行后,单击命令按钮,消息框中有两行输出,内容分别为______。
30. 窗体中有文本框Text1和标签Label1。运行程序,输入大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下: Private Sub Command1_Click() m=Val(Me!Text1) resclt=m &"是素数" k=2 Do While k<=m/2 If m Mod k=0 Then result=m &"是合数" ______ End If k=k+1 Loop Me!Label1.Caption=result End Sub 程序画线处应填写的语句是______。