vb2005での角の丸いフォームの作り方を教えてください。
vb6での作り方なら見つけたのですが、
vb2005で実行できるようにどう改良したらいいのか分かりません。
別のやり方でも良いので、どうか教えてください。
vb6の例
hRgn = CreateRoundRectRgn(0, 0, _
Me.Width / Screen.TwipsPerPixelX, _
Me.Height / Screen.TwipsPerPixelY, _
20, 20)
SetWindowRgn Me.hWnd, hRgn, True
No.1ベストアンサー
- 回答日時:
Private Declare Function CreateRoundRectRgn Lib "gdi32" (ByVal LeftRect As Integer, ByVal TopRect As Integer, ByVal RightRect As Integer, ByVal BottomRect As Integer, ByVal WidthEllipse As Integer, ByVal HeightEllipse As Integer) As Integer
Private Declare Function SetWindowRgn Lib "user32.dll" (ByVal hWnd As Integer, ByVal hRgn As Integer, ByVal bRedraw As Boolean) As Integer
Private Sub Form1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Click
Dim hRgn As Integer
Dim RightRect As Integer = VB6.PixelsToTwipsX(Me.Width) / VB6.TwipsPerPixelX
Dim BottomRect As Integer = VB6.PixelsToTwipsY(Me.Height) / VB6.TwipsPerPixelY
hRgn = CreateRoundRectRgn(0, 0, RightRect, BottomRect, 20, 20)
SetWindowRgn(Me.Handle.ToInt32, hRgn, True)
End Sub
で、試してください。
No.2
- 回答日時:
<br /> 個人的には,Mono + Linuxとかの環境を考えるとWin32 APIに頼るのは得策ではないと考える。<br
> http://dobon.net/vb/dotnet/form/formregion.htmlお探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- Access(アクセス) テキストボックスの値をテーブルに入力したい 2 2022/06/28 12:08
- Access(アクセス) DoCmd.SearchForRecord が動かない時の解決方法 3 2022/07/22 15:31
- HTML・CSS PCサイズで赤い画像2つと、青い画像2つがそれぞれ横に2つずつ並んでいるのですが、これをスマホサイズ 5 2022/04/11 12:01
- Access(アクセス) docmd.gotorecordを起動するには 5 2022/06/17 15:20
- Access(アクセス) チェックボックスにチェックが入った後の挙動 1 2022/08/21 12:39
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- PHP 文字列を段落で分ける方法を教えて下さい。 2 2023/03/09 10:03
- PHP 入力した部分を表示させたまま(保持)するにはどうすれば良いでしょうか? 1 2023/01/25 11:14
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
プログラミング
-
エクセルVBAコードで教えて下さ...
-
Excelのマクロについて教えてく...
-
VBA 別ブックからコピペしたい...
-
VBAコードについて教えてくださ...
-
vba アクティブシートの名前変...
-
Excelのマクロについて教えてく...
-
Outlookの「受信日時」「件名」...
-
ユーザーフォームに別シートか...
-
Excelのマクロについて教えてく...
-
VBAで各列の"+"と"o"の合計数を...
-
Excelのマクロについて教えてく...
-
久しぶりのプログラミング
-
エクセルVBA
-
Excelのマクロについて教えてく...
-
Vba 実数および実数タイプの変...
-
エクセルVBAについて
-
VBAの計算で@が出てしまう件
-
ExcelVBA シート名を複数セルか...
-
VBA UserFormからの転記で
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
角の丸いフォームの作り方
-
VB6.0からVB2010へ変換
-
vba 時間の引き算 例えば 15:00...
-
Designer.vbは直接コードをいじ...
-
アウトルックが起動しているか...
-
「読み込み違反」が起きたとき...
-
意味不明の実行時エラーで困っ...
-
Visual Studio 「AnyCpu」について
-
分かる人は簡単なのだろうが、v...
-
VBAでOutlookを終了させたい Ex...
-
Windows PowerShellでC言語を実...
-
VBSから別のVBS起動するとき変...
-
excel vbaから実行するexe実行...
-
IT初心者です 仕事で、vb.netで...
-
VBで実行中のEXEファイルの情報...
-
matplotlibで任意の角度の円弧...
-
ManagementClassが見つからない。
-
VBAでArrayListを使う為の「msc...
-
印刷要求順番と印刷出力順番が...
-
WinSCPで画像のように puttyを...
おすすめ情報