[填空题] 以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”，直至“1/(2n+1)”小于10-4。阅读下面程序，请在和处填上正确内容。Private Sub Command1

[填空题] 以下程序用于计算“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

[6]n+2[7]exit do

该累加问题没有给出需要累加的数据项的数目，不能用for循环。do... Loop为无条件循环，在do循环中由累加项term的值作为退出循环的条件。