LOGOUT: Býval jsem mladistvým lamerem.

Býval jsem mladistvým lamerem.

Středeční postřeh: Visual Basic for Applications je hybrid

Microsoft je zřejmě drsňák, který se nebojí kombinovat různé programátorské přístupy. Následující kousek zdrojáku má v sobě vše: číslované řádky ala 80. léta (všimněte si krásného GoSub), strukturované programování ala 90. léta (je to ostatně procedura) i objekty ala moderna:

Public Sub YeOldeSchool()

10 Debug.Print "Zacatek programu."
20 GoSub 50
30 Debug.Print "Zpet ze subrutiny."
40 Stop
50 Rem tady zacina subrutina
60 Debug.Print "Prichazi subrutina."
70 Return

End Sub

Kód je naprosto funkční, alespoň v MS Office 2003, které používáme v práci. Ještě jednou, bravo Microsofte!

28. ledna 2009 | rubrika: PC Bits | permalink

Komentáře

[1] (F6 ) Vloženo 28.01.2009, 14:54:22

Neni nad Sinclair BASIC, nebo skvely Super BASIC na QL. Tak me napadlo, sranda by byla, kdyby M$ aplikoval paskvil typu BASIC V2 z Commodore, pak by se vse krome PRINTu muselo delat prikazy POKE :)

[2]OPL (Logout - Mail - WWW) Vloženo 28.01.2009, 15:03:45

Vynikajici je taky Psioni OPL, coz je vlaste strukturovany BASIC s prikazama pro GUI (kresleni menu, dialogu atd.), prikazama pro praci s databazi (hledani zaznamu, zakladani zaznamu atd.) a dalsima vychytavkama. Za 14 dni, co vozim Psiona metrem cestou do prace jsem napsal jedny binarni hodiny, jeden rekurzivni odstranovac Macovskych souboru z CF karty a rozepsal dalsi tri programy, nehlede na to ze jsem si abych nevysel ze cviku dopsal asi 15 modulu do kalkulacky (faktorial, poissonovo rozlozeni atd.).

Opravdu je v tom radost psat, jen je skoda, ze Nokia uz v novych Symbianech s OPL nepocita, posledni je na komunikatoru N9500.

[3]Commodore Basic as scripting language (dex - WWW) Vloženo 28.01.2009, 15:07:06

Jaká sranda?
Taková věc opravdu existuje.
http://www.pagetable.com/?p=48
Na stránce je možné nalézt i odkaz na Apple 1 integer basic :o)

[4]to dex (F6 ) Vloženo 28.01.2009, 16:10:23

to znam, myslel jsem to z legrace, kdyby m$ degradoval svoje visualni prostredi na zapis poke adresa,hodnota :)

Všechna pole jsou nepovinná.
Vaše IP adresa nebude veřejně zobrazena.
Číslo v hranatých závorkách vytvoří odkaz na daný komentář.
Avatar friendly.