Ошибка несоответствия типов при вычислениях - 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

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

textual
[1+BS]
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

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


СДЕЛАЙТЕ РЕПОСТ