ASP.NET – Básico - Utilizando componentes

 

 

Apenas um exemplo da utilização deste componente no ASP.NET da Microsoft.

 

Dim sPM as String,  sPV as String, soma as Single

 

Sub rblPM_SelectedIndexChanged(sender As Object, e As EventArgs)

 

  ' PRIMEIRA  FORMA DE FAZER

 

   sPM = rblPM.SelectedItem.value

 

 '   lblPM.text = "R$ " & sPM & ",00"

 '       soma += CSng(sPM)

  '  lblSubTotal.Text = "R$ " & CStr(soma) & ",00"

 

  ' SEGUNA FORMA DE FAZER

    lblPM.text = "R$ " & sPM

    soma = soma + CSng(sPM)

    lblSubTotal.Text = FormatCurrency(soma)

 

End Sub

 

Sub rblPV_SelectedIndexChanged(sender As Object, e As EventArgs)

    sPV = rblPV.SelectedItem.value

    lblPV.text = "R$ " & sPV & ",00"

    soma += CSng(sPV)

    lblSubTotal.Text = "R$ " & CStr(soma) & ",00"

End Sub

 

Veja o resultado na figura abaixo:

 

orcamento.jpg