方法 : MaskedTextBox コントロールにデータをバインドする

[アーティクル]
09/17/2008

更新 : 2007 年 11 月

他の Windows フォームコントロールと同様に、MaskedTextBox コントロールにデータをバインドできます。ただし、データベース内のデータの形式がマスクで定義された形式と一致しない場合は、データの形式を設定し直す必要があります。次の手順は、Binding クラスの Format イベントと Parse イベントを使用してこれを行い、別々の電話番号データベースフィールドと内線番号データベースフィールドを 1 つの編集可能フィールドとして表示する方法を示しています。

次の手順を行うには、Northwind サンプルデータベースをインストールした SQL Server データベースへのアクセスが必要です。

MaskedTextBox コントロールにデータをバインドするには

新しい Windows フォームプロジェクトを作成します。
2 つの TextBox コントロールをフォームにドラッグし、それぞれを FirstName と LastName と名付けます。
MaskedTextBox コントロールをフォームにドラッグし、PhoneMask と名付けます。
PhoneMask の Mask プロパティを (000) 000-0000 x9999 に設定します。
次の名前空間のインポートをフォームに追加します。
```
using System.Data.SqlClient;
```
```
Imports System.Data.SqlClient
```

フォームを右クリックし、[コードの表示] をクリックします。このコードをフォームクラスのどこかに配置します。

Binding currentBinding, phoneBinding;
DataSet employeesTable = new DataSet();
SqlConnection sc;
SqlDataAdapter dataConnect;

private void Form1_Load(object sender, EventArgs e)
{
    DoMaskBinding();
}

private void DoMaskBinding()
{
    try
    {
        sc = new SqlConnection("Data Source=CLIENTUE;Initial Catalog=NORTHWIND;Integrated Security=SSPI");
        sc.Open();
    }
    catch (Exception ex)
    {
        MessageBox.Show(ex.Message);
        return;
    }

    dataConnect = new SqlDataAdapter("SELECT * FROM Employees", sc);
    dataConnect.Fill(employeesTable, "Employees");

    // Now bind MaskedTextBox to appropriate field. Note that we must create the Binding objects
    // before adding them to the control - otherwise, we won't get a Format event on the 
    // initial load. 
    try
    {
        currentBinding = new Binding("Text", employeesTable, "Employees.FirstName");
        firstName.DataBindings.Add(currentBinding);

        currentBinding = new Binding("Text", employeesTable, "Employees.LastName");
        lastName.DataBindings.Add(currentBinding);

        phoneBinding =new Binding("Text", employeesTable, "Employees.HomePhone");
        // We must add the event handlers before we bind, or the Format event will not get called
        // for the first record.
        phoneBinding.Format += new ConvertEventHandler(phoneBinding_Format);
        phoneBinding.Parse += new ConvertEventHandler(phoneBinding_Parse);
        phoneMask.DataBindings.Add(phoneBinding);
    }
    catch (Exception ex)
    {
        MessageBox.Show(ex.Message);
        return;
    }
}

Dim WithEvents CurrentBinding, PhoneBinding As Binding
Dim EmployeesTable As New DataSet()
Dim sc As SqlConnection
Dim DataConnect As SqlDataAdapter

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    DoMaskedBinding()
End Sub

Private Sub DoMaskedBinding()
    Try
        sc = New SqlConnection("Data Source=SERVERNAME;Initial Catalog=NORTHWIND;Integrated Security=SSPI")
        sc.Open()
    Catch ex As Exception
        MessageBox.Show(ex.Message)
        Exit Sub
    End Try

    DataConnect = New SqlDataAdapter("SELECT * FROM Employees", sc)
    DataConnect.Fill(EmployeesTable, "Employees")

    ' Now bind MaskedTextBox to appropriate field. Note that we must create the Binding objects
    ' before adding them to the control - otherwise, we won't get a Format event on the 
    ' initial load.
    Try
        CurrentBinding = New Binding("Text", EmployeesTable, "Employees.FirstName")
        firstName.DataBindings.Add(CurrentBinding)
        CurrentBinding = New Binding("Text", EmployeesTable, "Employees.LastName")
        lastName.DataBindings.Add(CurrentBinding)
        PhoneBinding = New Binding("Text", EmployeesTable, "Employees.HomePhone")
        PhoneMask.DataBindings.Add(PhoneBinding)
    Catch ex As Exception
        MessageBox.Show(ex.Message)
        Application.Exit()
    End Try
