以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”，直至“1/(2n+1)
题型：填空题
问题：
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”，直至“1/(2n+1)”小于10-4。阅读下面程序，请在【6】和【7】处填上正确内容。
Private Sub Command1_Click()
Sum = h: n = i
do
n= 【6】
term =1/ n
Sum = Sum + term
if term ＜0.0001 then 【7】
Loop
Text1.Text = n
Text2 *Text = Sum
End Sub