Shoeisha Technology Media

CodeZine(コードジン)

特集ページ一覧

ドロップダウン表示したグリッドコントロールを使ってデータ入力する.NETアプリケーションの作成

「PlusPak for Windows Forms 6.0J」のGcComboFrameコントロールを使った.NETアプリケーションの作成

  • ブックマーク
  • LINEで送る
  • このエントリーをはてなブックマークに追加
2012/11/30 14:00
目次

グリッドのデータ転送とバルーンチップの表示処理

 グリッドのデータをクリックすると、GcComboFrameコントロールのLabelコントロールに転送する処理と、バルーンチップを表示する処理を作成します。

 なお、フォームのLoadイベントハンドラは、C1FlexGrid1コントロールにデータベースを連結した時に自動的に作成されたコードが記述されています。

グリッドのデータ転送処理

 この処理は、C1FlexGridコントロールのClickイベントハンドラに作成します。

 グリッドのセルがクリックされると、Rowプロパティにその行番号が格納されますので、そのまま行番号と列番号を指定して、セルの値をGcComboFrameコントロールに配置したLabelコントロールのTextプロパティに順番に代入していきます。

 C1FlexGrid1からC1FlexGrid4までは、最初のLabelコントロールに値が代入された時点で、次のGcComboFrameコントロールを有効にする処理を組み込みます。

 これで、グリッドのセルをどれか1つクリックすれば、その行のデータがすべてLabelコントロールに転送されます。

Visual Basic
Private Sub C1FlexGrid1_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid1.Click
    Dim i As Integer = C1FlexGrid1.Row

    Label7.Text = C1FlexGrid1(i, 2).ToString()
    Label8.Text = C1FlexGrid1(i, 3).ToString()
    Label9.Text = C1FlexGrid1(i, 4).ToString()
    Label10.Text = C1FlexGrid1(i, 5).ToString()
    Label11.Text = C1FlexGrid1(i, 6).ToString()

    If Label7.Text <> "" Then
        GcComboFrame2.Enabled = True
    End If
End Sub

Private Sub C1FlexGrid2_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid2.Click
    Dim i As Integer = C1FlexGrid1.Row

    Label12.Text = C1FlexGrid1(i, 2).ToString()
    Label13.Text = C1FlexGrid1(i, 3).ToString()
    Label14.Text = C1FlexGrid1(i, 4).ToString()
    Label15.Text = C1FlexGrid1(i, 5).ToString()
    Label16.Text = C1FlexGrid1(i, 6).ToString()

    If Label12.Text <> "" Then
        GcComboFrame3.Enabled = True
    End If
End Sub

Private Sub C1FlexGrid3_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid3.Click
    Dim i As Integer = C1FlexGrid1.Row

    Label17.Text = C1FlexGrid1(i, 2).ToString()
    Label18.Text = C1FlexGrid1(i, 3).ToString()
    Label19.Text = C1FlexGrid1(i, 4).ToString()
    Label20.Text = C1FlexGrid1(i, 5).ToString()
    Label21.Text = C1FlexGrid1(i, 6).ToString()

    If Label17.Text <> "" Then
        GcComboFrame4.Enabled = True
    End If
End Sub

Private Sub C1FlexGrid4_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid4.Click
    Dim i As Integer = C1FlexGrid1.Row

    Label22.Text = C1FlexGrid1(i, 2).ToString()
    Label23.Text = C1FlexGrid1(i, 3).ToString()
    Label24.Text = C1FlexGrid1(i, 4).ToString()
    Label25.Text = C1FlexGrid1(i, 5).ToString()
    Label26.Text = C1FlexGrid1(i, 6).ToString()

    If Label22.Text <> "" Then
        GcComboFrame5.Enabled = True
    End If
End Sub

Private Sub C1FlexGrid5_Click(sender As System.Object, e As System.EventArgs) Handles C1FlexGrid5.Click
    Dim i As Integer = C1FlexGrid1.Row

    Label27.Text = C1FlexGrid1(i, 2).ToString()
    Label28.Text = C1FlexGrid1(i, 3).ToString()
    Label29.Text = C1FlexGrid1(i, 4).ToString()
    Label30.Text = C1FlexGrid1(i, 5).ToString()
    Label31.Text = C1FlexGrid1(i, 6).ToString()
End Sub
C#
private void c1FlexGrid1_Click(object sender, EventArgs e)
{
    int i = c1FlexGrid1.Row;

    label7.Text = c1FlexGrid1[i, 2].ToString();
    label8.Text = c1FlexGrid1[i, 3].ToString();
    label9.Text = c1FlexGrid1[i, 4].ToString();
    label10.Text = c1FlexGrid1[i, 5].ToString();
    label11.Text = c1FlexGrid1[i, 6].ToString();

    if(label7.Text != "")
    {
    gcComboFrame2.Enabled = true;
    }
}

private void c1FlexGrid2_Click(object sender, EventArgs e)
{
    int i = c1FlexGrid1.Row;

    label12.Text = c1FlexGrid1[i, 2].ToString();
    label13.Text = c1FlexGrid1[i, 3].ToString();
    label14.Text = c1FlexGrid1[i, 4].ToString();
    label15.Text = c1FlexGrid1[i, 5].ToString();
    label16.Text = c1FlexGrid1[i, 6].ToString();

    if (label12.Text != "")
    {
        gcComboFrame3.Enabled = true;
    }
}

private void c1FlexGrid3_Click(object sender, EventArgs e)
{
    int i = c1FlexGrid1.Row;

    label17.Text = c1FlexGrid1[i, 2].ToString();
    label18.Text = c1FlexGrid1[i, 3].ToString();
    label19.Text = c1FlexGrid1[i, 4].ToString();
    label20.Text = c1FlexGrid1[i, 5].ToString();
    label21.Text = c1FlexGrid1[i, 6].ToString();

    if (label17.Text != "")
    {
        gcComboFrame4.Enabled = true;
    }
}

private void c1FlexGrid4_Click(object sender, EventArgs e)
{
    int i = c1FlexGrid1.Row;

    label22.Text = c1FlexGrid1[i, 2].ToString();
    label23.Text = c1FlexGrid1[i, 3].ToString();
    label24.Text = c1FlexGrid1[i, 4].ToString();
    label25.Text = c1FlexGrid1[i, 5].ToString();
    label26.Text = c1FlexGrid1[i, 6].ToString();

    if (label22.Text != "")
    {
        gcComboFrame5.Enabled = true;
    }
}

private void c1FlexGrid5_Click(object sender, EventArgs e)
{
    int i = c1FlexGrid1.Row;

    label27.Text = c1FlexGrid1[i, 2].ToString();
    label28.Text = c1FlexGrid1[i, 3].ToString();
    label29.Text = c1FlexGrid1[i, 4].ToString();
    label30.Text = c1FlexGrid1[i, 5].ToString();
    label31.Text = c1FlexGrid1[i, 6].ToString();
}

  • ブックマーク
  • LINEで送る
  • このエントリーをはてなブックマークに追加

著者プロフィール

  • 瀬戸 遥(セト ハルカ)

    8ビットコンピュータの時代からBASICを使い、C言語を独習で学びWindows 3.1のフリーソフトを作成、NiftyServeのフォーラムなどで配布。Excel VBAとVisual Basic関連の解説書を中心に現在まで40冊以上の書籍を出版。近著に、「ExcelユーザーのためのAccess再...

バックナンバー

連載:ComponentZine(PlusPak)

もっと読む

All contents copyright © 2005-2020 Shoeisha Co., Ltd. All rights reserved. ver.1.5