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 + "+" ”这句的意思和作用是什么?
人气:374 ℃ 时间:2020-09-19 20:45:00
解答
当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+
推荐
- 求Sn=a+aa+aaa+aaaa+aaaaaa……a的和
- 编写VB程序,求Sn=a+aa+aaa+…(n个a)的值,其中n是表示a的个数,a是【1,9】之间的随机正整数
- 求Sn=a+aa+aaa+aaaa……,其中a是一个数字,n由键盘输入.
- 求Sn=a+aa+aaa+aaaa+.
- 求Sn = a+aa+aaa+aaaa+…+aa…a的值(最后一项共有n个a),其中a为[0,9]内的一位数,a和n由键盘输入(如,a=8,n=4时,Sn=8+88+888+8888).
- 如果 3 *7=25 ,则该数为几进制 是怎么算的
- 松树的叶子是什么形状的?
- 将固体NH4I置于密闭容器中,在一定温度下发生下列反应,
猜你喜欢