Question

在我的应用程序中，我执行了2个任务：

显示cmbrno_click()
显示cmbfulnm_lostfocus()

cmbrno的样式设置为2下拉列表。

Private Sub CmbFulNM_LostFocus()
  RES.Open "student_record_database",CON,adOpenDynamic,adLockOptimistic,adCmdTable

  For i = 0 To RES.RecordCount - 1
    CmbRNO.Text = RES!ROLLNO 'at this line control goes to the cmbrno_click event which is having same part of coding and executes that also.
    TxtFNM.Text = RES!FIRST_NAME 'error like: item not fount in corresponding ordinal
    TxtMIDNM.Text = RES!MIDDLE_NAME
    TxtLNM.Text = RES!LAST_NAME
    TxtADDR.Text = RES!ADDRESS
    COMBO1.Text = RES!GRADE
    CmbDiv.Text = RES!DIV
    CmbBG.Text = RES!BLOOD_GROUP

    If CmbRNO.ListCount > 0 Then CmbRNO.ListIndex = i
  Next i
  RES.Close
End Sub

Answer 1

这一切都相当混乱。这篇文章的主题是：“如何设置与全名相对应的组合的列表索引？” 但是，代码中的（C）注释是：“//错误如：item not fount in related ordinal。”。您必须提供完全错误消息，而不是您认为它“喜欢”的消息。

TxtFNM真的是一个文本框吗？您应该描述这些控件是什么，以及如何初始化这些控件。

使用通灵调试，您的问题可能是您没有正确拼写字段名称。它真的是“FIRST_NAME”吗？

另一方面，我注意到你正在循环遍历多个记录，将每个字段复制到相同的控件中。由于没有MoveNext，因此该代码将始终返回第一条记录，而不管记录的nubmer。但是，由于紧接在“Next i”之前的行，您可能会在循环开始时使用 i 添加的项目覆盖cmbRNO的选择。

也许你应该在这里说明你想做什么。 “[2]显示cmbfulnm_lostfocus（）上的所有值”不是很精确。

如何设置与fullname对应的组合的listindex？

1 个答案: