Инвентаризация нескольких форм (доставка)
Я делаю программу инвентаризации. У меня проблемы с настройкой альтернативной формы для доставки инвентаря.
Я думал, что мой код ниже будет принимать введенный номер пользователем, вычесть его из числа, хранящегося в массиве, а затем сохранить новый номер в массиве.
Любые ресурсы, которые вы знаете в Интернете, будут великолепны.
Public Class Ship
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
If VBProj2.cbInventory.SelectedIndex <> -1 Then
'VBProj2.cbInventory.Items.RemoveAt(VBProj2.cbInventory.SelectedIndex)
VBProj2.txtQuantity.Clear()
Dim intX As Integer = VBProj2.cbInventory.Items.Count
If txtQuantityNew.Text <= 200 Then
VBProj2.iquantity(intX) = txtQuantityNew.Text - VBProj2.iquantity(intX)
MessageBox.Show(VBProj2.iquantity(intX))
VBProj2.cbInventory.SelectedIndex = VBProj2.cbInventory.Items.Count - 1
Else
MessageBox.Show("Please only ship 200 or less")
End If
Me.Close()
Else
MessageBox.Show("Something fed up")
End If
End Sub
End Class
1 ответ
Решение
В вашем коде здесь
VBProj2.iquantity(intX) = txtQuantityNew.Text - VBProj2.iquantity(intX)
Вы фактически вычитаете начальное количество из нового количества, в противоположность тому, как вы сказали, что хотите это сделать, что будет
VBProj2.iquantity(intX) = VBProj2.iquantity(intX) - val(txtQuantityNew.Text)