For Each row In Item_Get(42, returnno)
Dim barcode As String = Item_Get(42, returnno)
Dim wh, sa, bo As Integer
wh = Stat_Get(0, barcode)
sa = Stat_Get(1, barcode)
bo = Stat_Get(2, barcode)
chk = Stock_Chk(0, barcode)
If chk = True Then
Stock_Update(barcode, wh, sa, bo)
Else
Stock_Save(barcode, wh, sa, bo)
End If
Next
item_get(42, returno)
查询是“从 tblreturn 选择条形码作为 str,其中 status = '1' 且 returnno = @chk”
问题是它没有循环整个返回的结果。有人能帮我一下吗 ?
最佳答案
在 For
循环中,您不应从 Item_Get(42, returnno) 获取数据
而是来自 row
。这意味着类似 Dim Barcode As String = row.item(0)
关于mysql - mysql select 查询的循环,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/47482528/