Ошибка несоответствия типов при вычислениях - VB

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

Помогите, пожалуйста, найти ошибку! Type mismatch...не могу понять почему?

Dim R, BS, TI As Single
Dim NS, RD As Single
 
Private Sub CommandButton1_Click()
 
R = Val(txtR.Text)
BS = Val(txtBS.Text) / 100
TI = Val(txtTI.Text) / 100
 
NS = RV * [1+BS]
RD = NS / [1+TI] - R
 
txtNS.Text = NS
txtRD.Text = RD
 
End Sub

Решение задачи: «Ошибка несоответствия типов при вычислениях»

textual
                            Листинг программы 
                        
                            [1+BS]

Оцени полезность:

6 голосов , оценка 4.167 из 5

Похожие ответы