Verfügbare Informationen zu "Neueste HÜ"
Qualität des Beitrags: Beteiligte Poster: Daveed - Manuel_K Forenurl: Klick aus dem Unterforum: Software/Netzwerk Antworten: 4 Forum gestartet am: Samstag 04.11.2006 Sprache: deutsch Link zum Originaltopic: Neueste HÜ Letzte Antwort: vor 17 Jahren, 5 Monaten, 25 Tagen, 2 Stunden, 51 Minuten
Alle Beiträge und Antworten zu "Neueste HÜ"
Re: Neueste HÜ
Daveed - 09.11.2006, 21:02Neueste HÜ
So, Wiesel du worst jo letztes Mal ned da, drum stell i do moi de aktuelle software-hü rein :)
HÜ
Benutzer gibt Zahl oder Text ein
Gibt er 2 Zahlen ein, soll mittels Funktion die Summe der beiden Zahlen ermittelt werden.
Gibt er 2 Strings ein, sollen mittels Funktion die Strings hintereinander gestellt werden.
Bis Montag 18:00 Uhr! -----> module1.vb schicken
letztes mal homa folgendes aufgeschrieben:
Optionale Parameter und Standardparameter
Optionale Parameter sind Parameter, welche einer Prozedur/Funktion übergeben werden können, aber nicht müssen. Bei der Definition ist aber darauf zu achten einem optionalen Parameter einen Vorgabewert (default value) zuzuordnen. Beim Aufruf der Prozedur/Funktion kann die Angabe des optionalen Parameters entfallen. In diesem Fall wird der Vorgabewert verwendet. Wird der optionale Parameter jedoch übergeben, wird der Vorgabewert überschrieben.
Syntax
• Optionale Parameter werden mit dem Schlüsselwort Optional gekennzeichnet.
• Die optionalen Parameter müssen immer am Ende der Parameterliste aufgeführt werden
• Einem optionalen Parameter wird durch ein Gleichheitszeichen ein Standardwert zugewiesen.
• Standardwerte müssen Konstanten oder konstante Ausdrücke sein.
Sub/Function Name ( (ByVal/ByRef Parameter1 as Datentyp, Optional ByVal Parameter2 as Datentyp2 = Wert)
Anweisung1
Anweisung2
…
End Sub/Function
Überladene Prozeduren/Funktionen
Prozeduren/Funktionen können überladen werden, dh man kann mehrmals den gleichen Bezeichner für eine Funktion/Prozedur im gleichen Gültigkeitsbereich verwenden. Der Einsatz von überladenen Routinen ist dann sinnvoll, wenn Funktionen/Prozeduren unter dem gleichen Namen, aber mit unterschiedlichen Parametertypen oder für eine andere Anzahl von Parametern die gleichen Optionen ausführen sollen.
Syntax
• Die Überladung einer Funktion/Prozedur wird bei der Deklaration durch das Schlüsselwort Overloads gekennzeichnet. Eventuell notwendige Gültigkeitsattribute werden noch vor Overloads geschrieben (zB Private Overloads Function…).
• Alle Überladungen einer Prozedur/Funktion verwenden den gleichen Namen bzw. Bezeichner.
• Die verwendeten Parameter müssen sich in der Anzahl und/oder in mindestens einem Parameterdatentyp unterscheiden
• Der Rückgabewert wird beim Überladen nicht zur Unterscheidung herangezogen.
Overload Function/Sub Name (Parameter1 as Datentyp1, Parameter2 as Datentyp2,…) as Datentyp3
Anweisung1
Anweisung2
…
End Function/Sub
Overloads Function/Sub Name (Parameter1 as Datentyp1, Parameter2 as Datentyp3,…) as Datentyp3
Anweisung1
Anweisung2
…
End Function/Sub
Re: Neueste HÜ
Daveed - 09.11.2006, 21:51
Ein Beispiel, das wird letzte Stunde gemacht haben:
Module Module1
Sub Main()
Dim Integer1, Integer2 As Integer
Dim Double1, Double2 As Double
Integer1 = 10
Integer2 = 15
Double1 = 6.843
Double2 = 2.289
System.Console.WriteLine(Minimum(Integer1, Integer2))
System.Console.WriteLine(Minimum(Double1, Double2))
System.Console.ReadLine()
End Sub
Overloads Function Minimum(ByVal Zahl1 As Integer, ByVal Zahl2 As Integer) As Integer
System.Console.WriteLine("Die Integer-Variante wurde gewählt.")
If Zahl1 < Zahl2 Then
Return Zahl1
Else
Return Zahl2
End If
End Function
Overloads Function Minimum(ByVal Zahl1 As Double, ByVal Zahl2 As Double) As Double
System.Console.WriteLine("Die Double-Variante wurde gewählt.")
If Zahl1 < Zahl2 Then
Return Zahl1
Else
Return Zahl2
End If
End Function
End Module
Re: Neueste HÜ
Daveed - 13.11.2006, 17:29
also i hob die hausübung grad probiert und i hob keinen schimmer wie i des machen soll.
ma müsste ja sowas in der art schreiben:
Zahl/Text = system.console.readline()
oba des spüts glaub i ned :?
Re: Neueste HÜ
Manuel_K - 13.11.2006, 21:34Hausübung
Des is a Ansatz. Es funktioniert zwar net, is aber wahrscheinlich net weit vorbei:
Module Module1
Sub Main()
Dim Double1, Double2 As Double
Dim String1, String 2 As String
Dim Ausgabe1 As String
Dim Ausgabe2 As Double
Dim Antwort As String
System.Console.WriteLine("Wollen Sie zwei Wörter oder zwei Zahlen eingeben (w für Wörter, z für Zahlen))
Antwort = System.Console.ReadLine()
If Antwort = "w" Then
System.Console.WriteLine("Geben Sie das erste Wort ein")
String1 = System.Console.ReadLine()
System.Console.WriteLine("Geben Sie das zweite Wort ein")
String2 = System.Console.ReadLine()
ElseIf Antwort = "z" Then
System.Console.WriteLine("Geben Sie die erste Zahl ein")
Double1 = System.Console.ReadLine()
System.Console.WriteLine("Geben Sie die zweite Zahl ein")
Double2 = System.Console.ReadLine()
Else
System.Console.WriteLine("Antwort falsch.")
System.Console.Read()
End
End If
If Antwort = "w" Then
System.Console.WriteLine(Berechnung(Ausgabe1)
ElseIf Antwort = "z" Then
System.Console.WriteLine(Berechnung(Ausgabe2)
Else
End
End If
End Sub
Overloads Function Berechnung(ByVal Double1 As Double, ByVal Double2 As Double, ByVal Ausgabe2 As Double) As Double
Ausgabe2 = Double1 + Double2
Return Ausgabe2
End Function
Overloads Function Berechnung(ByVal String1 As String, ByVal String2 As String, ByVal Ausgabe1 As String) As String
Ausgabe1 = String1
Ausgabe1 = Ausgabe1.Concat(Ausgabe1, String2)
Return Ausgabe1
End Function
End Module
mala edit: hob des end sub hinaufgeschoben, war an der falschen stelle ;)
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken
Weitere Beiträge aus dem Forum Untitled
Photoshop Tutorial - gepostet von Daveed am Donnerstag 15.02.2007
FRANZÖSISCH-WÖRTERBUCH - gepostet von PseudoPezi am Dienstag 07.11.2006
Bewerbung - gepostet von Daveed am Montag 04.12.2006
Ähnliche Beiträge wie "Neueste HÜ"
neueste darkside-vinyls - porter (Dienstag 15.08.2006)
Neueste und stärkste Allianz eröffnet - Anonymous (Samstag 10.09.2005)
Das Neueste aus dem BTBW Forum - Crokdash (Freitag 04.05.2007)
Der neueste Stand - Mistika (Dienstag 18.04.2006)
@@@@@ Neueste Trailer mit Show @@@@@ - EFS Punisher (Dienstag 18.09.2007)
das neueste von mir :-) - Krümel (Montag 10.09.2007)
Neueste Veröffentlichungen u. a. auch v. Chris Pollit - Friesin (Samstag 24.11.2007)
DAS NEUESTE - TuBiScH (Samstag 17.02.2007)
der Neueste - Tschaeggaer (Dienstag 18.04.2006)
Neueste News :: eForium - administrator (Samstag 07.01.2006)