[已解决]vba第5集这段代码运行无结果？求老师讲解

rglxjrglxj

  Sub t2()
     Dim st As String
     Dim X As Integer
     For X = 1 To 10
      st = st & "Excel精英培训"
     Next X
    End Sub

最佳答案

月排行榜 / 总排行榜

qh8600

2015-1-1 11:39

代码没有问题啊，看本地窗口，st变量的值，可以把这个变量写入单元格或者用msgbox函数对话框提示

Sub t2()
     Dim st As String
     Dim X As Integer
     For X = 1 To 10
      st = st & "Excel精英培训"
     Next X
     msgbox st
     range("a1")=st
    End Sub

代码运行后，变量的值是变化的，这个变量接下去的用处，楼主自己定

跳转到最佳答案楼层

qh8600

代码没有问题啊，看本地窗口，st变量的值，可以把这个变量写入单元格或者用msgbox函数对话框提示

Sub t2()
     Dim st As String
     Dim X As Integer
     For X = 1 To 10
      st = st & "Excel精英培训"
     Next X
     msgbox st
     range("a1")=st
    End Sub

代码运行后，变量的值是变化的，这个变量接下去的用处，楼主自己定