Dim sq() As String ={“社区名1","社区名2","社区名3","社区名4","社区名5","社区名6","社区名7","社区名8","社区名9"}For i As Integer=0 To 9sheet(i+2,1).value = sq(i)Next
怎么写这段代码才能正确执行,请老师们指导,谢谢!