Private Sub ProductCatalogueByNumber_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProductCatalogueByNumber.SelectedIndexChanged items.item.(productcataloguebynumber.SelectedItem End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click ' If ProductCatalogueByNumber.Select = True Then ' Then ' End If End Sub Private Sub ShoppingKart_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ShoppingKart.SelectedIndexChanged End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click productSelect.x = items.item.(productcataloguebynumber.SelectedItem) Inputbox("Please Enter The Amount You Want to Purchase ","Amount Of Products" End Sub
Mod Edit: Please use code tags when posting your code. Code tags are used like so =>

Thanks,
PsychoCoder
