-1

Textbox1 に「lastname-132」という AD ユーザー名があります。この文字列は 12 の長さなので、ユーザー名を Textbox2 に追加したいのですが、短縮されています。textbox2 では、文字列の長さが 10 しかありません。このプログラムが使用しているツールなので、常に手動で変換するのではなく、onleave イベントで自動的に変換したいだけです。

これを書く方法を知っている人はいますか？

したがって、最終結果は次のようになります。

'String length can be 20 max.
Textbox1.Text = "lastname-123"
'some code to convert it to this:
'String length 10 max. Numbers and the "-" should stay the same, but remove letters if necessary.
Textbox2.Text = "lastna-123"
4

4 に答える 4

0

受け入れられる文字の長さの制限のみに集中している場合は、次を使用できます

最大長

テキストボックスのプロパティ。

例: Maxlength="10"

Textbox が 10 文字のみを受け入れるように制限します。

于 2013-06-27T14:49:51.317 に答える
0

これ以上の情報がなければ、複数のハイフンが存在する可能性があり、数字は可変長であり、1 つの変数を変更することで文字列の最大長を変更できると仮定します。

Dim username As String = "lastname-123"
Dim max As Integer = 10

Dim lindex As Integer = username.LastIndexOf("-")
Dim numberLength As Integer = username.Length - lindex
Dim number As String = username.Substring(lindex)
Dim justName As String = username.Substring(0, lindex)

If justName.Length + numberLength >= max Then
    username = justName.Substring(0, max - numberLength) & number
End If
于 2013-06-27T14:51:39.840 に答える