フォームを画面の真ん中に表示するには

VB２０１０でフォームを画面の真ん中に表示するにはどのようにすれば宜しいのでしょうか。
出来る限り詳しく教えて戴きたいと思います。

質問者からの補足コメント

• 教えて頂いたプログラムでは真ん中に表示されません。

  No.1の回答に寄せられた補足コメントです。 補足日時：2017/01/24 18:10

• 自分がやりたいのは画面中央の固定です

    補足日時：2017/01/24 21:21

• 教えて頂き有難う御座います。
  CenterScreenにしたのですが、移動出来ます。
  移動出来ないようにするには、どのようにすれば宜しいのでしょうか。

  No.2の回答に寄せられた補足コメントです。 補足日時：2017/01/25 09:31

• 教えて頂き有難う御座います。
  プログラムをコピー＆ペーストしましたがビルドエラーに成ります。

  No.3の回答に寄せられた補足コメントです。 補足日時：2017/01/25 16:14

• <SecurityPermission(SecurityAction.Demand,
  Flags:=SecurityPermissionFlag.UnmanagedCode)>
  Protected Overrides Sub のところに青いギザギザが表示されます。

  No.4の回答に寄せられた補足コメントです。 補足日時：2017/01/25 16:55

• していません。
  Importsのところにも青いギザギザが表示されます。

  No.5の回答に寄せられた補足コメントです。 補足日時：2017/01/25 17:18

• 使用しているのは、 Visual Basic 2010 Expressです。

    補足日時：2017/01/25 17:27

No.2 ベストアンサー 回答者： lockon985 回答日時： 2017/01/24 23:17

Form1.vb[デザイン]

プロパティにStartPositionというのがあると思いますが、その横にあるコンボボックスの値をCenterScreenにしてみてはどうでしょう。

No.6 回答者： lockon985 回答日時： 2017/01/25 17:37

visualstudio2015のバージョンで確認はできないので、webで調べてみてはいかがでしょう。

検索でvb2010 フォーム　固定などで一つ一つ調べていくと見つかるかもしれません。

この回答へのお礼

色々と有難う御座います。
調べてみます。

お礼日時：2017/01/25 17:45

No.5 回答者： lockon985 回答日時： 2017/01/25 17:09

Public Class Form1の上に、

Imports System.Security.Permissionsと入力していますか？

No.4 回答者： lockon985 回答日時： 2017/01/25 16:46

よろしければ、ソースコードとエラー内容を教えてください。

No.3 回答者： lockon985 回答日時： 2017/01/25 13:49

参考ページ：

http://dobon.net/vb/dotnet/form/fixformposition. …
'ファイル名：Form1.vb
Imports System.Security.Permissions
Public Class Form1
<SecurityPermission(SecurityAction.Demand,
Flags:=SecurityPermissionFlag.UnmanagedCode)>
Protected Overrides Sub WndProc(ByRef m As Message)
Const WM_SYSCOMMAND As Integer = &H112
Const SC_MOVE As Long = &HF010L

If m.Msg = WM_SYSCOMMAND AndAlso
(m.WParam.ToInt64() And &HFFF0L) = SC_MOVE Then
m.Result = IntPtr.Zero
Return
End If

MyBase.WndProc(m)
End Sub
End Class

この回答へのお礼

教えて頂き有難う御座います。
プログラムをコピー＆ペーストしましたがビルドエラーに成ります。

お礼日時：2017/01/25 16:13

No.1 回答者： lockon985 回答日時： 2017/01/24 15:57

'フォームを作成

Dim f as New Form1()
'フォームの初期値を真ん中にする
f.StartPostion = FormStartPosition.CenterScreen
'フォームを開く
f.Show()