2013-07-26 43 views
0

我对VB很陌生。我试图在输入框后插入新记录(事件触发是按钮单击)。我已经得到这个工作正常,它更新SQL服务器。Visual Basic输入框循环错误

我然后试图添加一个循环,用一个简单的vbYesNo消息框,与vbYes触发循环。它不工作,无论您单击是或否,它都会循环。

我希望它会(按是的),提示两个条形码,然后它会插入新的记录。但是,当我刚刚添加它时,我收到一条错误消息,说“此行已属于此表”。

任何帮助?

下面的代码:

Do While vbYes 
     TrackCode = InputBox("Please Scan Shipment Barcode") 
     NewRecord(5) = TrackCode 
     NewRecord(0) = Ddate 
     UnqCode = InputBox("Please Scan Parcel Barcode (eg JD123456789)") 
     NewRecord(6) = UnqCode 
     DtTable.Rows.Add(NewRecord) 
     NewRecord.AcceptChanges() 
     DtTable.AcceptChanges() 
     TableAdapterManager.UpdateAll(trackingDataSet) 
     MsgBox("Do You Have Anything Else To Scan?", vbYesNo) 
Loop 

很抱歉,如果这件事情简单。同样所有的AcceptChanges()都是由于我试图弄清楚。

谢谢。

+0

它看起来像你试图一遍又一遍地添加同一行。 –

+0

是的,我想要做的是每次点击yes时添加新行,而不是编辑同一行。 – Dan

+0

那么为什么它在循环?循环的退出条件是什么? –

回答

1

假设DtTable是一个DataTable和NewRecord是一个DataRow,尝试加入环内的第一行:

NewRecord = DtTable.NewRow() 

这将在每个迭代上创建一个新的数据行。

+0

谢谢,这是有效的。现在我只需要解决循环问题。我知道这将是一件简单的事情,虽然 - – Dan