Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
ComboBox2.Items.Clear()
If ComboBox1.Text = "Application Down" Then
ComboBox2.Items.Add("Application Down (CX)")
ComboBox2.Items.Add("Application Down (Other)")
ElseIf ComboBox1.Text = "Auto Release" Then
ComboBox2.Items.Add("Auto Release (Not Working)")
ElseIf ComboBox1.Text = "Basic Services" Then
ComboBox2.Items.Add("Basic Service (Add)")
ComboBox2.Items.Add("Basic Service (Cancel)")
ComboBox2.Items.Add("Basic Service (Check)")
ElseIf ComboBox1.Text = "Bills" Then
ComboBox2.Items.Add("Bill Notification")
ElseIf ComboBox1.Text = "Call Me 505" Then
ComboBox2.Items.Add("Call Me Back (Delay)")
ComboBox2.Items.Add("Call Me Back (Not Working)")
ElseIf ComboBox1.Text = "Change Ownership" Then
ComboBox2.Items.Add("Change Ownership (Bill Generation) ")
ComboBox2.Items.Add("Change Ownership (Pending)")
ElseIf ComboBox1.Text = "Creation in IN" Then
ComboBox2.Items.Add("Create in IN ")
ElseIf ComboBox1.Text = "Failure Recharge" Then
ComboBox2.Items.Add("Failure Recharge (Manual Recharge) ")
ComboBox2.Items.Add("Failure Recharge (Usage Requested Card) ")
ElseIf ComboBox1.Text = "International Access" Then
ComboBox2.Items.Add("International Access (Add) ")
ComboBox2.Items.Add("International Access (Check) ")
ElseIf ComboBox1.Text = "Lost Units/Days" Then
ComboBox2.Items.Add("Lost Days ")
ComboBox2.Items.Add("Lost Units ")
ElseIf ComboBox1.Text = "Missing PUK" Then
ComboBox2.Items.Add("Missing PUK ")
ElseIf ComboBox1.Text = "Payment via Cards" Then
ComboBox2.Items.Add("Payment via Cards (Pending) ")
ElseIf ComboBox1.Text = "Promotion" Then
ComboBox2.Items.Add("Promotion (Dormant Offer) ")
ComboBox2.Items.Add("Promotion (Extra Days Offer) ")
ComboBox2.Items.Add("Promotion (Other) ")
ElseIf ComboBox1.Text = "Promotional Broadcasts" Then
ComboBox2.Items.Add("Promotional Broadcasts (Activate English) ")
ComboBox2.Items.Add("Promotional Broadcasts (Activate) ")
ComboBox2.Items.Add("Promotional Broadcasts (Stop) ")
ElseIf ComboBox1.Text = "Rannaty" Then
ComboBox2.Items.Add("Rannaty (Not Applied Tone) ")
ComboBox2.Items.Add("Rannaty (Got Different Tone) ")
ComboBox2.Items.Add("Rannaty (Service Code not Accessible) ")
ComboBox2.Items.Add("Rannaty (Silent Tone ")
ElseIf ComboBox1.Text = "SIM Change" Then
ComboBox2.Items.Add("SIM Change (Pending) ")
ElseIf ComboBox1.Text = "Suspension" Then
ComboBox2.Items.Add("Suspension (Other) ")
ComboBox2.Items.Add("Suspension (Over 30/90 Days) ")
ElseIf ComboBox1.Text = "Transfer from Pre to Post" Then
ComboBox2.Items.Add("Transfer from Pre to Post (Pending) ")
ElseIf ComboBox1.Text = "VAS Services" Then
ComboBox2.Items.Add("VAS Service (Cancel) ")
ComboBox2.Items.Add("VAS Service (Check) ")
ComboBox2.Items.Add("VAS Service (Double Charge) ")
ElseIf ComboBox1.Text = "Voice Mail" Then
ComboBox2.Items.Add("Voice Mail (Change Language) ")
ElseIf ComboBox1.Text = "Wrong Provider" Then
ComboBox2.Items.Add("Wrong Provider (Consumed 80 Units) ")
ElseIf ComboBox1.Text = "Wrong Transfer" Then
ComboBox2.Items.Add("Wrong Transfer (By Mistake) ")
ElseIf ComboBox1.Text = "Y & P Package 444" Then
ComboBox2.Items.Add("Yalla/Belques Change PK (Called 444) ")
ComboBox2.Items.Add("Yalla/Belques Change PK (Sent SMS to 444) ")
End If
ComboBox2.SelectedIndex = 0
End Sub