German Compiler Warnung: Return type ......

[pjo12345]

Ich erhalte folgende Compiler Warnung bei Return Wert (letzte Anweisung vor End Sub):
Return type (in Sub signature) should be set explicitly. Was bedeutet das genau?

Hier der Code

Sub KaufRunden (Wert As Double, Nachkommastellen As Byte)
   Dim Vorzeichen As Byte
   If b < 0 Then
         Vorzeichen = -1
      Else If b > 0 Then
         Vorzeichen = 1
      Else If b = 0 Then
         Vorzeichen = 0
   End If
   Nachkommastellen = Power(10,Nachkommastellen) ' Power = 10^Nachkommastellen
   Wert = (Wert * Nachkommastellen) + (Vorzeichen * 0.5)
   Wert = Wert/100
   Return Wert
End Sub

 

[klaus]

Diese Zeile :

Sub KaufRunden (Wert As Double, Nachkommastellen As Byte)

muss so ausehen :

Sub KaufRunden (Wert As Double, Nachkommastellen As Byte) As Double

Der Rückgabewerttype muss am Ende des Sub angegeben werden.

Beginner's Guide Kapitel 4.3.3.1 Test Compile / Warnings.

Beste Grüsse.

 

[pjo12345]

Danke