コメント |
[[LboxGrid を Form1 に貼り付ける]]
@DIV
ツールボックスから、右クリックで「アイテムの選択」を選び、
R205_ORACLE_TESTA\R205_ORACLE_TESTA\lightbox_dotnet_02\lightbox.dll を追加する。
ツールボックスから LboxGrid を貼り付ける
@END
[[左右に分割(境界移動式)の、二つの LboxGrid を作成]]
@DIV
↓以下を参考に、作成
http://maglog.jp/lightbox/Article311133.html?bmode=ref2(Dock+Splitter 3分割パターン)
@END
http://lightbox.cocolog-nifty.com/photos/app/r205_oracle_testa_06.png
[[メニュー作成]]
@DIV
1) ツールボックスから、MenuStrip を Form にドラッグ&ドロップ
2) メニュー項目を3つ作成
A) テーブル一覧
B) CSV出力
C) 接続先情報の変更
@END
http://lightbox.cocolog-nifty.com/photos/app/r205_oracle_testa_07.png
[[メニューの動作を確認]]
@DIV
Private Sub テーブル一覧ToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles テーブル一覧ToolStripMenuItem.Click
MessageBox.Show("テーブル一覧")
End Sub
Private Sub CSV出力ToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles CSV出力ToolStripMenuItem.Click
MessageBox.Show("CSV出力")
End Sub
Private Sub 接続先情報の変更ToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles 接続先情報の変更ToolStripMenuItem.Click
MessageBox.Show("接続先情報の変更")
End Sub
@END
[[接続先情報の変更用のダイアログを作成]]
@DIV
1) 追加 => 新しい項目 => @C:red(ダイアログ)
2) 動作確認( メニュー項目のイベントに以下のコードを記述 )
@DIV
Private Sub 接続先情報の変更ToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles 接続先情報の変更ToolStripMenuItem.Click
Dim MyDialog As New Dialog1()
Dim ret As DialogResult = MyDialog.ShowDialog(Me)
MyDialog.Dispose()
End Sub
@END
@END
[[ダイアログの中を作成]]
@DIV
以下の3つの項目を、ラベルとテキストフィールドで作成
サーバー
ユーザー
パスワード
※ テキストフィールドの名称は、それぞれサーバー、ユーザー、パスワード
※ バスワードの PsswordChar に * をセットしておく
@END
http://lightbox.cocolog-nifty.com/photos/app/r205_oracle_testa_08.png
[[LboxGrid のタイトルを作成]]
@DIV
Form の load イベントで、以下のコードを書く
@DIV
Me.LboxGrid1.AddColumn("TABLE", "テーブル名")
Me.LboxGrid2.ReadOnly = False
Me.LboxGrid2.AddColumn("CHECK", "選択", lightbox.LboxColumnType.LboxColumnType_CheckBox)
Me.LboxGrid2.AddColumn("COL", "列名")
Me.LboxGrid2.DisableColumnEdit("COL")
Me.LboxGrid2.AddColumn("ATT", "データタイプ")
Me.LboxGrid2.DisableColumnEdit("ATT")
Me.LboxGrid2.AddColumn("LEN", "文字列長さ")
Me.LboxGrid2.DisableColumnEdit("LEN")
@END
@END
http://lightbox.cocolog-nifty.com/photos/app/r205_oracle_testa_09.png
|