tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル テキストボックスの全角カナの複数文字を半角にしたい
投稿日: 2018/03/10(Sat) 12:28
投稿者かっちゃん
いつもこのサイトを参考にして助かっております
ありがとうございます。

テキストボックスの入力に関する質問です。
よろしくお願いいたします。

Microsoft Visual studio 2010を使用しております。
vb.netのテキストボックスの入力で全角カナで入力した時、Enterキーで
半角に変換して表示したいのですが、入力文字が反対になってしまいます。
入力順に表示したいのですがどのように表示したらよいでしょうか?

例:
  txtBox のテキストで "アイウエオ" 入力して Enterキーを押す

    Private Sub txtBox_TextChanged(ByVal Sender As System.Object, ByVal e As System.EventArgs) Handles txtBox.TextChanged
          ' 入力データを半角文字に変換
            Call ModDataChange(txtBox)
  End Sub

    Public Sub ModDataChange(ByRef txt As System.Windows.Forms.TextBox)
        Dim wkstrText As String
        ' 入力データを半角文字に変換
        wkstrText = StrConv(txt.Text, VbStrConv.Narrow)
        txt.Text = wkstrText
    End Sub

    Enterキー後に表示されるtxtBox のテキスト内容は "オエウイア"
    半角で表示されます。

  1文字ごとにEnterキーを押せば、順番に並びますが、
  連続で入れて Enterキーをおしても "アイウエオ" と半角にしたいのですが
  どのようにすればよいでしょうか

  よろしくお願いいたします。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。