Ako si vyrobiť Stuff odraziť stien v jazyku Visual Basic

Visual Basic možno použiť na vytvorenie základnej animácie pomocou niektorej z vstavaných grafiky a časovača komponentov . Tento tutoriál vám dá návod na vytvorenie jednoduchej animácie , kde sa lopta odraziť na okrajoch formulára . Pokyny dovolená 1

Vytvorte nový projekt kliknutím na " Súbor " , " New Project " .
2

Vytvoriť oválny zložku vo forme pretiahnutím ovál z panela nástrojov do formy . Pretiahnite rohy takým spôsobom , aby to vyzeralo rozumne kruhový .
3

Vytvorte priečinok časovača vo formulári pretiahnutím z panela nástrojov . Táto komponenta nebude vidieť pri behu , ale bude poskytovať službu , ktorá " tiká " každý nastaviť množstvo času . Tieto kliešte môžu byť spojené s funkciou vykonávať pravidelné úlohy , ako je aktualizácia snímku animácie .
4

deklarovať a inicializovať dve rýchlosti premenných kliknutím pravým tlačidlom myši na formulár a výberom Zobraziť kód . Vyhlásiť tieto premenné do triedy formulára , ale mimo všetky funkcie , ktoré môže už tam majú . Vložte nasledujúci kód , ako to urobiť :

Verejné speed_x = 5Public speed_y = 5

hodnoty rýchlosti v každom smere môže byť nastavený na čokoľvek chcete a kombinovať rôzne spôsoby , ako dosiahnuť rôzne predvolené uhly a rýchlosti . Pozitívny rýchlosti pozdĺž osi X bude mať za následok pohyb smerom k pravej strane formulára , zatiaľ čo záporné rýchlosti pozdĺž osi X bude mať za následok pohyb smerom k ľavej časti formulára . Pozitívny rýchlosťou pozdĺž osi Y bude mať za následok pohyb smerom dole a záporné rýchlosti smerom k vrcholu .
5

Vykonať späť na návrhári formulára a dvakrát kliknite na formulár vytvoriť udalosť Load formulára . Kód v tejto funkcii budú vykonané vždy , keď je najprv vytvorený program , takže je to dobré miesto na vykonanie inicializácia pre animáciu skákajúceho lopty . Zadajte nasledujúci kód :

Timer1.Interval = 100Timer1.Start ( )

To predpokladá , že ste opustili časovač s predvoleným názvom Timer1 . V opačnom prípade použite názov , ktorý ste dali ju . Interval parameter je počet milisekúnd , ktoré prebiehajú medzi každým rámom . Sto milisekúnd je vlastne predvolená hodnota , ale môžete ju zmeniť tak , aby vyhovovali vašim potrebám .
6

Vykonať späť na návrhári formulára kliknite na záložku " Form Designer " a dvakrát kliknite Objekt Timer vytvoriť " kliešť " udalosť . Zadajte nasledujúci kód v ňom :

Ak OvalShape1.Left ( ) < 0 potom speed_x = speed_x * - 1Pokud OvalShape1.Right ( ) > Me.Width Potom speed_x = speed_x * - 1Pokud OvalShape1.Top ( ) < 0 potom speed_y = speed_y * - 1Pokud OvalShape1.Bottom ( ) > Me.Height potom speed_y = speed_y * -1

OvalShape1.Location = New System.Drawing.Point ( OvalShape1.Left ( ) + speed_x , OvalShape1.Top ( ) + speed_y )

• Predchádzajúca strana: Ako prispôsobiť ValidationSummary 
• Ďalšia strana: Definícia udalosti v jazyku Visual Basic