Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte Visual Basic Express a vytvoriť novú aplikáciu konzoly . Kliknite na " Súbor " a potom " Nový projekt " . Akonáhle sa zobrazí nové dialógové projekt , vyberte Windows z stromovom zobrazení kliknite na ikonu aplikácie konzoly a názov programu " Tangent . " Kliknite na tlačidlo " OK " pre vytvorenie projektu . Po krátkom čakaní , objaví sa okno s kódom 
 2 
 Pridať príkaz Imports zahrnúť System.Math odbor názvov do programu takto : . 
 
 Dovoz System.Math 
 
 Module Module1 
 
 Tento príkaz nám umožňuje používať všetky matematické funkcie nájdené v System.Math vnútri programu . 
 3 
 deklarovať premenné na diaľku a uhly takto : 
 
 Sub Main ( ) 
 
 Dim vzdialenosť As Double = 20,0 
 
 Dim uhol ako Double = 60,0 
 
 typu double je dvojitá . presnosť číslo s plávajúcou čiarkou , ktorá môže mať veľmi veľké alebo malé číslo v desiatkovej sústave 
 4 
previesť uhol v radiánoch pomocou nasledujúceho príkazu : Spojené
 Dim radiány ako Double = uhol * PI /180,0 
 
 Aj my ľudia sa zvyčajne meria uhly v stupňoch , NET Framework . chce vidieť uhly merané ako radiánoch . Radián meria vzdialenosť okolo kruhu ako 2 pí . Ak chcete previesť zo stupňov na radiány , vynásobte uhol PI potom vydeľte 180 
 5 
 Vypočítajte výšku stromu takto : . 
 
 Dim výšku As Double = tan ( radiány ) * vzdialenosť 
 
 výška je vzdialenosť vynásobí tangens uhla v radiánoch 
 6 
 Zobrazenie výsledkov do konzoly takto : . 
 
 Console . Napíšte ( " strom " ) 
 
 Console.Write ( height.ToString ) 
 
 Console.WriteLine ( " stôp vysoký " ) 
 7 
 End program s nasledujúcim kódom : 
 
 End Sub End Module 
 
 
 8 
 Kliknite na tlačidlo " F5 " pre spustenie programu . Okno konzoly sa objaví s uvedením výšky stromu .