O clipe 'Ate o Fim', estreia de Marco Rodrigues na direcao de videoclipes, mostra familias que tem filhos autistas dando depoimentos sobre como detectaram a sindrome, os primeiros sintomas que perceberam em seus filhos e como lidaram com o diagnostico e toda falta de informacao sobre o autismo. Em paralelo, a musica de Fantine Tho embala um garoto autista, interpretado por Matheus Araujo, nos momentos comuns a essas criancas. A ideia de ser fazer um videoclipe para essa musica surgiu quando a mesma foi adotada por um grupo de pais para a campanha do Dia Mundial da Conscientizacao do Autismo, que acontece todos os anos no dia 2 de abril. Agora, a partir dos depoimentos captados em estudio, e trabalhada a segunda etapa do projeto, o documentario 'Ate o Fim', previsto para o segundo semestre de 2011.Assista ao clipe:http://www.youtube.com/watch?v=fpQboU5HdMI&feature=player_embedded Hoje o Danilo teve aula de expressao corporal (danca) e na escola atendimento na sala de recursos onde joga xadrez. Foram poucas semanas de aula de danca e ele ja se sobressai entre as outras criancas, participou a aula inteira fazendo todos os exercicios corretamente, aceitou contado fisico nas atividades em dupla, ja esta bem enturmado com os colegas, ao final da aula a professora Soraya me disse que nao esperava tanto entusiasmo, empenho e dedicacao da parte do Luisinho levando em conta que ele tem so cinco anos de idade, finalizou dizendo que ele tem grandes chances de crescer na danca. Quase nao coube em mim de tanto orgulho... cont. Os posts desse blog foram transferido para: STB Quer entender??? clique aqui no link:http://www.orkut.com.br/Main#Album?uid=10412057921846485948&aid=1263458407ou a foto:Esse mundo ta perdido... Codigo do programa calculadora:Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim A As Integer Dim B As Integer Dim Resultado As Integer A = TextBox1.Text B = TextBox2.Text Resultado = A + B TextBox3.Text = Resultado End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim A As Integer Dim B As Integer Dim Resultado As Integer A = TextBox1.Text B = TextBox2.Text Resultado = A - B TextBox3.Text = Resultado End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Dim A As Integer Dim B As Integer Dim Resultado As Integer A = TextBox1.Text B = TextBox2.Text Resultado = A * B TextBox3.Text = Resultado End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click Dim A As Integer Dim B As Integer Dim Resultado As Double A = TextBox1.Text B = TextBox2.Text If B = 0 Then TextBox3.Text = "Nao Pode Dividir Por 0" Else Resultado = A / B TextBox3.Text = Resultado Resultado = A + B TextBox3.Text = Resultado End If End Sub Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End SubEnd Class Codigo para indicar a classificacao do nadador:Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If (TextBox1.Text >= 5) And (TextBox1.Text <= 7) Then TextBox2.Text = "Infantil A" End If If (TextBox1.Text >=