在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Privme Sub Command1_Click( )n=5f=1s=0For i=1 To nf=f【 】s=s+fNextPrint sEnd Sub该事件过程的功能是计算的值。请填空。

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

Privme Sub Command1_Click( )

n=5

f=1

s=0

For i=1 To n

f=f【 】

s=s+f

Next

Print s

End Sub

该事件过程的功能是计算

的值。请填空。


暂无答案

相关考题:

在窗体上画一个名称为 \Command1\ 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As StringA="123456789"For i=1 To 5Print Space(6-i);Mid $ (a,______ ,2*i-1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

布窗体上画一个名称为Command l的命令按钮,然后编写如下事件过程:Private Sub Command l-Click ()n=5f=ls=oFor I =l To nf=f【 】s= s +fNextPrint sEnd Sub该事件过程的功能是计算s=1+1/2!+l+3!+…+l/ n!的值。请填空。

( 8 )在窗体上画一个名称为 “ Command1 ” 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As Stringa = "123456789"For i = 1 To 5Print Space(6 - i); Mid$(a, 【 8 】 , 2 * i - 1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

(7)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下事件过程:Private Sub Command1_Click( )a$="National Computer Rank Examination"n=Len(a$)s=0For i=1 To nb$=Mid(a$, i, 1)If b$="n" Thens=s+1End IfNext iPrint sEnd Sub程序运行后,单击命令按钮,输出结果是 【7】 。

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Privfite Sub Command1_Click()n=5f=1s=0For i=1 To nf=f 【 】s=s+fNextPtint SEnd Sub该事件过程的功能是计算s=1+2!+1/3!+...+1/n!的值。请填空。

在窗体上画一个名称为Com1的命令按钮,然后编写如下事件过程:Private Sub Com1_Click()n=10q=1sum=0For i=1 To nNextPrint sumEnd Sub该事件过程的功能是计算s=1+1/2!+1/3!+…+1/n!的值。请填空。

在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i)A.11B.10C.9D.8

在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是A. 11B.10C.9D.8

在窗体上画一个名称为Coml的命令按钮,然后编写如下事件过程:该事件过程的功能是计算s=l 1/2! 1/3 1 … 1/n!的值。请填空。