Para este post vamos desenvolver uma aplicação, ou como se dizia antigamente um programa, para calcular notas finais de uma disciplina do ensino secundário português. Como a interface é relativamente grande precisamos de permitir deslocar o conteúdo verticalmente. Para validar os dados nas textboxes vamos criar uma função que implementa a função isNumeric da versão desktop do Visual Basic. Public Function isNumeric(ByVal str As String) As Boolean Dim t As Decimal = 0 Return Decimal.TryParse(str, t) End Function Se a string poder ser convertida num número devolve true se não devolve false. O primeiro botão serve para calcular a chamada CIF (Classificação Interna Final) que corresponde à média das notas do 10º, do 11º e do 12º ano. Para isso temos de verificar se cada textbox tem um valor numérico caso contrário não consideramos o seu conteúdo. Private Sub Button1_Click(sender As System.Objec...