将公式存放在数据表中，取出来按照公式进行计算

如题，先假设有以下这个简单程序，Dim Sha, Shc, Shb, Shd, She, Shf, Shg As Integer
        Sha = 2
        Shc = 2
        Shb = 2
        Shd = 2
        She = 2
        Shf = 2
        Shg = 2
        Dim shuju As Single
        shuju = (Sha + Shc) / 2 + (Shb + Shd + She + Shf + Shg) ^ (1 / 3)
        Label1.Text = shuju其中(Sha + Shc) / 2 + (Shb + Shd + She + Shf + Shg) ^ (1 / 3)就是公式，被我放入到数据库字段里面
现在问如果将题中的(Sha + Shc) / 2 + (Shb + Shd + She + Shf + Shg) ^ (1 / 3)用我从数据库中取出的值替换
直接替换是不行的，从数据库里面取出来就已经变成一个字符了“(Sha + Shc) / 2 + (Shb + Shd + She + Shf + Shg) ^ (1 / 3)”，不能进行任何计算。
先请教高手，如何实现我说的功能。