🚀 go-pugleaf

> みなさんこんばんわ。
> いま、Access97 でプログラミングしています。
>
> フォームのロード時のイベントでテキストボックスを新しく作成し、コントロ
> ール
> ソースも定義しようとしています。
>
> Private Sub Form_Load()
>
> 　　　 Dim Text2 As New TextBox
>
> 　　　 Text2.ControlSource = "ID"
>
> End Sub
>
> と書いたのですが、「実行時エラー 429 ActiveXコンポーネントはオブジェク
> トを作
> 成できません。」となってしまいます。
>
> どうしたら、ソースだけでテキストボックスを追加生成し、データベースを連
> 結でき
> るのでしょうか？
>
> Access97でプログラムですが、VBAということで visualbasicのグループにク
> ロス投
> 稿しました。
>
> 複数のディスクを一気に検索するソフト
> まい　ほーむぺーじ　：　 http://home.interlink.or.jp/~t-fujii/
> まい　 めーるあどれす ：　 t-fujii@interlink.or.jp

熊川と申します。ＡＣＥＥＳＳ９７で使えるか解りませんが、ＶＢでのコントロ
ール追加方法
を一応書いておきますので試してください。

条件はテキストボックスのインデックス(Index)に０が入っていること。つ
まり、１つしかなくともコントロール配列にしてしまうわけです。

で以下の様にＬｏａｄコマンドで新しく作成します。
Load Text1(1)
このコードを実行すると、Text1(0)のコピーができあがります。
位置が同じで非表示になっているので（基準はデザイン時だと思います）、
動かして、表示してみてください。
その後でプロパティにプロパティに連結情報を入れてみてはどうでしょうか。