Pytanie Problem reactor theme + kodowanie

Witam używam Reactor Theme przy tworzeniu mojego keygena - Bez użycia tego thema jestem święcie przekonany, że wszystkie moje dotychczasowe komendy są w porządku.. Chciałem zobaczyć czy to co wklepuje w kod rzeczywiście działa. Przechodząc do rzeczy nie wiem jakim cudem coś jest nie tak gdy  zdebugowałem swój keygen i użyłem funkcji reset wyskoczył następujący błąd. Pojawił się on w kodzie Theme. " Throw New NotImplementedException"

O to kod.

Public Class Form1    Private Sub ReactorButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReactorButton1.Click        If ReactorRadioButton1.Checked = False And            ReactorRadioButton2.Checked = False And            ReactorRadioButton3.Checked = False Then            MessageBox.Show("Select Platform", "Error")        Else            Timer1.Start()            ReactorProgressBar1.Value = ReactorProgressBar1.Minimum            If ReactorRadioButton1.Checked Then                ReactorRadioButton2.Enabled = False And                    ReactorRadioButton3.Enabled = False            End If            If ReactorRadioButton2.Checked Then                ReactorRadioButton1.Enabled = False And                    ReactorRadioButton3.Enabled = False            End If            If ReactorRadioButton3.Checked Then                ReactorRadioButton1.Enabled = False And                    ReactorRadioButton2.Enabled = False            End If        End If    End Sub    Private Sub ReactorButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReactorButton2.Click        End    End Sub    Private Sub ReactorButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReactorButton3.Click        ReactorProgressBar1.Value = ReactorProgressBar1.Minimum        If ReactorRadioButton1.Checked Then            ReactorRadioButton2.Enabled = True And                ReactorRadioButton3.Enabled = True        End If        If ReactorRadioButton2.Checked Then            ReactorRadioButton1.Enabled = True And                ReactorRadioButton3.Enabled = True        End If        If ReactorRadioButton3.Checked Then            ReactorRadioButton1.Enabled = True And                ReactorRadioButton2.Enabled = True        End If    End Sub    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Timer1.Tick        ReactorProgressBar1.Increment(1)        If ReactorProgressBar1.Value = ReactorProgressBar1.Maximum Then            Timer1.Stop()            MessageBox.Show("Key Generated !", "Succes !")        End If        If ReactorRadioButton1.Checked Thenlosowanie_klucza:            Dim AA As Double = Int(Rnd() * 9999)            Dim BB As Double = Int(Rnd() * 9999)            Dim CC As Double = Int(Rnd() * 9999)            Dim DD As Double = Int(Rnd() * 9999)            Dim EE As Double = Int(Rnd() * 9999)            If AA > 1 And BB > 1 And CC > 1 And DD > 1 And EE > 1 Then                If AA + BB + CC + DD + EE = 35560 Then                    Dim klucz As String = "Your Key: " & AA & "-" & BB & "-" & CC & "-" & DD & "-" & EE                    klucz = klucz.Replace("2", "G")                    klucz = klucz.Replace("4", "Z")                    klucz = klucz.Replace("6", "S")                    klucz = klucz.Replace("8", "N")                    ReactorTextBox1.Text = klucz                    Exit Sub                Else                    GoTo losowanie_klucza                End If            Else                GoTo losowanie_klucza            End If        End If        ReactorProgressBar1.Increment(1)        If ReactorProgressBar1.Value = ReactorProgressBar1.Maximum Then            Timer1.Stop()        End If        If ReactorRadioButton2.Checked Thenlosowanie_klucza2:            Dim AA As Double = Int(Rnd() * 9999)            Dim BB As Double = Int(Rnd() * 9999)            Dim CC As Double = Int(Rnd() * 9999)            Dim DD As Double = Int(Rnd() * 9999)            Dim EE As Double = Int(Rnd() * 9999)            If AA > 1 And BB > 1 And CC > 1 And DD > 1 And EE > 1 Then                If AA + BB + CC + DD + EE = 35560 Then                    Dim klucz2 As String = "Your Key: " & AA & "-" & BB & "-" & CC & "-" & DD & "-" & EE                    klucz2 = klucz2.Replace("3", "F")                    klucz2 = klucz2.Replace("4", "Z")                    klucz2 = klucz2.Replace("5", "T")                    klucz2 = klucz2.Replace("8", "N")                    ReactorTextBox1.Text = klucz2                    Exit Sub                Else                    GoTo losowanie_klucza2                End If            Else                GoTo losowanie_klucza2            End If        End If        ReactorProgressBar1.Increment(1)        If ReactorProgressBar1.Value = ReactorProgressBar1.Maximum Then            Timer1.Stop()        End If        If ReactorRadioButton3.Checked Thenlosowanie_klucza3:            Dim AA As Double = Int(Rnd() * 9999)            Dim BB As Double = Int(Rnd() * 9999)            Dim CC As Double = Int(Rnd() * 9999)            Dim DD As Double = Int(Rnd() * 9999)            Dim EE As Double = Int(Rnd() * 9999)            If AA > 1 And BB > 1 And CC > 1 And DD > 1 And EE > 1 Then                If AA + BB + CC + DD + EE = 35560 Then                    Dim klucz3 As String = "Your Key: " & AA & "-" & BB & "-" & CC & "-" & DD & "-" & EE                    klucz3 = klucz3.Replace("5", "B")                    klucz3 = klucz3.Replace("4", "Z")                    klucz3 = klucz3.Replace("3", "L")                    klucz3 = klucz3.Replace("8", "N")                    ReactorTextBox1.Text = klucz3                    Exit Sub                Else                    GoTo losowanie_klucza3                End If            Else                GoTo losowanie_klucza3            End If        End If        Label1.Text = ReactorProgressBar1.Value & " %"    End SubEnd Class

Co robię źle? VB w kodzie nie widzi błędu, lecz widzi go theme jakieś rady?

theme pewnie nie obsluguje danej opcji:) takie uroki uzywania theme ..

Ahh masakryczne, a wszystko mi podpasowało graficznie byłem zadowolony z  materiału wziąłem się za kodowanie a tu taka lipa, no nic dzięki wielkie... Po testach różnych kodu doszedłem do momentu w którym kłopot pojawił się tylko z progressbarem, który nie chciał działać ale chyba nie ma na to już rozwiązania. Jeszcze raz dzięki za odpowiedź.

Pozdrawiam.