回 帖 发 新 帖 刷新版面

主题:帮我讲解一下

帮我讲解一下
Dim temp, strTemp As String
        Dim x, i As Integer
        For x = 5 To 1 Step -1
            temp = ""
            For i = 1 To x
                temp = temp & i
            Next
            strTemp = strTemp & temp & vbCrLf
        Next
        textbox1.Text = strTemp

谢谢

回复列表 (共11个回复)

沙发

1、Dim temp, strTemp As String
   前者被声明为变体类型,而不是字符串类型

板凳

2、Next
   为什么不用自变量?为了让大家看不清楚?

3 楼

3、textbox1.Text = strTemp
   要你的textbox1的多行数型设置为真才可以支持!

4 楼


帮我详细讲一下
我是个初学者

5 楼

4、你应该把你的问题说出来,不要光列举代码,让人来猜测你的意图。

6 楼


Dim x, i As Integer
        For x = 5 To 1 Step -1
            temp = ""
            For i = 1 To x
                temp = temp & i

我有点看不明白,我这道用的是for...next循环语句
我不知道怎摸表达出来

7 楼

你要表达什么?
你应该说,你想用
…………
………………
……(代码)
来达到
…………
的目的。
但却得到了
…………
样的结果。

a.你想知道为什么
b.你想知道怎么才能达到目的

8 楼

我在vb的最后结果是
12345
1234
123
12
1
我想解释出通过这语句Dim x, i As Integer
        For x = 5 To 1 Step -1
            temp = ""
            For i = 1 To x
                temp = temp & i
怎磨得最后结果

9 楼

For x = 5 To 1 Step -1
是说得是从5开始直到1结束,每次循环-1
这句是说得行
对吗?

10 楼

temp = ""
            For i = 1 To x
                temp = temp & i
这句什磨意思

我来回复

您尚未登录,请登录后再回复。点此登录或注册