c.Window.Title = "Tibia - " & p.Name

Object reference not set to an instance of an object.

da linha :

c.Window.Title = "Tibia - " & p.Name

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants

Public Class Form1

    Public Shared c As Client

    Public Shared p As Player


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

	    c = ClientChooser.ShowBox

	    p = c.GetPlayer

    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

	    c.Window.Title = "Tibia -" & p.Name

    End Sub

End Class

ta dando na msm :/

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants

Public Class Main

	Public Shared Player

	Public Shared Client

Private WithEvents NIcon As New NotifyIcon  

  Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, NotifyIcon1.Click

		Client = Tibia.Util.ClientChooser.ShowBox()

	End Sub

	Private Sub ToolStripMenuItem10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem10.Click

		Client.Window.Title = "Tibia - " & Player.name

	End Sub

End Class

Editado Outubro 20, 2011 13 anos por Mek Fiuchem (veja o histórico de edições)

Ai ai . . .

c.Window.Title = "Tibia - " & p.Name & " "

Tente assim

Editado Outubro 20, 2011 13 anos por Guilherme. (veja o histórico de edições)