1

我想采取这样的措施:

domainB\bsmith
domainA\djones

并将其转换为如下内容:

DOMAINA\bsmith
DOMAINB\djones

这是我到目前为止的代码:

 arrUsers(I) = arrUsers(I).Substring(0, arrUsers(I).IndexOf("\")).ToUpper + arrUsers(I).Substring(arrUsers(I).IndexOf("\"))

我希望这更容易阅读和理解。有没有更好更可持续的方式来完成这项任务?

4

1 回答 1

2

使用String.Split和重组:

Dim parts() As String = arrUsers(I).Split("\"C)
arrUsers(I) = parts(0).ToUpper() + "\" + parts(1)
于 2013-03-14T15:32:04.877 回答