窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
m=-3.6
If Sgn(m) Then
n=Int(m)
Else
n=Abs(m)
End If
Print n
End Sub
运行程序，并单击命令按钮，窗体上显示的内容为

单项选择题在窗体上画一个文本框，名称为Text1，然后编写如下程序：Private Sub Form_Load()Text1.Text= :Text1.SetFocusEnd SubPrivate sub Form_Click()Dim a As String, s As Stringa=Text1.Text:s= For k=1 To Len(a)s=UCase(Mid(a,k,1))+sNext kText1.Text=sEnd Sub程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容

单项选择题设有如下程序：Private Sub Form_Click()num=InputBox( 请输入一个实数 ):p=InStr(num, . )If p＞0 ThenPrint Mid(num,p+1)ElsePrint END End IfEnd Sub运行程序单击窗体，根据提示输入一个数值。如果不是输入实数，则输出“END”；否则