- #1
S
sign
Aktives Mitglied
Themenersteller
- Dabei seit
- 20.11.2006
- Beiträge
- 40
- Reaktionspunkte
- 0
Hallo, kann mir jemand sagen wie ich meine funktion s_name aufrufen muss??
PublicClass Form1
Dim t_name AsString
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
t_name = TextBox1.Text
Dim mes = s_name(t_name)
MsgBox(mes)
EndSub
EndClass
PublicClass Class1
PublicFunction s_name(ByVal namen)
Dim r_namen = name = & namen
Return r_namen
EndFunction
EndClass
danke für eure hilfe.
PublicClass Form1
Dim t_name AsString
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
t_name = TextBox1.Text
Dim mes = s_name(t_name)
MsgBox(mes)
EndSub
EndClass
PublicClass Class1
PublicFunction s_name(ByVal namen)
Dim r_namen = name = & namen
Return r_namen
EndFunction
EndClass
danke für eure hilfe.