 加好友  发短信
等级：九尾狐
帖子：2927
积分：20167
威望：0
精华：0
注册：2012/2/3 17:45:00
|
代码有误  Post By：2015/5/22 10:25:00 [只看该作者]
老师， 下列代码写的有问题，麻烦老师给看下，那里有误
| Dim Values() As
String |
| Dim Values2() As String |
| For Each dr As DataRow In
DataTables("角色").DataRows |
|
Values=dr("角色").split("\") |
|
For Index As Integer = 0 To Values.Length - 1 |
|
If Values2.Contains(Values)=False Then |
| Values2.Insert(0,Values) |
|
Else |
|
Values2.Replace(Values,"") |
|
End If |
|
Next |
| Next |
|
|
