BUG: 選択範囲を入力する DBCombo の SelectedItem プロパティが更新されません。

文書翻訳 文書翻訳
文書番号: 281940 - 対象製品
この資料は、アーカイブされました。これは "現状のまま" で提供され、更新されることはありません。
すべて展開する | すべて折りたたむ

目次

現象

DBList32.ocx から DBCombo コントロールの種類-先行検索機能、使用して、 SelectedItem プロパティは更新されず、DBCombo に一致するエントリが見つかったが反映されません。

解決方法

マイクロソフトでは、現在この問題を修正する修正プログラムを提供中ですが、修正プログラムはこの資料に記載された問題のみを修正することを目的としています。 障害があったコンピュータに対してのみ適用することを推奨します。 この修正プログラムは、今後さらにテストを行う場合があります。 この問題で深刻な影響を受けていない場合は、この修正プログラムを含む次の Visual Studio Service Pack まで待つことを推奨します。

この問題を直ちに解決、する問い合わせのマイクロソフト製品サポート サービスに、修正プログラムを入手します。 Microsoft Product Support Services の電話番号一覧およびサポート料金については、次のマイクロソフト Web サイトを参照してください:
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
: 特別な場合は、料金がサポート通常発生する可能性があります取り消せません Microsoft Support 担当者により、特定の更新は問題が解決される場合。 通常のサポート料金が追加の質問および問題の特定のアップデートの対象とならない問題について適用されます。

: この修正プログラムを入手する Visual Studio 使用許諾契約が必要です。

状況

マイクロソフトをこのとして認識しています、Microsoft のバグこの資料の冒頭に記載されている製品です。

詳細

アイテムを DBCombo のリスト部分に選択するとコントロール、 SelectedItem プロパティには、ブックマークを使用して、"RowSource/値集合ソース" プロパティを指定するデータ コントロールの Recordset で、選択したレコード位置を変更することができますが格納されています。 ユーザーで、マウスまたはキーボードの項目を選択するかどうかは、このプロパティを更新する必要があります。 したがって、このコントロールの種類-先行検索機能を使用してはずの一覧で名前に一致する名前を入力し、Enter キーを押しますを後に、 SelectedItem プロパティは更新されたことです。 さらに、DBCombo 内のテキストは、検出された一致するエントリを反映する必要があります。 ただし、Visual Basic 6. 0 で、標準のデータバインド コンボと組み込みのデータ コントロールの出荷を使用してこの機能は動作しません。

問題の再現手順

  1. 新しい標準 EXE プロジェクトを作成します。 デフォルトで Form1 が作成されます。
  2. [ プロジェクト ] メニューの [ コンポーネント ] をクリックし、 6. データ連結リスト コントロール 0 ] チェック ボックスの [ OK] をクリック します。
  3. Form1 に、DBCombo1、データバインド コンボを追加します。
  4. [テキスト 1] 〜 [テキストとテキスト 2、テキスト ボックス (TextBox) コントロールのコントロールが 2 つ追加します。
  5. Data1 データ コントロールを追加します。
  6. 次のように、これらのコントロールのプロパティの設定を設定します。
    Data1 - データ コントロール
    ' (データベース名) ' Biblio.mdb =
    "RowSource/値集合ソース"作成者 =
    読み取り専用 = True

    テキスト 2 - テキスト ボックス (TextBox) コントロールのコントロール
    データ ソース Data1 =
    データ フィールド = 作成者
    表示 = False の場合

    DBCombo1 - データバインド コンボ コントロール
    "RowSource/値集合ソース"Data1 =
    ListField 作成者 =
  7. 次のコードを Form1 の一般宣言セクションに追加:
    Option Explicit
    
    Private Const UP_ARROW = 38
    Private Const DOWN_ARROW = 40
        
    Private Sub Data1_Reposition()
       '
       ' Copy Text from Bound Text2 to Unbound Text1.
       Text1.Text = Text2.Text
    End Sub
        
    Private Sub DBCombo1_KeyUp(KeyCode As Integer, Shift As Integer)
       Dim bmk As Variant
       Dim x As Integer
       Dim msg As String
    
       On Error GoTo ErrHandler
       '
       ' Save Bookmark on CR and Arrow Key Activity.
       Select Case KeyCode
          Case Asc(vbCr), UP_ARROW, DOWN_ARROW
              msg = "DBCombo1.SelectedItem has the value "
              bmk = DBCombo1.SelectedItem
              ' The next line raises error 13 if bmk has no value.
              For x = 0 To UBound(bmk)
                  msg = msg & bmk(x)
              Next x
              Data1.Recordset.Bookmark = bmk
              Debug.Print msg
       End Select
       Exit Sub
                
    ErrHandler:
       If Err.Number = 13 Then   ' Type mismatch
          Debug.Print "DBCombo1.SelectedItem is not assigned a value."
       Else
          MsgBox "Error " & Err.Number & ": " & Err.Description, vbCritical _
             + vbOKOnly
       End If
    End Sub
    
    Private Sub Form_Load()
       Text1.Text = ""
       DBCombo1.Text = ""
    End Sub
    					
  8. プロジェクトを実行し、連結 DBCombo コントロール ( Curry デイブ ) などのエントリに一致する名前を入力します。
  9. Enter キーを押します。 DBCombo1.SelectedItem プロパティが更新されないことを確認します。
  10. DBCombo 中、テキストをクリアし、 Wellin Paul ) のようなリストのエントリに一致する名前を入力します。
  11. ↑ キーまたは ↓ キーを押します。 "Wellin、Paul"の DBCombo1.SelectedItem が、ブックマークと更新されることを確認します。

プロパティ

文書番号: 281940 - 最終更新日: 2014年2月24日 - リビジョン: 3.2
この資料は以下の製品について記述したものです。
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 6.0 Learning Edition
キーワード:?
kbnosurvey kbarchive kbbug kbcodesnippet kbprb kbctrl kbpending kbmt KB281940 KbMtja
機械翻訳の免責
重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。
英語版 KB:281940
Microsoft Knowledge Base の免責: Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com