Ошибка в расчете в программе - VB

Формулировка задачи:

Здравствуйте! Столкнулся с проблемой при расчете в программе. После нажатия на кнопку выбивает ошибку и расчет не происходит. Подскажите, где у меня ошибки. Внешний вид программы: Код программы:

    Private Sub buttonOK_Click(sender As Object, e As EventArgs) Handles buttonOK.Click
        Dim T, mu, Stepen, SiO2, ZrO2, B2O3, Al2O3, Li2O, Na2O, K2O, MgO, CaO, SrO, BaO, ZnO As Single
        SiO2 = Convert.ToSingle(txtSiO2.Text)
        ZrO2 = Convert.ToSingle(txtZrO2.Text)
        B2O3 = Convert.ToSingle(txtB2O3.Text)
        Al2O3 = Convert.ToSingle(txtAl2O3.Text)
        Li2O = Convert.ToSingle(txtLi2O.Text)
        Na2O = Convert.ToSingle(txtNa2O.Text)
        K2O = Convert.ToSingle(txtK2O.Text)
        MgO = Convert.ToSingle(txtMgO.Text)
        CaO = Convert.ToSingle(txtCaO.Text)
        SrO = Convert.ToSingle(txtSrO.Text)
        BaO = Convert.ToSingle(txtBaO.Text)
        ZnO = Convert.ToSingle(txtZnO.Text)
        mu = Convert.ToSingle(txtMu.Text)
        Stepen = Convert.ToSingle(txtMu.Text)
        T = (10026) / ((Math.Log10(mu ^ Stepen) + 9.62 - (SiO2 * 7.49 + ZrO2 * 11.17 + B2O3 * 1.85 + Al2O3 * 18.42 + Li2O * (-2.11) + Na2O * (-0.05) + K2O * 1.37 + MgO * 4.59 + CaO * 0.69 + SrO * 1.68 + BaO * (-0.14) + ZnO * (-2.96))))
        txtAnswer.Text = "T= " + T.ToString
    End Sub

Ввод данных: Ошибка: Формула для расчета:

Решение задачи: «Ошибка в расчете в программе»

textual
                            Листинг программы 
                        

                                Private Function MySng(ByVal s As String) As Single
        Return Convert.ToSingle(s.Replace(".", ","))
    End Function
                        