Visual Basic Code , VB.NET Code, VB Code
  Home   :  Code   :  Forums   :  Submit   :  Mailing List   :  About   :  Contact
A1VBCode Forums
Home      Members   Calendar   Who's On
Welcome Guest ( Login | Register )
      

Home » .NET Programming » Visual Basic .NET/2005/2008 » I NEED SOME URGENT HELP WITH MY VB.NET CODE


I NEED SOME URGENT HELP WITH MY VB.NET CODEExpand / Collapse
Author
Message
Posted 10/8/2008 10:56:31 PM
Forum Newbie

Forum NewbieForum NewbieForum NewbieForum NewbieForum NewbieForum NewbieForum NewbieForum Newbie

Group: Forum Members
Last Login: 10/9/2008 1:16:32 AM
Posts: 1, Visits: 5
CAN SOMEONE PLEASE HELP ME WITH THIS CODE FOR VB.NET? I AM WORKING ON THIS CODE TO USE 3 LIST BOXES OR COMBO BOXES THAT THE USER CAN'T TYPE ANY INFO IN. I HAVE TO STORE THE DESCRIPTIONS OF THE PACKAGES IN COSTANTS (STRINGS) AND CLEAR THE LISTS FOR HTE EXTERIOR AND INTERIOR FOR REACH ORDER AND ADD NEW ITEMS TO THE LISTS EACH TIME THE USER MAKES A SELECTION FROM THE PACKAGE LIST.  hERE IS THE CODE THAT I HAVE SO FAR:

Public Class Form1

    Private Sub lstWashType_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lstWashType.SelectedIndexChanged
        Select Case lstWashType.SelectedIndex
            Case Is = 0
                'Standard was selected

                With lstInterior.Items
                    .Clear()
                    .Add("Fragrance")
                End With
                cboFragranceType.SelectedIndex = -1
            Case Is = 1
                'Deluxe was selected
                With lstInterior.Items
                    .Clear()
                    .Add("Fragrance")
                    .Add("Shampoo Carpets")
                    cboFragranceType.SelectedIndex = -1
                End With
            Case Is = 2
                'Executive was selected
                With lstInterior.Items
                    .Clear()
                    .Add("Fragrance")
                    .Add("Shampoo Carpets")
                    .Add("Interior Protection Coat")
                    cboFragranceType.SelectedIndex = -1
                End With
            Case Is = 3
                'Luxury was selected
                With lstInterior.Items
                    .Clear()
                    .Add("Fragrance")
                    .Add("Shampoo Carpets")
                    .Add("Shampoo Upholstery")
                    .Add("Scotch Guard")
                    cboFragranceType.SelectedIndex = -1
                End With
        End Select
    End Sub

    Public Sub New()

        ' This call is required by the Windows Form Designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.

    End Sub
End Class

CAN SOMEONE PLEASE RESPOND ASAP?

THANKS,

CASSANDRA

Post #25942
Posted 10/9/2008 3:11:39 PM
Junior Member

Junior MemberJunior MemberJunior MemberJunior MemberJunior MemberJunior MemberJunior MemberJunior Member

Group: Forum Members
Last Login: Today @ 10:42:19 AM
Posts: 13, Visits: 11
What is your question what is the code doing or not doing?

Vb.net 2005, Teradata, Sql Server 2005, mainframe automation
Post #25949
« Prev Topic | Next Topic »


Reading This TopicExpand / Collapse
Active Users: 1 (1 guest, 0 members, 0 anonymous members)
No members currently viewing this topic.
Forum Moderators: Brian, Peter

PermissionsExpand / Collapse

All times are GMT -5:00, Time now is 10:44am