《自由大 * * 》是英国近代资产阶级革命的著名成果。

若窗体中已有一个名为Command1的命令按钮、一个名为Label 1的标签和一个名为Text 1的文本框，且文本框的内容为空，然后编写如下事件代码： Private Function f(x As Long) As Boolean If x Mod 2＝0 Thenf＝True Elsef＝False End If End Function Private Sub Command1_Click( ) Dim n As Long n＝Val(Me!text1) p＝IIf(f(n) ，“Even number”，“Odd number”) Me!Label 1.Caption＝n&“is”&p End Sub 窗体打开运行后，在文本框中输入21，单击命令按钮，则标签显示内容为______。