Initials - Versionsgeschichte

Root: /* Besonderheiten einzelner Dialekte */

2012-01-11T19:46:31Z

Besonderheiten einzelner Dialekte

2012-01-11T19:45:43Z

Besonderheiten einzelner Dialekte

← Nächstältere Version		Version vom 11. Januar 2012, 19:45 Uhr
Zeile 95:		Zeile 95:
	Gambas weit den Funktionswert mit dem RETURN Statement zu, Visual Basic durch Zuweisung an den Funktionsnamen.		Gambas weit den Funktionswert mit dem RETURN Statement zu, Visual Basic durch Zuweisung an den Funktionsnamen.

	{\| class="wikitable"		{\| class="wikitable" style="width: 80%"
	\|-		\|-
	! Gambas !! Visual Basic		! Konstrukt !! Gambas !! Visual Basic !! Bemerkung
	\|-		\|-
	\|~~style="width : 500px"~~\| RETURN result		\| Rückgabe des Ergebnisses
	~~\|style="width : 500px"~~\| Initials = result		\| RETURN result
			\| Initials = result
			\| Beide Dialekte sind in diesem Punkt unverträglich. Kein work-a-round bekannt.
	\|}		\|}

2012-01-11T19:38:43Z

Besonderheiten einzelner Dialekte

← Nächstältere Version		Version vom 11. Januar 2012, 19:38 Uhr
Zeile 93:		Zeile 93:
	== Besonderheiten einzelner Dialekte ==		== Besonderheiten einzelner Dialekte ==

	~~Keine bekannt~~.		Gambas weit den Funktionswert mit dem RETURN Statement zu, Visual Basic durch Zuweisung an den Funktionsnamen.

			{\| class="wikitable"
			\|-
			! Gambas !! Visual Basic
			\|-
			\|style="width : 500px"\| RETURN result
			\|style="width : 500px"\| Initials = result
			\|}


	[[Kategorie:Basic]]		[[Kategorie:Basic]]
	[[Kategorie:Gambas]]		[[Kategorie:Gambas]]

2012-01-11T19:21:35Z

Quelltext

← Nächstältere Version		Version vom 11. Januar 2012, 19:21 Uhr
Zeile 13:		Zeile 13:

	Eine Initiale ist dadurch bestimmt, dass sie am Anfang der Zeichenkette oder nach einem Leerzeichen steht. Sollen Sonderzeichen als Initialien ausgeschlossen werden, sind zusätzliche Prüfungen erforderlich.		Eine Initiale ist dadurch bestimmt, dass sie am Anfang der Zeichenkette oder nach einem Leerzeichen steht. Sollen Sonderzeichen als Initialien ausgeschlossen werden, sind zusätzliche Prüfungen erforderlich.


	=== Gambas ===		=== Gambas ===

2012-01-11T19:21:14Z

Besonderheiten einzelner Dialekte

2012-01-11T19:07:24Z

Visual Basic / Libre Office Basic

← Nächstältere Version		Version vom 11. Januar 2012, 19:07 Uhr
Zeile 50:		Zeile 50:
	=== Visual Basic / Libre Office Basic ===		=== Visual Basic / Libre Office Basic ===

	FUNCTION Initials(Value AS String) AS String		FUNCTION Initials(Value AS String) AS String

	DIM result AS String		DIM result AS String

2012-01-11T19:07:03Z

Visual Basic / Libre Office Basic

2012-01-11T19:06:36Z

Gambas

@@ Zeile 14: / Zeile 14: @@
 Eine Initiale ist dadurch bestimmt, dass sie am Anfang der Zeichenkette oder nach einem Leerzeichen steht. Sollen Sonderzeichen als Initialien ausgeschlossen werden, sind zusätzliche Prüfungen erforderlich.
 == Gambas ==
   FUNCTION Initials(Value AS String) AS String
@@ Zeile 24: / Zeile 25: @@
     result = ""
     IF Value THEN
       nc = TRUE
@@ Zeile 42: / Zeile 76: @@
     END IF
-    RETURN result
+    Initials = result
   END FUNCTION

2012-01-11T19:03:48Z

Gambas

← Nächstältere Version		Version vom 11. Januar 2012, 19:03 Uhr
Zeile 16:		Zeile 16:
	== Gambas ==		== Gambas ==

	FUNCTION Initials( Value AS String ) AS String		FUNCTION Initials(Value AS String) AS String

	DIM result AS String		DIM result AS String
	DIM nc AS Boolean		DIM nc AS Boolean
	DIM i AS Integer		DIM i AS Integer

	result = ""		result = ""
	IF ~~uname~~ THEN		IF Value THEN

	nc = TRUE		nc = TRUE

	FOR i = 1 TO Len(~~uname~~)		FOR i = 1 TO Len(Value)

	IF Mid(~~uname~~, i, 1) = " " THEN		IF Mid(Value, i, 1) = " " THEN
	nc = TRUE		nc = TRUE
	ELSE		ELSE
	IF nc THEN		IF nc THEN
	result = result & Mid(~~uname~~, i, 1)		result = result & Mid(Value, i, 1)
	nc = FALSE		nc = FALSE
	END IF		END IF
Zeile 41:		Zeile 41:

	END IF		END IF

	RETURN result		RETURN result

2012-01-11T18:58:23Z

Gambas

@@ Zeile 1: / Zeile 1: @@
-== Gambas ==
+== Definition ==
 Funktion zum Bestimmen der Anfangsbuchstaben (Initialien) der Wörter eines Textes, z.B. Username. Ein initialie ist wird dadurch bestimmt, dass sie am Anfang der Zeichenkette oder nach einem Leerzeichen steht. Sollen Sonderzeichen als Initialien ausgeschlossen werden, sind zusätzliche Prüfungen erforderlich.
   FUNCTION Initials( Value AS String ) AS String
@@ Zeile 34: / Zeile 45: @@
   END FUNCTION
 [[Kategorie:Basic]]
 [[Kategorie:Gambas]]