vb.net - vb.net での高度なテキスト ボックスのマージ

Question

このようなテキストボックスをマージする方法はありますか:

textbox1 : O N E
textbox2 : T W O

したがって、マージすると次のようになります。

OTNWEO

Answer 1

テキストボックスのテキストのループを作成する必要があります..

Function MyMerge(byval string1 as string, byval string2 as string) as string
Dim x as Integer iif(string1.Length >= String2.Length, String2.Length, String1.Length )
For i as Integer = 1 to x
  MyMerge &= iif(string1.length >= x, string1.substring(i-1,1),"") 
  MyMerge &= iif(string2.length >= x, string2.substring(i-1,1),"")
Next

End Function 

したがって、これを次の方法で使用できます。

Msgbox(MyMerge(TextBox1.Text, TextBox2.Text))