none
Ajuda iniciante em VB RRS feed

  • Pergunta

  • to criando uma aplicação e é o seguinte não to conseguindo faze a função IF funciona corretamente como eu queria aqui ta o codigo

    ' aqui era pra ele verifica se a textbox1 ta vazia ou nao pra depois ele proceguir se caso tiver vazio aparece um aviso na status ("Processo Está Vazio... ") e se nao estiver vazio ele mostra outro aviso ("Aguardando Inicio do Jogo... ") so que nao to conseguindo fazer poderiam mi dar uma ajuda!!
    como nao sei muita coisa, fica dificil pra mim agradeço quem poder mi ajuda valew

     

            If IO.File.Exists(OpenFileDialog1.FileName) Then
                Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox1.Text)
                If TargetProcess.Length = 0 Then
                    If TextBox1.Text <> "" Then
                        ToolStripStatusLabel1.Text = ("Processo Está Vazio... ")


                       ToolStripStatusLabel1.Text = ("Aguardando Inicio do Jogo... ")
                    Else
                        Timer1.Stop()
                        Me.ToolStripStatusLabel1.Text = "Iniciado Com Sucesso!!"
                        Call Inject()
                        If CheckBox1.Checked = True Then
                            Me.Close()
                        Else
                        End If
                    End If
                End If

     

    sexta-feira, 17 de junho de 2011 19:12

Respostas

  •  If IO.File.Exists(OpenFileDialog1.FileName) Then

      If TextBox1.Text <> "" Then                             

                Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox1.Text)

    else

                        ToolStripStatusLabel1.Text = ("Processo Está Vazio... ")

                    Else
                        Timer1.Stop()
                        Me.ToolStripStatusLabel1.Text = "Iniciado Com Sucesso!!"
                        Call Inject()
                        If CheckBox1.Checked = True Then
                            Me.Close()
                        Else


                        End If
                  
                End If

     

    tu tens if desnecessarios.

     

    se o ficheiro existe entao

    vai testar se a caixa de texto esta diferente de zero ou vazio

    entao

    voce nao precisa testar o processo porque o processo depende da caixa de texto.

    se tudo estiver bem faz outra coisa 

    se nao estiver bem siguinifica dizer que a caixa de texto esta vazia retorna uma mensagem

     


    One word frees us of all the weight and pain of life: that word is love.
    sexta-feira, 17 de junho de 2011 20:08
    Moderador

Todas as Respostas

  •  If IO.File.Exists(OpenFileDialog1.FileName) Then

      If TextBox1.Text <> "" Then                             

                Dim TargetProcess As Process() = Process.GetProcessesByName(TextBox1.Text)

    else

                        ToolStripStatusLabel1.Text = ("Processo Está Vazio... ")

                    Else
                        Timer1.Stop()
                        Me.ToolStripStatusLabel1.Text = "Iniciado Com Sucesso!!"
                        Call Inject()
                        If CheckBox1.Checked = True Then
                            Me.Close()
                        Else


                        End If
                  
                End If

     

    tu tens if desnecessarios.

     

    se o ficheiro existe entao

    vai testar se a caixa de texto esta diferente de zero ou vazio

    entao

    voce nao precisa testar o processo porque o processo depende da caixa de texto.

    se tudo estiver bem faz outra coisa 

    se nao estiver bem siguinifica dizer que a caixa de texto esta vazia retorna uma mensagem

     


    One word frees us of all the weight and pain of life: that word is love.
    sexta-feira, 17 de junho de 2011 20:08
    Moderador
  • Prezado(a),
    Estou migrando seu post para o fórum de VB.
    Por favor, das próximas vezes que tiver alguma dúvida relacionada a esse assunto, poste por lá.
    Obrigado.

    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima
    sexta-feira, 17 de junho de 2011 23:41
    Moderador
  • consegui fazer o que eu tava querendo, fui tentando testando ate que deu certo, obrigado.

    mais uma coisa, tipo como faço pra abrir um determinado site no form, pra quando executa o aplicativo ele abriria em tal pagina vc poderia desmonstrar como posso fazer ogrigado!!!

    sábado, 18 de junho de 2011 13:21
  • consegui fazer o que eu tava querendo, fui tentando testando ate que deu certo, obrigado.

    mais uma coisa, tipo como faço pra abrir um determinado site no form, pra quando executa o aplicativo ele abriria em tal pagina vc poderia desmonstrar como posso fazer ogrigado!!!

    Private Sub OpenURL(URL as String)
    		System.Diagnostics.Process.Start("http://www.mredkj.com")
    	End Sub

    One word frees us of all the weight and pain of life: that word is love.
    sábado, 18 de junho de 2011 13:45
    Moderador
  • Prezado,

    Para melhor organização dos fóruns, buscas, etc., pedimos que seja mantida somente uma questão por tópico... Das próximas vezes, por favor, abra outra thread para a questão adicional...

    Além disso, por favor, poste aqui qual foi a solução encontrada para o seu problema inicial... Dessa forma outras pessoas poderão se beneficiar da mesma solução no futuro...

    Obrigado pelo apoio...


    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima
    segunda-feira, 20 de junho de 2011 12:02
    Moderador
  • a primeira pergunta deu certo, descobri, mas so que tem algo errado no codigo que ele nao ta funcionando como deveria, nao sei pq, a segunda eu ia tenta faze um form pra abrir um site de enviar torpedo, mas nao começei por causa do problema do primeiro, posso solicita ajuda a primeira pergunta aqui ou abro outra thread? obrigado e desculpa por fazer perguntas diferentes no mesmo lugar agardo pois preciso de ajuda com a primeira ainda valew!!!
    segunda-feira, 20 de junho de 2011 21:51
  • Prezado,

    Ficou um pouco confuso este post, então, pra não ficar mais complexo ainda, por favor, abra uma outra thread detalhando as questões ainda pendentes...

    Obrigado pelo apoio...


    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima
    segunda-feira, 20 de junho de 2011 22:08
    Moderador