VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/28 03:17:53
VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例
xSnA~  F&MFQSoVnhW[RBR[M"wa<;V&nv7s||t?I/:Ee*8;ֵ]!TCj"-uMU//ڤk^M7'4YJ=we ā]18T*x*zN8HFFr/El'gqH{U{xey؝Vb;q驘YF"}/X`75MDx.,l*I"i;%4@Nf&i2ӭhI`v(LA%f]t8F.S yƖicg8l Bˎ! #f"(d!2v>P \iWQϭJ8ڀB*ezIo0`s)UM{l$][2zsD jU&BokTUȫҵ,#d$wh謒MV@y`c ,M2 0%qacnBa#:ЭC͈|8U-O6^b~4n()^@rS[:}.9&bFY

VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例
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 i n Then s = s + "+"
Next
Print "当a=" & a & "时,n=" & n & "时, S=" & s
End Sub
问题:表达式中“ If i n Then s = s + "+" ”这句的意思和作用是什么?

VB求助:求Sn=a+aa+aaa+aaaa+…+aa…aaa(n个a),其中a是一个由随机数产生的1~9(包括1、9)中的一个正整数,n是一个由随机数产生的4~9(包括4、9)中的一个正整数,产生随机数需使用Randomize语句.例
当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+