End Sub

Format イベントと Parse イベントのイベントハンドラを追加します。これらのイベントハンドラで、バインドされている DataSet の PhoneNumber フィールドと Extension フィールドを組み合わせて区切り文字を挿入します。

private void phoneBinding_Format(Object sender, ConvertEventArgs e)
{
    String ext;

    DataRowView currentRow = (DataRowView)BindingContext[employeesTable, "Employees"].Current;
    if (currentRow["Extension"] == null) 
    {
        ext = "";
    } else 
    {
        ext = currentRow["Extension"].ToString();
    }

    e.Value = e.Value.ToString().Trim() + " x" + ext;
}

private void phoneBinding_Parse(Object sender, ConvertEventArgs e)
{
    String phoneNumberAndExt = e.Value.ToString();

    int extIndex = phoneNumberAndExt.IndexOf("x");
    String ext = phoneNumberAndExt.Substring(extIndex).Trim();
    String phoneNumber = phoneNumberAndExt.Substring(0, extIndex).Trim();

    //Get the current binding object, and set the new extension manually. 
    DataRowView currentRow = (DataRowView)BindingContext[employeesTable, "Employees"].Current;
    // Remove the "x" from the extension.
    currentRow["Extension"] = ext.Substring(1);

    //Return the phone number.
    e.Value = phoneNumber;
}

Private Sub PhoneBinding_Format(ByVal sender As Object, ByVal e As ConvertEventArgs) Handles PhoneBinding.Format
    Dim Ext As String

    Dim CurrentRow As DataRowView = CType(Me.BindingContext(EmployeesTable, "Employees").Current, DataRowView)
    If (CurrentRow("Extension") Is Nothing) Then
        Ext = ""
    Else
        Ext = CurrentRow("Extension").ToString()
    End If

    e.Value = e.Value.ToString().Trim() & " x" & Ext
End Sub

Private Sub PhoneBinding_Parse(ByVal sender As Object, ByVal e As ConvertEventArgs) Handles PhoneBinding.Parse
    Dim PhoneNumberAndExt As String = e.Value.ToString()

    Dim ExtIndex As Integer = PhoneNumberAndExt.IndexOf("x")
    Dim Ext As String = PhoneNumberAndExt.Substring(ExtIndex).Trim()
    Dim PhoneNumber As String = PhoneNumberAndExt.Substring(0, ExtIndex).Trim()

    ' Get the current binding object, and set the new extension manually. 
    Dim CurrentRow As DataRowView = CType(Me.BindingContext(EmployeesTable, "Employees").Current, DataRowView)
    ' Remove the "x" from the extension.
    CurrentRow("Extension") = CObj(Ext.Substring(1))

    ' Return the phone number.
    e.Value = PhoneNumber
End Sub

2 つの Button コントロールをフォームに追加します。それぞれに previousButton と nextButton という名前を付けます。各ボタンをダブルクリックして Click イベントハンドラを追加し、次のコード例に示すようにイベントハンドラの内容を記述します。

private void previousButton_Click(object sender, EventArgs e)
{
    BindingContext[employeesTable, "Employees"].Position = BindingContext[employeesTable, "Employees"].Position - 1;
}

private void nextButton_Click(object sender, EventArgs e)
{
    BindingContext[employeesTable, "Employees"].Position = BindingContext[employeesTable, "Employees"].Position + 1;
}

