MENU > HOME VB.NET VB6 VBA ソフトウェア リンク サイト情報
VB.NET > VB.NET サンプルコード
System.Windows.Forms.ComboBox (コンボボックス)
  フラットスタイルコンボボックス
Offficeツールバーのように、フラットな概観を持つComboBoxクラスです。
大半のコントロールでは一応見た目はフラットにすることができるのに、ComboBoxだけはいまだに3D表示のままプロパティのどこをどう設定してもフラットにならないんですよね。これがまた浮くんです。
マニフェストファイルなんかでVisual Styleを適用するって方法もありますが、なんだかねぇ...。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月14日]
  フォント選択コンボボックス
Offficeツールバーのように、オーナードロー機能を使用してフォント名をそれぞれのフォントで描画しています。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月2日]
System.Windows.Forms.Label (ラベル)
ラベルをちょっとした工夫でかっこよく見せる
かっこよいのかどうかはわかりませんが、描画処理をちょちょいと工夫するだけでLabelの見栄えも随分変わります。
たかがLabelだけど、結構遊べます(ベースはWIN32のSTATICクラスだしね)。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年11月30日]
System.Windows.Forms.ListView (リストビュー)
  カラムヘッダのサイズ変更禁止
マウスドラッグによるカラムヘッダの幅の変更を禁止します。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月12日]
  リストビューアイテムのソート
文字列は当然のこと、日付、数値、文字列と数値の混在を独自の比較クラスにて対応。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月1日]
System.Windows.Forms.TabControl (タブコントロール)
  タブコントロールのオーナードロー
TabControl標準のオーナードロー機能を使用し、TabPageと同色で各Tab背景を塗りつぶしています。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月18日]
System.Windows.Forms.DataGrid (データグリッド)
  データグリッドの行選択モード
表題のとおりです。たいしたサンプルではありません。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月5日]
  データグリッドでEnterキー、Tabキーが押された事を知る
データグリッドは、KeyDownやKeyPressといったイベントはほとんど意味を成しません。
DataGridTextBoxColumn.TextBoxをイベント付のTextBoxとして参照すれば、なんとかキーイベントが拾えるようにはなりますが、やはりEnterキー等は拾えません。
で、ProcessCmdKeyをオーバーライドすることによりなんとか実現。これで一応EnterキーによるCell移動ができる。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年12月2日]
System.Windows.Forms.Form (フォーム)
  フォームのアニメーション効果
メインフォームのロード時は画面右上よりアニメーションをしながら現れ、アンロード時はタスクトレイに消えてゆきます。
(画面のプロパティでウィンドウのアニメーションが有効になっている必要あり。)
[OS: Windows XP VB: VB.NET 2002 更新日: 2002年10月4日]
  吹き出し型ウィンドウ
複数のリージョンを組み合わせて作成してあります。
(注)吹き出し型ツールチップではありません。
[OS: Windows XP VB: VB.NET 2002 更新日: 2002年11月11日]
System.Windows.Forms.NativeWindow
  アニメーションコントロールの作成
Windows.Forms.NativeWindowを継承したクラスでCreateHandleメソッドを使用して、コモンコントロールのアニメーションコントロールを作成するサンプルです。
VB6では標準だったコントロールが、VS.NETではアニメーションGIFをサポートしたためなのかどうかは不明ですが削除されています。
ウィンドウメッセージをトラップしたい場合は別途NativeWindowを継承したクラスを用意し、そちらでコンテナコントロールをAssignHandleして下さい。(そのうちきちんと作り直します。)
[OS: Windows XP VB: VB.NET 2002 更新日: 2002年10月4日]
MessageBox
  指定時間経過したらメッセージボックスを閉じる
独自のメッセージボックスクラスより、指定時間経過後に自動で閉じるメッセージボックスを表示します。Showメソッドは.Net FrameworkのMessageBox.Showと互換があり、同仕様のShowメソッドを全てオーバーライドしてあります。
クラス内部ではUser32.dllのMessageBoxTimeout関数(WindowsXPのみのアンドキュメントな関数)を使用していますので、全てにおいて無保証です(笑)。
十分注意して使用してください。
[OS: Windows XP VB: VB.NET 2002 更新日: 2002年12月25日]
IME
自動ふりがな表示
自作のふりがな取得クラスのイベント処理にてテキストボックスに入力されたテキストのふりがなを自動で表示しています。
[OS: Windows XP VB: VB.NET 2003 更新日: 2003年11月29日]

Copyright©Sugi. All rights reserved.