我有一个使用如下循环的vb.net应用程序:
While Not EOF(0)
If value = value2 Then
..execute code here
Else
'display error
MsgBox("Not Found")
End If
End While
这基本上是通过文件和数据库中的匹配数据循环。如果找不到匹配项,那么MsgBox会出错,所以当显示我希望能够将必要的行添加到我的数据库中然后关闭消息框并重新运行代码而不是整个循环而只是那个失败了
答案 0 :(得分:0)
也许你可以做类似
的事情While Not EOF(0)
If value = value2 Then
..execute code here
Else
'display error
new_value = InputBox("Insert new value", "Not Found", value)
'here your code, where you can try to update the table row with new value
End If
End While
InputBox将暂停您的循环并在提交后继续。