查人人中国名人网脐带血sd值正常范围:救命拉 关于vb
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/20 20:19:50
利用两重循环显示
1
-1 -12
1 12 123
-1 -12 -123 -1234
1 12 123 1234 12345
-1 -12 -123 -1234 -12345 -123456
要连接成1-5为数字程序如下
s=0
for j=1 to 5
s=s*10+j
print s
next j
1
-1 -12
1 12 123
-1 -12 -123 -1234
1 12 123 1234 12345
-1 -12 -123 -1234 -12345 -123456
要连接成1-5为数字程序如下
s=0
for j=1 to 5
s=s*10+j
print s
next j
你试一下这个程序吧。为了验证，请在“print”前加上“Debug”，即把下面的打印输入语句换成“Debug.print”在VB中实验。(以下程序在VB6中调试通过)
Dim i As Integer, j As Integer, s As Long
For i = 1 To 6
s = 0
For j = 1 To i
s = s * 10 + j
Print (-1) ^ (i - 1) * s,
Next j
Print
Next i