英字を大文字や小文字に変換する 【注意書き】●VB.NET を使っているものとします。●動作環境は、Windows XX を使用しているとします。.NET でも、英字を大文字や小文字に変換させることが可能です。この機能を使えば、簡単に、メールアドレスなど大文字と小文字の区別がない文字情報をユニークに取り扱いたい場合など大変便利です。フォームに次の様なコードを記述します-----------VB.NETコーディングここから-------------------１．フォームに、テキストボックスコントロール、 ボタンコントロール を配置します。 下記は、デフォルトのオブジェクトの名前と配置を示しています。 ┏━━━━━━━━━━━┓ ┃TextBox1 ┃ ┗━━━━━━━━━━━┛ ┏━━━━┓┏━━━━┓┏━━━━┓ ┃Button1 ┃┃Button2 ┃┃Button3 ┃ ┗━━━━┛┗━━━━┛┗━━━━┛２．ボタンコントロールの Button1 text プロパティに「大文字」と記述します。 Button1 text プロパティに「小文字」と記述します。 Button1 text プロパティに「タイトル」と記述します。 ※説明用のためです。必須ではありません。 ┏━━━━━━━━━━━┓ ┃TextBox1 ┃ ┗━━━━━━━━━━━┛ ┏━━━━┓┏━━━━┓┏━━━━┓ ┃大文字 ┃┃小文字 ┃┃タイトル┃ ┗━━━━┛┗━━━━┛┗━━━━┛３．ボタンコントロールをダブルクリックして、 ボタンのクリックイベントの編集を開始して、 フォームの宣言部に、次のコードを記述します。 ※フォームクラス定義(Public Class Form1)より、 上に記述してください。 'インポート Imports System.Globalization さらに、次のコードを記述します。 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Dim cultInfo As CultureInfo Dim txtInfo As TextInfo cultInfo = cultInfo.CurrentCulture txtInfo = cultInfo.TextInfo '大文字に変換する(テキストインフォの場合) TextBox1.Text = txtInfo.ToUpper(TextBox1.Text) '大文字に変換する(Stringオブジェクトの場合） 'TextBox1.Text = TextBox1.Text.ToString.ToUpper End Sub Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click Dim cultInfo As CultureInfo Dim txtInfo As TextInfo cultInfo = cultInfo.CurrentCulture txtInfo = cultInfo.TextInfo '小文字に変換する(テキストインフォの場合) TextBox1.Text = txtInfo.ToLower(TextBox1.Text) '小文字に変換する(Stringオブジェクトの場合） 'TextBox1.Text = TextBox1.Text.ToString.ToLower End Sub Private Sub Button3_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button3.Click Dim cultInfo As CultureInfo Dim txtInfo As TextInfo cultInfo = cultInfo.CurrentCulture txtInfo = cultInfo.TextInfo '一旦小文字に変換 TextBox1.Text = txtInfo.ToLower(TextBox1.Text) 'タイトル文字に変換する(テキストインフォの場合) TextBox1.Text = txtInfo.ToTitleCase(TextBox1.Text) End Sub４．ビルドして実行します。５．フォームに表示された テキストボックスに半角英字で 「 TextBox1 」と入力します。６．フォームに表示された ボタン「大文字」を押します。７．テキストボックス(TextBox1)に 「 TEXTBOX1 」と表示されます８．フォームに表示された ボタン「小文字」を押します。９．テキストボックス(TextBox1)に 「 textbox1 」と表示されます１０．フォームに表示された ボタン「タイトル」を押します。１１．テキストボックス(TextBox1)に 「 Textbox1 」と表示されます-----------VB.NETコーディングここまで-------------------TextInfo クラス（System.Globalization名前空間）を使用して、カルチャ情報を通じて、文字変換を行っています。また、本サンプルでは使用しておりませんが、Stringオブジェクト '大文字に変換する(Stringオブジェクトの場合） 'TextBox1.Text = TextBox1.Text.ToString.ToUpper '小文字に変換する(Stringオブジェクトの場合） 'TextBox1.Text = TextBox1.Text.ToString.ToLowerのコードでも 大文字小文字の変換は可能です。
Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。
