Connecting Textboxes in project linked to Access Database

[zerotoleranc]

OK guys

 

Here is a summary of my problem. I have been trying for a few days now to get Text from a listbox that is connected to a field in an Access Database Table and put it in an array. It says that the value is String and it is looking for an Integer. any suggestions?? HELP.

 

here is the code:

 

Dim Sales(100, 4) As String

Dim R As String

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

 

OleDbDataAdapter1.Fill(DataSet21)

QtyTextBox.Text = ""

 

End Sub

 

 

 

 

Private Sub addButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles addButton.Click

Dim wk1 As String

Sales(R, 0) = QtyTextBox.Text

 

Sales(R, 1) = DescListBox.Items(DescListBox.SelectedIndex).ToString()

^^^^^Here is where I am haveing the problem^^^^^^^

 

wk1 = DescListBox.Items(DescListBox.SelectedIndex).ToString()

 

Sales(R, 2) = priceTextBox.Text

Sales(R, 3) = Integer.Parse(Sales(R, 0)) * Decimal.Parse(Sales(R, 2))

 

' R = R + 1

 

End Sub

 

 

 

 

Private Sub viewButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles viewButton.Click

Dim R1 As Integer

Dim item As String

item = Sales(R1, 0) & ControlChars.NewLine & Sales(R1, 1) & ControlChars.NewLine & Sales(R1, 2) & ControlChars.NewLine & Sales(R1, 3)

 

 

'For R1 = 0 To R

ListBox1.Items.Add(item)

' Next

End Sub

[zerotoleranc]

ok, here it is 11 hours later and I have figured it out. I replace the line with the error to read...

 

Sales(R, 1) = DescListBox.GetItemText(DescListBox.SelectedItem)

 

yea, I know it was probably simple but, It works and I'm happy