Chyba: Vlastnost DBCombo SelectedItem není aktualizována při zadání výběr

Překlady článku Překlady článku
ID článku: 281940 - Produkty, které se vztahují k tomuto článku.
Tento článek byl archivován. Je nabízen v takovém stavu, v jakém je, a nebude již nadále aktualizován.
Rozbalit všechny záložky | Minimalizovat všechny záložky

Na této stránce

Příznaky

Při použití napřed typ hledání funkce řízení DBCombo z DBList32.ocx vlastnost SelectedItem není aktualizován a DBCombo odrážet odpovídající položka, která je nalezena.

Řešení

Společnost Microsoft má nyní k dispozici podporovanou opravu, která je určena pouze k odstranění problému popsaného v tomto článku. Použijte ji pouze v počítačích, ve kterých dochází k tomuto konkrétnímu problému. Tato oprava pravděpodobně projde dalším testováním. Doporučuje proto, pokud není použití tento problém, společnost Microsoft počkat na další aktualizaci service pack pro Visual Studio, která obsahuje tuto opravu.

Potřebujete-li odstranit tento problém okamžitě, obraťte se na služby technické podpory společnosti Microsoft, kde můžete tuto opravu získat. Úplný seznam telefonních čísel podpory pro produkty společnosti Microsoft a informace o cenách podpory naleznete na následujícím webu společnosti Microsoft:
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
Poznámka: ve zvláštních případech mohou být poplatky, které jsou třeba obvykle zaplatit za telefonní hovory stornovány, jestliže Microsoft pracovník Určuje, že konkrétní aktualizace vyřeší váš problém. Další dotazy a žádosti o podporu, které se netýkají konkrétní aktualizace, podléhají běžným sazbám za poskytnutí podpory.

Poznámka: je třeba mít licenční smlouvy Visual Studio, chcete-li získat tuto opravu.

Prohlášení

Společnost Microsoft potvrzuje, že se jedná o chybu v Microsoft produktů uvedených na začátku tohoto článku.

Další informace

Vyberte položku v seznamu část DBCombo ovládací prvek, obsahuje vlastnost SelectedItem záložky můžete přemístit vybraného záznamu Recordset ovládací prvek dat, která určuje vlastnosti Zdroj řádků. Tato vlastnost by měl být aktualizován, zda uživatel používá myši nebo klávesnice vyberte položku. Proto při použití napřed typ hledání funkce tohoto ovládacího prvku očekáváte, že je vlastnost SelectedItem aktualizovány po zadejte název, který odpovídá názvu v seznamu a stiskněte klávesu ENTER. Text v DBCombo navíc by měl odrážet odpovídající položka, která je nalezena. Tato funkce však není funkční při použití standardního Combo vazeb na data a řízení vnitřních dat dodané s Visual Basic 6.0.

Kroky pro reprodukci chování

  1. Vytvořit nový projekt standardní EXE. Jako výchozí je vytvořen formulář Form1.
  2. Z nabídky projektu klepněte na tlačítko součásti, zaškrtněte políčko 6.0 Controls vázaný seznam dat a klepněte na tlačítko OK.
  3. Přidat se seznamem vazeb na data, DBCombo1, Form1.
  4. Přidat dva prvky TextBox Text1 a Text2.
  5. Přidání ovládacího prvku dat parametru Data1.
  6. Nastavení vlastností těchto prvků nakonfigurovat následujícím způsobem:
    Parametru Data1 - ovládací prvek dat
    Název databáze = Biblio.mdb
    Zdroj řádků = autoři
    ReadOnly = TRUE

    Ovládací prvky TextBox text2
    DataSource = parametrů Data1
    DataField = Autor
    Viditelné = False

    DBCombo1 - Combo datové vazby ovládacího prvku
    Zdroj řádků = parametrů Data1
    ListField = Autor
  7. Přidejte následující kód obecné deklarační sekci 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. Spustit projektu a zadejte název, který odpovídá položce v vázaný ovládací prvek DBCombo (například Curry Dave).
  9. Stiskněte klávesu ENTER. Všimněte si, že vlastnost DBCombo1.SelectedItem není aktualizován.
  10. Zrušte v DBCombo textu a zadejte název, který odpovídá položce v seznamu (například Wellin Paula).
  11. Stiskněte klávesu Šipka nahoru nebo Šipka dolů. Všimněte si, že DBCombo1.SelectedItem aktualizovány záložkou pro "Wellin Paula".

Vlastnosti

ID článku: 281940 - Poslední aktualizace: 28. února 2014 - Revize: 3.2
Informace v tomto článku jsou určeny pro produkt:
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 6.0 Learning Edition
Klíčová slova: 
kbnosurvey kbarchive kbmt kbbug kbcodesnippet kbctrl kbpending kbprb KB281940 KbMtcs
Strojově přeložený článek
Důležité: Tento článek byl přeložen pomocí software společnosti Microsoft na strojový překlad, ne profesionálním překladatelem. Společnost Microsoft nabízí jak články přeložené překladatelem, tak články přeložené pomocí software na strojový překlad, takže všechny články ve Znalostní databázi (Knowledge Base) jsou dostupné v češtině. Překlad pomocí software na strojový překlad ale není bohužel vždy dokonalý. Obsahuje chyby ve skloňování slov, skladbě vět, nebo gramatice, podobně jako když cizinci dělají chyby při mluvení v češtině. Společnost Microsoft není právně zodpovědná za nepřesnosti, chyby nebo škody vzniklé chybami v překladu, nebo při použití nepřesně přeložených instrukcí v článku zákazníkem. Společnost Microsoft aktualizuje software na strojový překlad, aby byl počet chyb omezen na minimum.
Projděte si také anglickou verzi článku:281940

Dejte nám zpětnou vazbu

 

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