1. 编写VB程序，实现如下功能：在文本框中输入一个整数，单击“计算”按钮Command1，则输出表达式 的值。程序运行界面如下图所示。

1. （1） 该VB窗体上共包含类对象。
3. （2） 实现上述功能的VB程序如下，请在划线处填入合适的代码。

   Private Sub Command1_Click()

       Dim n As Integer, p As Long, s As Double, i As Integer, t As Integer

       s = 0

    t = 1

    p = 0

    n = Val(Text1.Text)

    For i = 1 To n

    

      s = s + t * 1 / p

    

    Next i

    Label1.Caption = Str(s)

   End Sub

5. （3） 运行该程序，在文本框Text1中输入5，单击“计算”按钮，则表达式的值是。