Pytanie Combobox generowanie tekstu

Witam.

Pytanie skierowane do osób dobrze znających Visual Basic.

To ma być mój taki mały program do generowania tekstów. Generalnie chodzi o to.

Jak zrobić by program generował teksty które posiadam po kliknięciu przycisku generate.

Ma to mniej więcej wyglądać tak wybieramy Text1 lub Text2 (zależy którą opcję ludzie będą potrzebowali) Następnie w combobox Opcje1, Opcje2 lub inną. i np jak wybiorą Opcję1 będa mieli w textbox "aaaaaa" "bbbbb" a jeśli wybiorą Opcję2 to textbox wyświetli "ccccc" "dddddd"

Niżej zdjęcie by zrozumieć jak to wygląda

Mam nadzieję że w miarę jasno wytłumaczyłem. 

 łap kawałek kodu, zrobione na szybko
 

Public Class Form1    Dim g1 As String    Dim g2 As String    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        g1 = ComboBox1.SelectedItem        g2 = ComboBox2.SelectedItem        If (g1 = "" Or g2 = "") Then            MsgBox("nie wybrano nic z opcj1 i opcji2")        Else            TextBox1.Text += vbCrLf & "Opcja1: " & g1 & vbCrLf & "Opcja2: " & g2        End If    End SubEnd Class

eXu, nie do końca o to chodziło  
 

Pokaże CI to na takim "schemacie"

Wybierasz z Choose Opcja1 klikasz Generate wyświetla Ci się np. Skrypty do COD 4

Wybierasz z Choose Opcja2 klikasz Generate wyświetla CI się np. Skrypty do Wolfenstein ET

i wtedy sobie ktoś przewija textbox i szuka jaki skrypt do configu mu potrzebny 

już zrobiłem   
Napiszę rozwiązanie jakby ktoś miał podobny problem

Public Class Form1Dim s1 As String = "Wyświetlany skrypt1" ' Opcja1Dim s2 As String = "Wyświetlany skrypt2" ' Opcja2Dim s3 As String = "Wyświetlany skrypt3" ' Opcja3Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click        If ComboBox1.SelectedItem = "Opcja1" Then            TextBox1.Text = "" & s1 & ""        End If        If ComboBox1.SelectedItem = "Opcja2" Then            TextBox1.Text = "" & s2 & ""        End If        If ComboBox1.SelectedItem = "Opcja3" Then            TextBox1.Text = "" & s3 & ""        End If    End SubEnd class