Private Sub PreviousButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PreviousButton.Click
    Me.BindingContext(EmployeesTable, "Employees").Position = Me.BindingContext(EmployeesTable, "Employees").Position - 1
End Sub

Private Sub NextButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NextButton.Click
    Me.BindingContext(EmployeesTable, "Employees").Position = Me.BindingContext(EmployeesTable, "Employees").Position + 1
End Sub

サンプルを実行します。データを編集し、[Previous] ボタンと [Next] ボタンを使用して、データが DataSet と正しく連動していることを確認します。

使用例

次のコード例は、前述の手順をすべて行った後の完全なコードリストです。

Imports System.Data.SqlClient

Public Class Form1
    Dim WithEvents CurrentBinding, PhoneBinding As Binding
    Dim EmployeesTable As New DataSet()
    Dim sc As SqlConnection
    Dim DataConnect As SqlDataAdapter

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DoMaskedBinding()
    End Sub

    Private Sub DoMaskedBinding()
        Try
            sc = New SqlConnection("Data Source=localhost;Initial Catalog=NORTHWIND;Integrated Security=SSPI")
            sc.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
            Application.Exit()
        End Try

        DataConnect = New SqlDataAdapter("SELECT * FROM Employees", sc)
        DataConnect.Fill(EmployeesTable, "Employees")

        ' Now bind MaskedTextBox to appropriate field. Note that we must create the Binding objects
        ' before adding them to the control - otherwise, we won't get a Format event on the 
        ' initial load. 
        Try
            CurrentBinding = New Binding("Text", EmployeesTable, "Employees.FirstName")
            firstName.DataBindings.Add(CurrentBinding)
            CurrentBinding = New Binding("Text", EmployeesTable, "Employees.LastName")
            lastName.DataBindings.Add(CurrentBinding)
            PhoneBinding = New Binding("Text", EmployeesTable, "Employees.HomePhone")
            PhoneMask.DataBindings.Add(PhoneBinding)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
            Application.Exit()
        End Try
    End Sub

    Private Sub PhoneBinding_Format(ByVal sender As Object, ByVal e As ConvertEventArgs) Handles PhoneBinding.Format
        Dim Ext As String

        Dim CurrentRow As DataRowView = CType(Me.BindingContext(EmployeesTable, "Employees").Current, DataRowView)
        If (CurrentRow("Extension") Is Nothing) Then
            Ext = ""
        Else
            Ext = CurrentRow("Extension").ToString()
        End If

        e.Value = e.Value.ToString().Trim() & " x" & Ext
    End Sub

    Private Sub PhoneBinding_Parse(ByVal sender As Object, ByVal e As ConvertEventArgs) Handles PhoneBinding.Parse
        Dim PhoneNumberAndExt As String = e.Value.ToString()

        Dim ExtIndex As Integer = PhoneNumberAndExt.IndexOf("x")
        Dim Ext As String = PhoneNumberAndExt.Substring(ExtIndex).Trim()
        Dim PhoneNumber As String = PhoneNumberAndExt.Substring(0, ExtIndex).Trim()

        ' Get the current binding object, and set the new extension manually. 
        Dim CurrentRow As DataRowView = CType(Me.BindingContext(EmployeesTable, "Employees").Current, DataRowView)
        ' Remove the "x" from the extension.
        CurrentRow("Extension") = CObj(Ext.Substring(1))

        ' Return the phone number.
        e.Value = PhoneNumber
    End Sub

    Private Sub NextButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NextButton.Click
        Me.BindingContext(EmployeesTable, "Employees").Position = Me.BindingContext(EmployeesTable, "Employees").Position + 1
    End Sub

    Private Sub PreviousButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PreviousButton.Click
        Me.BindingContext(EmployeesTable, "Employees").Position = Me.BindingContext(EmployeesTable, "Employees").Position - 1
    End Sub
End Class

