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 に答える