Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvoriť nový projekt Visual Basic kliknutím na tlačidlo " Súbor " a " New Project " . Zvoľte " Console Application " , pretože nám umožňuje dostať sa do mäsa problému , bez toho aby sa museli starať o irelevantné GUI ( Graphical User Interface ) práce . Neskôr , môžete použiť presne rovnaký kód v aplikácii GUI , pokiaľ sa tak rozhodnete
2
Definujte linku do štyroch premenných : . Sklon a zachytiť každého riadku . To tým , že vložíte nasledujúce :
Dim firstLineSlope ako Double = 3,0
Dim firstLineYintercept ako Double = -8
Dim secondLineSlope ako Double = 7,0
Dim secondLineYintercept Ako Double = 9
To by bolo ekvivalentné liniek " y = 3x - 8 " . " y = 7x + 9 " a Môžete zmeniť čísla , aby sa zmestili dva riadky , ktoré sa snažia riešiť pre
3
Nájsť x - ovú súradnicu pomocou nasledujúceho vzorca : .
Dim x As Double = ( firstLineYIntercept - secondLineYintercept ) /( SecondLineSlope - firstLineSlope )
Toto je ekvivalentná nastavenie dvoch riadku rovnice rovnaké k sebe a zjednodušenie podmienok , ako je toto :
3x - 8 = 7x + 9
3x - 7x = 9 - ( -8 )
x = -4,25
4
Hľadať y - ová súradnica priesečníku pripojením novo objavená x hodnota na jednu z liniek pomocou nasledujúci kód :
Dim r As Double = ( firstLineSlope * x ) + firstLineYintercept
To je ekvivalentné nasledujúce matematiky :
y = 3 ( -4,25 ) + ( -8 )
y = -20,75