動的に作成されたボタン(実行時に生成されたボタン)と、動的に作成されたパネルがいくつかあります。このコードが機能しないことはわかっていますが、以下のコードのようなことをしたいと思います。
For i = 1 to NumberOfButtons
button(i).top = panel(i).top
next
ボタンの名前はbutton1、button2などです。パネルの名前もpanel1、panel2などです。これはすべてVBExpress2008で記述されています。
For i As Integer = 1 To theTopNumber
Me.Controls("button" & i.ToString).Top = Me.Controls("panel" & i.ToString).Top
Next
ボタンとパネルを生成するときは、それらを配列に格納する必要があります。次に、コードサンプルにあるようにインデックスを介してアクセスできます。別のオプションは、と同様の方法でそれを行うことですMe.Controls("button1")
が、私はこの悪いコーディングを検討します。
これはうまくいきませんか?
For Each btn As Button In Me.Controls
For Each pnl In Me.Controls
btn.Top = pnl.Top
Next
Next
私の不思議な理由で禁止されたので、(満足している場合は)投票するか、回答としてマークしてください。再度有効にすると役立つ場合があります:/
;)