Manhunt

Podem encerrar. Já consegui resolver o problema. Não foi através do Google, porque o meu problema era mais especifico, mas está feito. Podem encerrar o tópico.

Sim, claro, mas não funciona a 100%, por isso, é que já não sei o que fazer...

Boas. Eu necessitava de uma ajuda vossa, pois estou com um problema num pequeno projecto que estou a fazer. Na realidade, eu queria programar, sempre que aparece-se numa textbox um link de um video do Youtube, este retirasse o www.youtube.com, para substituir por www.youtube.com/watch?v=. O resto do link se deverá manter, como demonstro no próximo exemplo: www.youtube.com/watch?v=watch?v=5NV6Rdv1a3I&list=RDHCEDMX_jSSoxg Agora uma pergunta. Como é que posso fazer isso? O código que eu tenho neste momento é este: if (document.getElementById("musica").value != ""){ txt += "http://www.youtube.com/watch?v="; txt += document.getElementById("musica").value; document.getElementById("gen").value += txt; } Com esse codigo, paneas consigo fazer com o script adicione antes do watch o link www.youtube.com/watch?v=, mas o que eu queria era copiar o link para a textbox e substuir o que pretendo. Vocês acham que isso é possivel?

Boas galera! É assim, eu estou com um problema e necessitava de o resolver, mas não consigo... Estou aprendendo a programar nessa linguagem. Eu estou a criar uma aplicação em que tenho 3 textboxes e em cada uma delas irei escrever um número. No fim, eu queria que ao clicar num botão, este me desse uma messagebox a indicar quem fqual é a textbox com o valor mais elevado e mostrava o respectivo conteúdo do objecto , só que eu não estou consiguindo fazer isso. Já tentei de imensas maneiras mas não consigo sair dessa... Deixo aqui o código em que estou trabalhando, Private Sub Btfinal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btfinal.Click Dim a, b, c As String Dim vencedor As Integer a = Val(Tba.Text) > (Tbb.Text) > (Tbc.Text) > (Tbd.Text) b = Val(Tbb.Text) > (Tba.Text) > (Tbc.Text) > (Tbd.Text) c = Val(Tbc.Text) > (Tba.Text) > (Tbb.Text) > (Tbd.Text) Select vencedor Case a = True And b = False And c = False And d = False MessageBox.Show("Ganhou o 1º grupo " & Val(Tba.Text)) Case b = True And a = False And c = False and d = False MessageBox.Show("Ganhou o 2º grupo " & Val(Tbb.Text)) Case c = True And a = False And b = False and d = False MessageBox.Show("Ganhou o 3º grupo " & Val(Tbc.Text)) End Select End Sub Por favor galera me ajuda. Grato pela vossa atenção.