• 検索結果がありません。

フォームを作成する

ドキュメント内 VB (ページ 42-45)

①  フォームのコードを変更する

「ソリューション  エクスプローラ」ウィンドウを表示して、マウスの右 ボタンで

Form1

のコンテキストメニューを表示し、「コード表示」を選択 します。以下のようにコードを変更します。変更箇所は、名前空間とクラ ス名です。

C#の場合 

1164: namespace OSK.OSK.BuildingBlock.GUI 1165: {

1166: public class BlockSuiteForm : System.Windows.Forms.Form 1167:

1168: // 中略 1169:

1170: [STAThread]

1171: static void Main()

1172: {

1173: Application.Run(new BlockSuiteForm());

1174: }

1175: }

1176: }

VB .NET の場合 

1177: Namespace OSK.BuildingBlock.GUI 1178: Public Class BlockSuiteForm

1179: Inherits System.Windows.Forms.Form

1180: #Region " Windows フォーム デザイナで生成されたコード "

1181:

1182: #End Region 1183: End Class 1184: End Namespace

②  ファイル名を変更する

「ソリューション  エクスプローラ」ウィンドウを表示して、マウスの右ボタンで

Form1

のコンテキストメニュー を表示し、「名前の変更」を選択します。ファイル名を

BlockSuiteForm

に変更します。

③  プロジェクトの属性を変更する

Form1

のクラス名を変更したので、関連する以下のプロジェクトの属性を設定します。

④  フォームにコントロールを配置する

ツールボックスからコントロールをドラッグ・アンド・ドロップして、以下のようなウィンドウを作成します。

⑤  コントロール名を変更する

プログラムの作成をスムーズに進めるために、コントロール名を意味のあるものに変更します。また、各コントロ ールのプロパティを以下のように変更します。

BlockSuiteForm

について、以下の設定を行う

種別 項目 設定内容

表示 Text ブロックセット重量計算

配置

MinimumSize 400,350

WeightLabel

について、以下の設定を行う

種別 項目 設定内容

表示 Text 重量トータル

表示

Font

サイズを

18

WeightLabel WeightValueLabel BlockListBox SuiteMemberListBox

AddButton

DeleteButton

WeightValueLabel

について、以下の設定を行う

種別 項目 設定内容

表示 Text [空白]

表示

Font

サイズを

18

表示 BorderStyle

Fixed3D

AddButton

について、以下の設定を行う

種別 項目 設定内容

表示

Text

追加

DeleteButton

について、以下の設定を行う

種別 項目 設定内容

表示 Text 削除

⑥  アンカーリングの設定を行う

アンカーリングとは、ウィンドウのサイズを変更したときに、そのサイズに合わせて、コントロールの位置を自動 的に変更する機能です。

WeightLabel

について

種別 項目 設定内容

位置

Anchor Top,Left

WeightValueLabel

について

種別 項目 設定内容

位置 Anchor

Top,Left,Right

AddButton

について

種別 項目 設定内容

位置 Anchor

Top,Left

DeleteButton

について、以下の設定を行う

種別 項目 設定内容

位置 Anchor

Bottm,Left

BlockListBox

について

種別 項目 設定内容

位置

Anchor Top, Bottom,Left

SuiteMemberListBox

について、以下の設定を行う

種別 項目 設定内容

位置

Anchor Top, Bottom, Left,Right

⑦  ウィンドウを表示させる

プロジェクト

GUI

を一時的に「スタートアッププロジェクトに設定」を行い、ウィンドウを表示させてみる。

Topic 

VB.NET

になって、フォームに必ず最前列に表示するためのプロパティ「TopMost」や半透明にするプロパティ

ドキュメント内 VB (ページ 42-45)