No.1ベストアンサー
- 回答日時:
この回答への補足
回答ありがとうござます。
続けての質問申し訳ありませんが、
サンプルソースの部分の
Private btnArray(9) As Windows.Forms.Button
この部分をローカル(Form_Loadなど)で行いたいのですが、またそれが出来ない場合、この部分を動的に宣言することは出来ますか
No.4
- 回答日時:
こんばんは。
私の単純なミスですね。
Me.btnArray = New System.Windows.Forms.TextBox(Num) {}
↓
Me.btnArray = New System.Windows.Forms.Button(Num) {}
としてください。
ですが、これくらいの間違いは気づいて欲しいです。
Buttonを作るのだから、TextBoxだとおかしいと。
エラーメッセージを見ても分かりそうに思うのですが。
No.3
- 回答日時:
No.2ですがミスがありましアタので訂正です。
>Me. = New System.Windows.Forms.TextBox(Num) {}
↓
Me.btnArray = New System.Windows.Forms.TextBox(Num) {}
としてください。
この回答への補足
返信ありがとうございます。
わかりずらい文章で申し訳ないです。
解釈としてはそのとおりです。
New System.Windows.Forms.TextBox(Num) {}
この部分で
'System.Windows.Forms.TextBox'は'System.Windows.Forms.Button'から派生していない、
型'System.Windows.Forms.TextBoxの一次元配列'の値を'System.Windows.Forms.Buttonの一次元配列'に変換できません
というエラーが出るのですがどうしたらいいですか
No.2
- 回答日時:
質問の意味がよく分かりませんが、参考URLだとあらかじめ10個としているので、これをTextBoxに入力去れ炊かずにしたいと言うことでいいでしょうか。
まず
>Private btnArray(9) As Windows.Forms.Button
↓
Private btnArray() As Windows.Forms.Button
としてください。
サンプルではフォームのLoadイベントで行っていますが、TextBoxに入力してから行うためにTextBoxのValidatingイベントで行います。
Private Sub TextBox1_Validating(ByVal sender As Object, ByVal e As _ System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating
'数値以外の入力はやり直し
If IsNumeric(TextBox1.Text) = False Then
e.Cancel = True
Exit Sub
End If
Dim I As Integer
Dim Num As Integer = Cint(Me.TextBox1.Text) - 1
Me. = New System.Windows.Forms.TextBox(Num) {}
For I = 0 To Num
'2-1)インスタンスを作成
btnArray(I) = New Windows.Forms.Button
'2-2)配置位置を設定
btnArray(I).Location = New Point(10, 10 + 20 * I + 2)
'2-3)Nameプロパティを設定
btnArray(I).Name = "Button" & I.ToString
'2-4)サイズを設定
btnArray(I).Size = New System.Drawing.Size(100, 20)
'2-5)TabIndexを設定
btnArray(I).TabIndex = I + 1
'2-6)ボタンテキストを設定
btnArray(I).Text = "ボタン" & I.ToString
'2-7)イベントハンドラの登録
AddHandler btnArray(I).Click, AddressOf ButtonClick
'2-8)フォームに配置
Me.Controls.Add(btnArray(I))
Next
End Sub
試してませんがこんな感じでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) visual basic初心者です。 visual studioで電卓を作成しています。 実行時にテ 1 2023/02/08 00:18
- Visual Basic(VBA) 【ExcelVBA】動的にボタン、ボタン名を生成できますか? 7 2022/04/08 12:54
- Illustrator(イラストレーター) Illustratorでオブジェクトの色が勝手に変わって困っています。 4 2022/09/04 18:47
- Excel(エクセル) マクロでボタンにつける名前がどこに設定されているかわからないケースがありました。 1 2023/06/19 19:37
- ブルーレイ・プレーヤー・レコーダー ノートパソコンのCD/DVDドライブ 4 2023/02/20 15:01
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) VB.net フォーム 親子 1 2022/07/04 19:00
- Visual Basic(VBA) VBAでArrayListを使う為の「mscorlib.tlb」の参照設定について 3 2022/03/23 19:45
- Excel(エクセル) Excel VBAについてです。 少しだけ知識はあるのですが、 うまくいかなかったので 質問させてい 3 2022/09/13 18:40
- 写真・ビデオ Snowの写真保存について 1 2023/04/06 07:29
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
ユーザーフォームに別シートか...
-
フォームの再読み込み
-
セルをマクロのボタンにしたい。
-
VBAのボタンの位置が変わって困...
-
VBA CommandButtonの文字ずれ
-
回数のカウント
-
CommandButtonのCaptionを変化...
-
コマンドボタンやイメージにマ...
-
ボタンにセットフォーカスする...
-
バックスペース機能の作り方
-
閉じると「+」になり開くと「-...
-
VBAでオプションボタンによって...
-
VBA IE ダウンロード ダイアロ...
-
C♯初心者で、四則演算の電卓を...
-
エクセル 検索マクロ オート...
-
Vba 電卓 一文字消すボタン
-
Access VBA でデータペーストを...
-
コントロールの背景色を
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
ユーザーフォームに別シートか...
-
VBA CommandButtonの文字ずれ
-
フォームの再読み込み
-
セルをマクロのボタンにしたい。
-
Excel VBA Application.caller...
-
コマンドボタンやイメージにマ...
-
プロシージャからイベントをコ...
-
Access VBA でデータペーストを...
-
VBAのボタンの位置が変わって困...
-
閉じると「+」になり開くと「-...
-
[Excel VBA]コマンドボタンの入...
-
ASP.Net ラベルの内容をすぐに...
-
Excel マクロ 閉じるボタン
-
ボタン
-
CommandButtonのCaptionを変化...
-
VB.NETでマウスクリックイベン...
-
ボタンの枠線の様なものを消したい
-
C#で動的に作ったtextboxを消す。
おすすめ情報