ウインドウの位置とサイズを変更する
ウインドウの位置とサイズを変更するサンプルです。
サンプルの実行画面
ソースコード
[MoveWindow.frm]
'ウインドウの位置とサイズを変更するAPI関数 'hWnd:ウインドウのハンドル 'X:移動後のx座標 'Y:移動後のy座標値 'nWidth:変更後の幅 'nHeigh:変更後の高さ 'bRepaint:1 '戻り値:正常終了0以外 'スクリーン座標なので注意(X,Y) Private Declare Function MoveWindow Lib "user32" (ByVal hWnd As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal bRepaint As Long) As Long Private Sub Command1_Click() Dim Ret As Long Ret = MoveWindow(Form1.hWnd, 0, 0, 300, 300, 1) End Sub
ソースコード一式のダウンロード
vbapi_movewindow.zip 796 バイト (796 バイト)
このサンプルの動作環境について
このサンプルは 「Windows98」及び「Microsoft Visual Basic 5.0 Professional Edition」で確認しております。環境が異なる場合は正常に動作しない場合もございますのでご了承下さい。
スポンサーリンク
関連記事
前の記事: | コントロールにメッセージを送る |
次の記事: | ウインドウを常に手前にする |
公開日:2015年03月06日
記事NO:00423