[填空题] 执行下面程序,单击命令按钮Cmd1后,窗体上显示的第一行内容是（）,第二行内容是（）,第三行内容是（）。Option ExplicitPrivate Sub Cmd1_Click()Dim

[填空题] 执行下面程序,单击命令按钮Cmd1后,窗体上显示的第一行内容是（）,第二行内容是（）,第三行内容是（）。Option ExplicitPrivate Sub Cmd1_Click()Dim st As String,ch As String*1,t As IntegerDim i As Integerst="2,3,8,12,32,65#"For i=1 To Len(st)ch=Mid(st,i,1)If ch<>"," And ch<>"#" Thent=t*10+Val(ch)ElseIf pd(t) Then Print tt=0End IfNext iEnd SubPrivate Function pd(ByVal n As Integer)As BooleanDo While n<>1If n Mod 2<>0 ThenExit FunctionEndIfn=n2Looppd=TrueEnd Function