题目
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 + "+" ”这句的意思和作用是什么?
其中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 + "+" ”这句的意思和作用是什么?
提问时间:2021-03-20
答案
当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+
如果有这句,比如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+
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
最新试题
- 1描写雪的作文400字
- 2This email message,including any attachments,is for the sole use of the intended recipient(s) and
- 3明月何时照我还的上一句是
- 4根据例句,在横线上接写句子:理想是进步的目标,信心是------,勇气是------,智慧是------
- 5一克等于多少克拉?等于多少盎司?
- 6谁是第一个登上月球的人,他是哪国人,他什么时候登上月球的
- 7已知动点M到点F(负根号二,0)的距离与到直线X=负二分之根号二的距离之比为根号二,求动点M的轨迹方程
- 8一个水池,底部装有一个常开的排水管,上部装有若干个粗细相同的进水管,当打开4个进水管时,需要5小时注满水池;当打开2个进水管时,需要15个小时才能注满水池,现需要在2小时内将
- 9有若干个连环画分给甲、乙、两组的学生,平均每人可分 ( )本 .会几题?
- 10c语言编程 数据统计 任意输入n个整数,分别统计奇数的和、奇数的个数、偶数的和、偶数的个数.
热门考点