当i不等于n的时候在s字符串最后加上一个“+”号,当输出最后一个字符串,比如22222时候i=5,n=5,这个时候不要再s最后加上“+”号
如果有这句,比如a=2,n=5时候输出是这样的:
当a=2时,n=5时,S=2+22+222+2222+22222
如果没有这句If i n Then s = s + "+" 那么输出是这样的:
当a=2时,n=5时,S=222222222222222
或者没有判断语句,只有s=s + "+" 那么输出是这样的:
当a=2时,n=5时,S=2+22+222+2222+22222+
VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),
VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),
其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例如,当a=2,n=5时,Sn=2+22+222+2222+22222
表达式:
Private Sub Command1_Click()
Dim a As Integer
Dim n As Integer
Dim s As String
Randomize
a = Int(Rnd() * 9) + 1
n = Int(Rnd() * 6) + 4
For i = 1 To n
s = s + String(i, CStr(a))
If in Then s = s + "+"
Next
Print "当a=" & a & "时,n=" & n & "时, S=" & s
End Sub
问题:表达式中“ If in Then s = s + "+" ”这句的意思和作用是什么?
其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例如,当a=2,n=5时,Sn=2+22+222+2222+22222
表达式:
Private Sub Command1_Click()
Dim a As Integer
Dim n As Integer
Dim s As String
Randomize
a = Int(Rnd() * 9) + 1
n = Int(Rnd() * 6) + 4
For i = 1 To n
s = s + String(i, CStr(a))
If in Then s = s + "+"
Next
Print "当a=" & a & "时,n=" & n & "时, S=" & s
End Sub
问题:表达式中“ If in Then s = s + "+" ”这句的意思和作用是什么?
数学人气:583 ℃时间:2020-09-19 20:45:00
优质解答
我来回答
类似推荐
猜你喜欢
- 1这是李老师.他是个英语老师.英文句子怎么写
- 2有一题Who is Mr Brown?He is ( ) father 括号中 中文汤姆和吉姆的 那个s 是都加,还是一个?
- 3物理题.某希望学校原来每个班按有4盏60w的白炽灯,一个爱心人士捐献了与它亮度一样,功率只有10w的节能灯
- 4已知sinx+cosx=1/5,x属于(0,π),求sin2x的值
- 5请分析这句英语的句子成份,说明是什么从句,主语什么的.
- 6用优美的语言描写雨中荷花
- 71与4/5的差除以2/5与3/5的和,商是多少?
- 8怎么样才能审好一道政治材料题,怎么分析材料到底讲的是什么?
- 9设f(x)= ∫0-x e^(-y+2y)dy 求∫0-1 [(1-x)^2]f(x)dx
- 10请翻译:Men aboard them watched the skies