更新:
所以我能够取得一些进展,我让这段代码可以工作......我在评估 FOUND 条件时遇到了困难,所以将它包装在 For 循环中,你们都觉得怎么样?
Dim ControlRow = NewBenefitsDataSet.Tables("FO_HealthcateHighways_Control").Select("NGID = 'HCHRXMEDTIP'")
For Each Row As DataRow In ControlRow
Do
'Check if Already Processed, if so skip to next record
If Row("NGID") = "HCHRXMEDTIP" Then
MessageBox.Show("FOUND: " + Row("NGID"))
Exit Do
Else
MessageBox.Show("GROUP NOT FOUND: " + Row("NGID"))
Return False
End If
Loop
Next
Run Code Online (Sandbox Code Playgroud)
首先,我喜欢这个社区,并且在从 Visual Foxpro 过渡到 VB 的过程中,我一直在努力尝试获得正确的语法。无论我进行多少搜索,我都会看到十几种不同的变体和示例,但发现很难找到适合我正在做的事情的神奇组合。
非常简单,我的数据集和适配器已经在我的 Form.XSD 中设置,并在我的 Code.VB 中设置,我想查询记录,但不确定如何正确编码......
我在这里做错了什么?再次提前致谢。
Dim dtControl As NewBenefitsDataSet.FO_HealthcateHighways_ControlDataTable
Dim drControl As NewBenefitsDataSet.FO_HealthcateHighways_ControlRow
Dim daControlTableAdapter As New NewBenefitsDataSetTableAdapters.FO_HealthcateHighways_ControlTableAdapter
'Fill …Run Code Online (Sandbox Code Playgroud)