Im Prinzip ja, aber.....
Wenn ich das so mache, wei du schreibst, dann bekomme ich einen anderen Fehler in der selben Zeile
Diesmal meckert er wegen eines 'invalid Datatype [[0011]0]' herum
Kann man in Bascom einer double-Variablen keinen Integer zuweisen? Das wäre dann ja wohl ein KO-Kriterium für Bascom als Entwicklungstool.Code:Function Calcsternzeit(ortslaenge As Double)as Double Local T As Double Local Monat As Integer Local Jahr As Integer Local Tag As Integer Local Aa As Double , Aahelp As Double 'Hilfsvariable Local B As Double Local K As Double 'Länge sonnentag in Sterntagen Local Mjd As Double Local Ut As Double Local S As Double Monat = _month ''Ausgangspunkt aktuelle Uhrzeit Tag = _day Jahr = _year K = 1.0027379093 If _month >= 2 Then Monat = Monat + 12 Jahr = Jahr - 1 End If Aa = 10000 * Jahr '<-- Hier wird er Fehler gezeigt Aahelp = 100.0 * Monat Aa = Aa + Ahelp Aa = Aa + Tag







Zitieren

Lesezeichen