in Klassen wert zurück geben

Question

Hallo

Wie kann man einen Wert in einer Klasse zurückgeben ohne das man eine Public Dim erstellen muss.

Hier mein Beispiel

<Window x:Class="MainWindow"
        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
        xmlns:local="clr-namespace:WpfApp6"
        mc:Ignorable="d"
        Title="MainWindow" Height="258.782" Width="292.635">
    <Grid>
        <TextBox x:Name="Textbox1" HorizontalAlignment="Left" Height="23" Margin="37,52,0,0" TextWrapping="Wrap" VerticalAlignment="Top" Width="120"/>
        <TextBox x:Name="Textbox2" HorizontalAlignment="Left" Height="23" Margin="37,97,0,0" TextWrapping="Wrap" VerticalAlignment="Top" Width="120"/>
        <Label x:Name="Label1" Content="Label" HorizontalAlignment="Left" Margin="205,75,0,0" VerticalAlignment="Top"/>
        <Button x:Name="Button1" Content="Button" HorizontalAlignment="Left" Margin="37,140,0,0" VerticalAlignment="Top" Width="206" Height="60"/>

    </Grid>
</Window>

Class MainWindow
    Private Sub Button1_Click(sender As Object, e As RoutedEventArgs) Handles Button1.Click
        Dim klasse As New Class1
        Dim z As Integer


        klasse.Summe(Textbox1.Text, Textbox2.Text, z)
        Label1.Content = z

    End Sub
End Class

Public Class Class1
    Public zusammen As Integer

    Public Sub Summe(Zahl1 As Integer, Zahl2 As Integer, z As Integer)
        ' Dim zusammen As Integer

        zusammen = Zahl1 + Zahl2
        z = Zahl1 + Zahl2

        MsgBox(zusammen)

    End Sub

End Class

Wie kann ich den Wert Z in der Klasse zurück geben das es in Label angezeigt wird.

Mit Public Zusammen As Integer würde das zwar gehen aber so möchte ich es nicht haben.

Gibt es noch eine andere Möglichkeit?

Answer 1

Hi,

Public Function Summe( Zahl1 As Integer, Zahl2 As Integer ) As Integer
    Return Zahl1 + Zahl2
End Function

Wenn eine Methode etwas zurückgeben soll, ist das in VB eine Function. Eine Methode ohne Rückgabewert ist eine Sub.

---

Gruß, Stefan
Microsoft MVP - Visual Developer ASP/ASP.NET (2001-2018)
https://www.asp-solutions.de/ - IT Beratung, Softwareentwicklung, Remotesupport

Answer 2

Hallo

Danke für die Antwort, wie ruft man diese Function in Button_Click auf das ich des Ergebnis bekomme? 

Answer 3

Hi,

Dim x As Integer
    x = Summe( 1, 2 )

oder, wenn die Methode in einer anderen Klasse ist:

Dim x As Integer
    x = <InstanzDerAnderenKlasse>.Summe( 1, 2 )

---

Gruß, Stefan
Microsoft MVP - Visual Developer ASP/ASP.NET (2001-2018)
https://www.asp-solutions.de/ - IT Beratung, Softwareentwicklung, Remotesupport
@ConnectOurPeople - Hilfsangebot - Videotelefoniesysteme für isolierte Menschen (keine Werbung!)