Private Sub Command1_Click() Dim i As Integer,s As Integer,n
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/04 05:55:24
Private Sub Command1_Click() Dim i As Integer,s As Integer,n As Integer
Private Sub Command1_Click()
Dim i As Integer,s As Integer,n As Integer
n = Val(Text1.Text)
s = o
For i = 1 To n
s = s + i \ 4
Next i
Label1.Caption = Str(s)
End Sub
Text1中输入8单击command1 label上显示什么?
Private Sub Command1_Click()
Dim i As Integer,s As Integer,n As Integer
n = Val(Text1.Text)
s = o
For i = 1 To n
s = s + i \ 4
Next i
Label1.Caption = Str(s)
End Sub
Text1中输入8单击command1 label上显示什么?
i=1 s=s+i\4=0+1\4=0+0=0
i=2 s=s+i\4=0+2\4=0+0=0
i=3 s=s+i\4=0+3\4=0+0=0
i=4 s=s+i\4=0+4\4=0+1=1
i=5 s=s+i\4=1+5\4=1+1=2
i=6 s=s+i\4=2+6\4=2+1=3
i=7 s=s+i\4=3+7\4=3+1=4
i=8 s=s+i\4=4+8\4=4+2=6
所以Label1上显示的是 6
i=2 s=s+i\4=0+2\4=0+0=0
i=3 s=s+i\4=0+3\4=0+0=0
i=4 s=s+i\4=0+4\4=0+1=1
i=5 s=s+i\4=1+5\4=1+1=2
i=6 s=s+i\4=2+6\4=2+1=3
i=7 s=s+i\4=3+7\4=3+1=4
i=8 s=s+i\4=4+8\4=4+2=6
所以Label1上显示的是 6
Private Sub Command1_Click() Dim i As Integer,s As Integer,n
b求π为啥是错的Private Sub Command1_Click()Dim s As Integer,n As Do
Private Sub Command1_Click() Dim i,j As Integer For i = 3 To
9^n+2是不是质数vb编程如下Private Sub Command1_Click()Dim a As Integer
帮忙VB试题我怎么想都算不对Private Sub Command1_Click()Dim a As Integer,b
Private Sub Form_Click() Dim a As Integer,b As Integer,k As
英语翻译Private Sub Form_Click()Dim a(1 To 10) As Integer,i%,max
Dim ia(1 To 10) As Integer,imin As Integer,n As Integer,i As
Dim a(9) As Integer,x As Integer,k As Integer,I As Integer R
下列代码的意思Sub Saveas()Dim Mrow%,I%,n%Dim Y As Integer'Arr = [a2
Private Sub Command1_Click() Dim i As Double,M As Double,L A
vb求n阶乘表达式Private Sub Command1_Click()Dim n As Integern = Inp