![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.3ベストアンサー
- 回答日時:
試していませんが、これででょうでしょうか?
---
Private myBtn(9) As VB.CommandButton
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 9
Set myBtn(i) = Form1.Controls.Add("VB.CommandButton", "cmdBtn" & i)
Next
End Sub
完璧に動作確認できました。
発想の転換ですね~。
後はReDim preserve あたりでいけそうですね。
本当に助かりました、ありがとうございます!
No.4
- 回答日時:
現在VB6がさわれない環境にあるので、確認できないのですが(夜まで待っていただければ、自宅でチェックします)、
Dim objBtn As Object
set objBtn = Form1.Controls.Add "VB.CommandButton", "cmdBtn"
objBtn.Index = 0
として、objBtn.Index=0がエラーにならなければ、
Load cmdBtn(1)
が通りそうな気がするのですが。
objBtn.Index=0がエラーになるのであれば、当然cmdBtn(0)がないので、Loadも出来ないと思います。
何回もありがとうございます。書き忘れましたがVB6です。
とりあえずTodo36さんのお答えで壁は越えられましたが、arataさん式の別なアプローチもありそうなので、締め切りは明日にしたいと思います。
このままだと、Set は通りましたが、やはり Load でエラーが出てしまいました。
No.2
- 回答日時:
VB6では、Indexが0のコントロールを用意しなくても、動的にコントロールを追加することができます。
Controls.Add
を調べてみて下さい。
これで追加したコントロールのIndexを0に設定することが出来るかどうかは、やってみてないので、わかりません。
VB5以前では、Indexが0のコントロールを用意しないと動的に生成させることはできません。
参考URL:http://www.int21.co.jp/pcdn/vb/noriolib/vbmag/98 …
この回答への補足
ありがとうございます。
Form1.Controls.Add "VB.CommandButton", "cmdBtn"
などとして、
Load cmdBtn(1)
とした場合エラーになるので、最初からコントロール配列としての定義が必要???と思い質問させて頂きました。
フォーム上で配置したコントロール配列には、問題なく増減できるのですが・・・。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- C言語・C++・C# C言語初心者 ポインタについて、お助けください、、 2 2023/03/15 23:50
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
- その他(IT・Webサービス) ロリポップのレンタルサーバーを借りてます。(一般的な安いプラン) 元々はホームページでも作ろうと思っ 1 2023/05/24 19:54
- その他(Microsoft Office) EXCELでバーコードを作成すると白くなってコードが見えません 1 2022/04/04 14:24
- Perl perlをバージョンアップしたら、今まで正常に動いていたプログラムが、エラーになってしまった 3 2022/10/05 15:44
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Visual Basic(VBA) 表にフィルターをかけ、絞ったデータ(可視化セルのみ)を一次元配列として変数に入れるという動作を書きた 3 2023/06/16 00:31
- 郵便・宅配 アマゾンの配送 8 2023/08/01 09:08
- C言語・C++・C# C言語の課題が出たのですが自力でやっても分かりませんでした。 要素数がnであるint型の配列v2の並 3 2022/11/19 17:41
- Visual Basic(VBA) VBAで大量データの処理 3 2022/11/15 21:53
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
カメラスクロールするのを動画...
-
エクセル・VBA CheckBoxのオブ...
-
エクセルVBAでオプションボタン...
-
vb.netで画面のコントロールId...
-
C#で角が丸いテキストボックス
-
ExcelVBAでListViewが使用できない
-
コンボボックスの文字によるif...
-
コントロールを移動できない
-
ビープ音鳴らし続けたい。
-
変数をコントロール型で使用す...
-
もしフォームヘッダーにコント...
-
excelのリストボックスで選択し...
-
ExcelVBAのコントロールの種類...
-
アクセス特有の書き方?
-
間違えて配置してしまったコン...
-
chr関数の呼び出しで「プロ...
-
VB6でのバーコード印字について
-
NumericUpDownコントロールに数...
-
Excel VBA で Richtextboxを使...
-
Labelコントロールの(左右)余...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル・VBA CheckBoxのオブ...
-
カメラスクロールするのを動画...
-
vb.netで画面のコントロールId...
-
C#,vb.netで業務用アプリ開発と...
-
EXCELでactivexコントロールを...
-
フォーム上の現在アクティブな...
-
ExcelVBAでListViewが使用できない
-
コンボボックスの文字によるif...
-
C#で角が丸いテキストボックス
-
エクセルVBAでオプションボタン...
-
ユーザーフォームで動的(Me.Con...
-
VBAのフォームでTextBoxがいっ...
-
アクセス特有の書き方?
-
エクセル コントロールツール...
-
間違えて配置してしまったコン...
-
変数をコントロール型で使用す...
-
(VBA)スピンボタンの大量...
-
Labelコントロールの(左右)余...
-
excelのリストボックスで選択し...
-
Excel VBA で Richtextboxを使...
おすすめ情報