VB中语法错误,请高手指点(急)

来源：百度知道 编辑：UC知道 时间：2024/05/28 18:46:59
对一个字符数组进行赋值,却老是出现语法错误或缺少AS
Dim name(0 To 100) As String
Dim i As Integer, j As Integer
j = 0

For i = 0 To (i + 5) <= Len(Trim(stringvar3)) Step 1

name(i) = Trim(Mid(stringvar3, i, 5)) '出错点

Next
改了变量名,错误到是没了,可是数组依旧赋不了值,该怎么改啊?

'我明白你的意思了,这个程序应该这样写:
Dim stringvar3 As String
stringvar3="abcdefghijk" '假设值为这个

Dim name(0 To 100) As String
Dim i As Integer

For i = 0 To Len(Trim(stringvar3))-5 Step 1

name(i) = Trim(Mid(stringvar3, i+1, 5)) '出错点(从第一个字符算起,不能从零)

Next

'结果:name(0)=abcde name(1)=bcdef name(2)=cdefg name(3)=defgh name(4)=efghi name(5)=fghij name(6)=ghijk
'是不是这样?

For i = 0 To (i + 5) <= Len(Trim(stringvar3)) Step 1
这句话里to后面应该是一个值，你怎么采用了一个比较表达式呢？

name不能做变量名