objekt/klasser generalt

Pointen med klasser er at du ikke kalder en klasse, men at du skaber et objekt på baggrund af et objekt og kalder funktionen på den. Håber det besvarer dit spørgsmål.

'En lille test klasse
Public Class Testclass
    Public Function Response(ByVal Tekst As String)
        MsgBox(Tekst)
    End Function
End Class

'Der hvor du vil kalde funktionen skrive du.
        Dim Tester As New Testclass
        Tester.Response("Dette er en test")

Måske et mere illustrativt eksempel:

Public Class Displayer
    Private Dim s As String
    Public Sub New(arg As String)
        s = arg
    End Sub
    Public Sub DisplayUpper()
        MsgBox(UCase(s))
    End Sub
    Public Sub DisplayLower()
        MsgBox(LCase(s))
    End Sub
    Public Sub DisplayAsIs()
        MsgBox(s)
    End Sub
End Class

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click     
      Dim Disp As Displayer = New Displayer(txtTekst.text)
      Disp.DisplayUpper()
      Disp.DisplayLower()
      Disp.DisplayAsIs()
End Sub

Tak for de gode svar. Jeg skal lige prøve dem :-)
Arne_v hvordan kan jeg overføre noget indhold til s fra privare sub:

Få koden kommer til at se ud som her?:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
      dim2 s as string
      Dim Disp As Displayer = New Displayer(txtTekst.text)
      Disp.DisplayUpper()
      Disp.DisplayLower()
      Disp.DisplayAsIs()
      s2 = arg
End Sub

Men hvordan får jeg den over i mit objekt?

Kan men oprette en public variabel og kalde den fra objektet? (s = s2)??

oswald:

Kan man så sige at et objekt generer et nyt objekt som hun findes når koden afvikles, og at det nye objekt har en masse funktioner(hvis man har oprettet en masse klasser)?

Jeg er ikke helt sikker på at jeg forstå hvad du spørger efter.

Du kan sagtens lave en metode hvor du kan ændre s:

Public Class Displayer
    Private Dim s As String
    Public Sub New(arg As String)
        s = arg
    End Sub
    Public Sub DisplayUpper()
        MsgBox(UCase(s))
    End Sub
    Public Sub DisplayLower()
        MsgBox(LCase(s))
    End Sub
    Public Sub DisplayAsIs()
        MsgBox(s)
    End Sub
    Public Sub Add(s2 As String)
        s = s + s2
    End Sub
End Class

og:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click   
      Dim Disp As Displayer = New Displayer(txtTekst.text)
      Disp.DisplayUpper()
      Disp.DisplayLower()
      Disp.DisplayAsIs()
      Disp.Add(" (med tilføjelse)")
      Disp.DisplayAsIs()
End Sub

Du kan lave metoder som gør hvad som helst.

Der er skrevet en del om VB.NET og OOP f.eks.:

http://www.ondotnet.com/pub/a/dotnet/2001/09/25/oop_vb.html
http://www.ondotnet.com/pub/a/dotnet/2002/11/04/vbooppt2.htm
http://www.ondotnet.com/pub/a/dotnet/2003/05/20/introvbnetoo.html

Tjo det kan man godt sige. Du skal dog ikke bekymre dig om hukommelsesforbruget da funktioner kun loades en gang mens klassens data  naturligvis ligger en gang pr. objekt;)

Tusinde tak begge 2. :-)
Håber det er OK at i får en del hver.

Jeg syntes .NET er helt kanon, jeg mangler bare den store forståelse af hvordan man skaber og benytte objekter. Men det kommer vel :-)

Jeg faldt lige over denne side og tænkte det var noget for dig, der er en artikkel om klasser i bunden ;)
http://msdn.microsoft.com/vbasic/using/gettingstarted/default.aspx