Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1941 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【4525】addItem マルコ 05/3/9(水) 15:05 質問[未読]
【4526】Re:addItem Gin_II 05/3/9(水) 15:13 回答[未読]
【4527】Re:addItem マルコ 05/3/9(水) 15:27 質問[未読]
【4528】Re:addItem Gin_II 05/3/9(水) 15:50 回答[未読]
【4531】Re:addItem マルコ 05/3/9(水) 16:50 質問[未読]
【4532】Re:addItem Gin_II 05/3/9(水) 20:00 回答[未読]
【4539】Re:addItem マルコ 05/3/10(木) 14:25 お礼[未読]
【4525】addItem
質問  マルコ  - 05/3/9(水) 15:05 -
引用なし
パスワード
   ＡＣＣＥＳＳ２０００にて
コンボボックスの値の追加
cboControll.AddItem
の「AddItem」メソッドが出てきません。

何かの参照設定が必要でしょうか？
【4526】Re:addItem
回答  Gin_II  - 05/3/9(水) 15:13 -
引用なし
パスワード
   >の「AddItem」メソッドが出てきません。

Access2002からサポートされている機能ですので、Access2000では
使えません。
【4527】Re:addItem
質問  マルコ  - 05/3/9(水) 15:27 -
引用なし
パスワード
   ▼Gin_II さん：
>>の「AddItem」メソッドが出てきません。
>
>Access2002からサポートされている機能ですので、Access2000では
>使えません。

さっそくの返信ありがとうございます。
それでは、Access2000ではどう実現すれば
（コンボボックスに値を追加したい）
宜しいのでしょうか？
【4528】Re:addItem
回答  Gin_II  - 05/3/9(水) 15:50 -
引用なし
パスワード
   >それでは、Access2000ではどう実現すれば
>（コンボボックスに値を追加したい）
>宜しいのでしょうか？

値集合タイプ・値集合ソースは、どうなっていますか？
それによって方法も変わってくると思います。
【4531】Re:addItem
質問  マルコ  - 05/3/9(水) 16:50 -
引用なし
パスワード
   ▼Gin_II さん：
>>それでは、Access2000ではどう実現すれば
>>（コンボボックスに値を追加したい）
>>宜しいのでしょうか？
>
>値集合タイプ・値集合ソースは、どうなっていますか？
>それによって方法も変わってくると思います。

顧客コード char(5)
顧客名　　 char(30)

select 顧客名 from 顧客マスタ where　顧客コード

ＳＱＬ文自体は単純だと思います、宜しくお願いします
【4532】Re:addItem
回答  Gin_II  - 05/3/9(水) 20:00 -
引用なし
パスワード
   では、このテーブルに直接値を追加してやって、コンボボックスの Requery を
してやればいいと思います。

Dim strSql As String

strSql = "INSERT INTO 顧客マスタ ( 顧客コード, 顧客名 ) " _
　　　　& "VALUES (" & Me!xxx1 & ", " & Me!xxx2 & ")
Currentdb.Execute strSql, dbFailOnError
Me!コンボボックス名.Requery

直書きなので、間違っているかもしれませんが、こんな感じで (^^ゞ
【4539】Re:addItem
お礼  マルコ  - 05/3/10(木) 14:25 -
引用なし
パスワード
   回答ありがとうございます。ちょっとやってみます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1941 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078263
(SS)C-BOARD v3.8 is Free