解析"\“(反斜杠)并将域名转换为大写

Question

我想要这样的东西：

domainB\bsmith
domainA\djones

并将其转换为如下所示：

DOMAINA\bsmith
DOMAINB\djones

这是我到目前为止所拥有的代码：

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

我希望这篇文章更容易阅读和理解。有没有更好、更可持续的方法来完成这项任务？

Answer 1

使用String.Split并重新组合：

Dim parts() As String = arrUsers(I).Split("\"C)
arrUsers(I) = parts(0).ToUpper() + "\" + parts(1)