Поскольку у вас есть текст (строка) внутри текстового поля, вы должны сначала преобразовать этот текст в фактическое число.
Не зная, какие именно данные в них содержатся, я буду неопределенным и скажу, что вы можете использовать что-то вроде TryParse, Cast или Convert.
Например:
Math.Round(CDbl(TxDovizAlisAlt2.Text) / CDbl(TxDovizAlisAlt1.Text), 4)
Dim test As Double = Math.Round(CDbl("123.456") / CDbl("78.910"), 4)
Debug.Print(test.ToString) 'Print>>> 1.5645