[填空题] 下列过程的功能是用来计算并输出S=1+1/2+1/3+……+1/100的值，请完善程序。 Function SumF(n As Integer)As Single s = 0 Fo

[填空题] 下列过程的功能是用来计算并输出S=1+1/2+1/3+……+1/100的值，请完善程序。 Function SumF(n As Integer)As Single s = 0 For i=1 To ns= 【12】 Next i SumF=s End Function Private Sub Form_Click() Sum1=SumF(100) Print Print"sum1="； sum1 End Sub