[Resolvido][Duvida] Mana Training

[Teehvsx 2]

Bom estou quase terminando meu bot i eu estava fazendo o mana training ai fui testar ele a linha :

Private Sub Manatraining_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Manatraining.Tick

If c.LoggedIn Then

If p.Mana > TextBox1.Text Then

c.Console.Say(TextBox2.Text)

End If

End If

End Sub

If c.LoggedIn Then fiko amarela alguem sabe pq ? oia vo mandar o codigo inteiro

do form da mana training

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants

Public Class Form3

Dim c As Client

Dim p As Player

Private Sub Manatraining_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Manatraining.Tick

If c.LoggedIn Then

If p.Mana > TextBox1.Text Then

c.Console.Say(TextBox2.Text)

End If

End If

End Sub

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged

If CheckBox1.Checked Then

Manatraining.Start()

Else

Manatraining.Stop()

End If

End Sub

End Class

Alguem tem 1 codigo mais bom ai ou pode me informa oque esta de errado nisso ai , vlws a todos

Editado Julho 1, 2011 por Teehvsx (veja o histórico de edições)

[Renato 659]

Esse é um erro antigo que eu nunca consegui descobrir.

Em alungs códigos funciona, em outros não.

Eu parei de programar por causa desses erros escrotos que davam kk.

[Augusto 660]

Vou explicar o porque ficou amarela.

Porque você declarou novamente as variaveis "c" e "p" la emcima no form.

Como você ja declarou elas no form "principal", não precisa declara-las novamente, uma vez que se declarar elas novamente, o valor existente nelas passa a ser nulo até você atribuir algum valor a ela.

Tente retirar as linhas

Dim c As Client

Dim p As Player

e veja se da certo.

[Teehvsx 2]

bele vo ver aki desculpe a demora da resposta tava soltando pipa das 9 da manha ate agora kkkkk

[Teehvsx 2]

ixi mano eu tirei o c e o P puts negosio deu uns negosios mt loco aki fudeo tudo o form3 aushduasdhuasd ai tu nao tem nem 1 codigo ai nao para min tipo para 1 form so de mana training qui estou precisando :/

[Kimoszin 1160]

Simples, Feche o Form3, e reabra

Para reabrir, clique com o direito em Form3, e escolha a opção View Designer.

Codigo Mana Training:

Button1

If Manatraining = False Then

Manatraining.Enabled = True

Else

Manatraining.Enabled = False

End If

Timer

if P.Mana > Textbox1.text) then

c.Console.Say(TextBox2.Text)

End If

[Teehvsx 2]

Vlws consegui , Adicionado tag [Resolvido] fecha o topico ai