投稿時間：2006/08/10(Thu) 11:30
投稿者名：シグ
Ｅメール：
ＵＲＬ ：
タイトル：DataComboとTextBoxの中身のチェック
ちょっとわからなくなってしまいまして、宜しくお願い致します。
DataComboコントロールが10個ありましてそれにはAccess2000で作った
レコードセット（商品リスト）が連結されています。
そしてそれのとなりに選択された商品の数量を入れるTextBoxが10個ある状態です。
もしDataComboの商品が選択され数量が入力されていなかった場合は
If DataCombo1.Text= "(何かの商品）" Then
If Text1.Text="" Then
MsgBox "数量を入力して下さい"
End If
となるわけですが、この（何かの商品）の部分なんですが
DataComboのTextプロパティ部分に何か商品がはいってるというのは
コードではどう書けば言いのでしょうか？
DataComboのリストから選択されるので何が入るのかわからないもので…。
それと一番上のDataComboつまりDataCombo1に関しては
絶対に何か商品名が入っていないとダメという設定にしたいので、コードでは
If DataCombo1.Text="" Then
MsgBox "商品名を入力して下さい"
ElseIf DataCombo1.Text= "(何かの商品）" Then
If Text1.Text="" Then
MsgBox "数量を入力して下さい"
End If
となります。が、DataCombo2〜DataCombo10までは必ずしも商品が入力されるわけではないので
何も入力されていなければそのままでOKで
もし入力されていた場合は数量がきちんと入力されているか上記のように
MsgBoxにて表示させたいのですが、どうすればよいでしょうか？
一応DataComboとTextBoxはそれぞれコントロール配列にしてありまして
ループでやればいいのかな？とはおもっているのですが…
よくわからなくなってしまいましたので、お教え願えればと思います。
宜しくお願い致します。
|