
フォームを画面のど真ん中に表示させたいのですが、
http://dobon.net/vb/dotnet/form/startposition.html
を見たのですがコードの書き方がよくわかりません。
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim f As New Form1() 'フォームを画面の真ん中に表示する
f.StartPosition = FormStartPosition.CenterScreenf.Show()
End Sub
End Class
こうすると、「FormStartPosition.CenterScreenf」の部分に波線がひかれます。
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Me.StartPosition = FormStartPosition.Manual
Me.Location = New Point(0, 0)
End Sub
End Class
これで左は時に表示する事は出来るのですが、真ん中に表示させるにはどうすればいいでしょうか?
No.5ベストアンサー
- 回答日時:
Formのコード Form1.vbの中最後に
Public sub new[Enter]
で Form1のコンストラクタを作成します
Public Sub New()
' この呼び出しは、Windows フォーム デザイナで必要です。
InitializeComponent()
' InitializeComponent() 呼び出しの後で初期化を追加します。
End Sub
といったスケルトンを生成します
そこで
Me.StartPosition = FormStartPosition.CenterScreen
を『' InitializeComponent() 呼び出しの後で初期化を追加します。』の行の次に記述して見ましょう
質問される場合に 開発環境や実行環境を明記したほうがいいかもしれません
例 : WinXP PRO/SP3 VB2005 とか VB2010Express など
メニューの操作など 微妙に違ったり、初期設定を変更しなくてはいけない場合などもありますので
『すべてのファイルを表示』は メインメニューの中の プロジェクトの項目にあります
VB2010の場合 ツール > 設定が 基本設定になっていると 表示されません
ですが ソリューションエクスプローラのツールバーの 左から2番目が それに当たります
No.4
- 回答日時:
すいません、訂正です。
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
SetBounds((Screen.PrimaryScreen.Bounds.Width - Width) / 2, (Screen.PrimaryScreen.Bounds.Height - Height) / 2, Width, Height)
End Sub
ど真ん中に表示できました!
ただ、上下の真ん中には出来ないのでしょうか?
TOPとか使えば可能のような気がしますが、よくわからないので教えていただけますか?
上下左右のど真ん中に表示させたいです。
ご回答よろしくお願いします。
No.3
- 回答日時:
これではどうでしょうか?
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
SetBounds((Screen.PrimaryScreen.Bounds.Width - Width) / 2, (Screen.PrimaryScreen.Bounds.Height - Height) / 2, Width, Me.Height)
End Sub
No.2
- 回答日時:
まずはデザイナで操作してみた方が良いでしょう。
すべてのファイルを表示すると,Form1.vbの下にForm1.Designer.vbというファイルが付いていて,
こちらを見るとデザイナでの操作がコードで記録されています。
で……
> Dim f As New Form1() 'フォームを画面の真ん中に表示する
新しいForm1を作ってそれを画面の真ん中に表示させたいのですか。
そうでないならば,New Form1で作ったインスタンスではなく,Meでアクセスする (or 省略する) 必要があります。
# Loadイベント中でNewしてShowしたらStackOverflowExceptionが発生しそうですが。
> f.StartPosition = FormStartPosition.CenterScreenf.Show()
改行が抜けています。
f.StartPosition = FormStartPosition.CenterScreen
f.Show()
のように,2行に書く (or :で区切る) 必要があります。
ただ,前述のようにそもそもfに対してやる必要があるのか,という問題はあって,
Loadイベントは
StartPosition = FormStartPosition.CenterScreen
の1行だけでよいのではないかと思います。
デザイナというもので確認しようと思ったのですが
「すべてのファイルを表示」とはどうやればいいのでしょうか?
Form1.Designer.vbを表示させる方法がわかりません。
ソリューションエクスプローラーを見ましたが、Form1.Designer.vbは見つけられませんでした。
>新しいForm1を作ってそれを画面の真ん中に表示させたいのですか。
既にフォームはあるので、違います。
StartPosition = FormStartPosition.CenterScreen
だけにしてみましたが、ど真ん中には表示されませんでした。
やや斜め左下に表示しされます。
Dim f As New Form1()
f.StartPosition = FormStartPosition.CenterScreen
f.Show()
にすると、大量のフォームが開いてしまいます。
Me.StartPosition = FormStartPosition.CenterScreen
Me.Show()
にしても、
StartPosition = FormStartPosition.CenterScreenと同じく、やや斜め左下に表示しされました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
VB.NETでフォーム上にExcelのような表を表示する方法
Visual Basic(VBA)
-
CloseとDisposeの違い
Visual Basic(VBA)
-
-
4
VB.NETで他のプロジェクトで作成したフォームを使う方法
Visual Basic(VBA)
-
5
変数の参照でエラーが出てしまいます。(VB.NET)
Visual Basic(VBA)
-
6
.NET上でエクセル上に罫線を引く
Visual Basic(VBA)
-
7
DataGridViewでセルクリックイベントを発生させるには
Visual Basic(VBA)
-
8
String"から型'Double'への変換は無効です。 とエラーが出ます。
Visual Basic(VBA)
-
9
別フォームから戻ったときのイベント
Visual Basic(VBA)
-
10
メッセージボックスを大きくする方法
Visual Basic(VBA)
-
11
VB.NET2005 TextBox 高さ(Height) 変更
Visual Basic(VBA)
-
12
文字列の後ろから必要分だけ削除したい。
Visual Basic(VBA)
-
13
フォームの再読み込み
Visual Basic(VBA)
-
14
DateTimePickerでに年月までしか選択できないようにしたいです。
Visual Basic(VBA)
-
15
配列の重複する値とその個数を取得したい
Visual Basic(VBA)
-
16
上下の位置揃えについて
Visual Basic(VBA)
-
17
FORMが開いているかどうかの確認方法
Visual Basic(VBA)
-
18
Hideについて(.NET)
Visual Basic(VBA)
-
19
VB.NETでのイベントの途中終了
Visual Basic(VBA)
-
20
矢印(左右)キーでイベントを発生させたい。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
クリックイベントなのに、2回ク...
-
ExcelVBAのユーザーフォームの...
-
ユーザーフォームを表示中にシ...
-
モーダルフォームとモードレス...
-
ユーザーフォーム上に現在日時...
-
'ユーザーフォーム右上隅の[×...
-
ACCESSのフォーム、開くんです...
-
C#でボタンクリックをキャンセル
-
パソコンの画面に合わせてユー...
-
VB.NETでフォーム間でのコント...
-
コントロールの存在確認
-
フォームのアクティブと非アク...
-
C#で起動時のフォームを非表示...
-
フォームの位置を取得したい
-
Accessで、一つのフォーム画面...
-
Excelにて、ユーザーフォームで...
-
オブジェクト(コントロール)...
-
Hideについて(.NET)
-
複数のフォームを1つのフォー...
-
VBAでユーザーフォームを再表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ユーザーフォームを表示中にシ...
-
ExcelVBAのユーザーフォームの...
-
Microsoft Formsの「個人情報や...
-
Form_Load と Form_Activate の...
-
VBAでユーザーフォームを再表示...
-
クリックイベントなのに、2回ク...
-
ユーザーフォーム上に現在日時...
-
テキストボックス入力データの...
-
VBAのテキストフォームの折り返...
-
ACCESSのフォーム、開くんです...
-
Hideについて(.NET)
-
ユーザーフォームのテキストボ...
-
エクセルVBAのフォームを最...
-
モーダルフォームとモードレス...
-
EXCEL VBA ユーザーフォームの...
-
フォームのテキストボックスな...
-
コントロールの存在確認
-
パソコンの画面に合わせてユー...
-
フォームウィンドウを最前面に...
-
Accessで、一つのフォーム画面...
おすすめ情報