A.Private B.Sub C.Commandl D.Click () E.Dim sum F.As G.Double, x H.As I.Doublesum = 0n = 0 J.For i=l K.To 5x = n / in = n + 1sum 二 sum + x L.Next i M.End N.Sub该程序通过 O.For 循环来计算一个表达式的值,这个表达式是 P.A ) 1+1/2+2/3+3/4+4/5 Q.B ) 1+1/2+1/3+1/4+1/5 R.C ) 1/2+2/3+3/4+4/5 S.D ) 1/2+1/3+1/4+1/5