#region Using directives

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Windows.Forms;
using System.Data.SqlClient;

#endregion

namespace MaskedTextBoxDataCSharp
{
    partial class Form1 : Form
    {
        Binding currentBinding, phoneBinding;
        DataSet employeesTable = new DataSet();
        SqlConnection sc;
        SqlDataAdapter dataConnect;

        public Form1()
        {
            InitializeComponent();
        }

        private void Form1_Load(object sender, EventArgs e)
        {
            DoMaskBinding();
        }

        private void DoMaskBinding()
        {
            try
            {
                sc = new SqlConnection("Data Source=localhost;Initial Catalog=NORTHWIND;Integrated Security=SSPI");
                sc.Open();
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
                return;
            }

            dataConnect = new SqlDataAdapter("SELECT * FROM Employees", sc);
            dataConnect.Fill(employeesTable, "Employees");


            // Now bind MaskedTextBox to appropriate field. Note that we must create the Binding objects
            // before adding them to the control - otherwise, we won't get a Format event on the 
            // initial load. 
            try
            {
                currentBinding = new Binding("Text", employeesTable, "Employees.FirstName");
                firstName.DataBindings.Add(currentBinding);

                currentBinding = new Binding("Text", employeesTable, "Employees.LastName");
                lastName.DataBindings.Add(currentBinding);

                phoneBinding =new Binding("Text", employeesTable, "Employees.HomePhone");
                // We must add the event handlers before we bind, or the Format event will not get called
                // for the first record.
                phoneBinding.Format += new ConvertEventHandler(phoneBinding_Format);
                phoneBinding.Parse += new ConvertEventHandler(phoneBinding_Parse);
                phoneMask.DataBindings.Add(phoneBinding);
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
                return;
            }
        }

        private void phoneBinding_Format(Object sender, ConvertEventArgs e)
        {
            String ext;

            DataRowView currentRow = (DataRowView)BindingContext[employeesTable, "Employees"].Current;
            if (currentRow["Extension"] == null) 
            {
                ext = "";
            } else 
            {
                ext = currentRow["Extension"].ToString();
            }

            e.Value = e.Value.ToString().Trim() + " x" + ext;
        }

        private void phoneBinding_Parse(Object sender, ConvertEventArgs e)
        {
            String phoneNumberAndExt = e.Value.ToString();

            int extIndex = phoneNumberAndExt.IndexOf("x");
            String ext = phoneNumberAndExt.Substring(extIndex).Trim();
            String phoneNumber = phoneNumberAndExt.Substring(0, extIndex).Trim();

            //Get the current binding object, and set the new extension manually. 
            DataRowView currentRow = (DataRowView)BindingContext[employeesTable, "Employees"].Current;
            // Remove the "x" from the extension.
            currentRow["Extension"] = ext.Substring(1);

            //Return the phone number.
            e.Value = phoneNumber;
        }

        private void previousButton_Click(object sender, EventArgs e)
        {
            BindingContext[employeesTable, "Employees"].Position = BindingContext[employeesTable, "Employees"].Position - 1;
        }

        private void nextButton_Click(object sender, EventArgs e)
        {
            BindingContext[employeesTable, "Employees"].Position = BindingContext[employeesTable, "Employees"].Position + 1;
        }
    }
}

コードのコンパイル方法

Visual C# または Visual Basic プロジェクトを作成します。
前述の手順の説明どおりに、TextBox コントロールと MaskedTextBox コントロールをフォームに追加します。
プロジェクトの既定のフォームのソースコードファイルを開きます。
このファイル内のソースコードを前述の「使用例」に示したコードで置き換えます。
アプリケーションをコンパイルします。

参照

処理手順

チュートリアル : MaskedTextBox コントロールの使用

次の方法で共有

方法 : MaskedTextBox コントロールにデータをバインドする

MaskedTextBox コントロールにデータをバインドするには

使用例

コードのコンパイル方法

参照

処理手順

その他のリソース