这次真的解决了。重新动态绑定了一次pictureview到table。然后就会刷新了。谢谢大家~
Dim Result1 As DialogResult
Result1 = MessageBox.Show("已经拍过照,是否再拍一次?", "拍照提示", MessageBoxButtons.YesNo, MessageBoxIcon.Information,MessageBoxDefaultButton.Button2)
If Result1 = DialogResult.Yes Then
c.capture() '开始照相
For Each r As Row In Tables("查询_Table1").Rows
r("照片") = r("订单编号") & ".jpg"
Next
c.save(ProjectPath & "Parcelimages\" & Tables("查询_Table1").Current("订单编号") & ".jpg" ) '保存文件
e.Form.controls("ppv").BindingField = "查询_Table1.照片"
Else If Result1 = DialogResult.No Then
Return
End If
[此贴子已经被作者于2014-3-3 12:19:35编辑过]