P17.窗体中有文本框Text1和标签Label1,运行程序单击按钮Command1,输入整数m(m>0),程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是含数”。 事件代码如下: Private Sub Command1_Click() Dim result As string m=Val(Me!Textl) result=m&"是素数" k=2 Do Whie k<=m/2 Ifm Mod k= 0 Then result=m&"是合数" Exit Do End If k=k+1 Loop 【】= result End sub 程序【】出应填写的语句是