Opasarkisto: Visual Basic -opas: Osa 6 - Hiiri ja näppäimistö

Tässä osassa käydään ensin läpi hiiren ja näppäimistön käsittely perustasolta ja sitten tutustutaan VB:n monipuolisiin merkkijonofunktioihin.

Hiiren käsittely

Hiiren käsittelyyn on kolme tapahtuma-aliohjelmaa, jotka löytyvät useimmista komponenteista. Ne ovat MouseDown, MouseMove ja MouseUp. Aliohjelmilla on seuraava tarkoitus:

Tapahtuma-aliohjelmissa on lisäksi käytössä seuraavat erikoismuuttujat:

Seuraava esimerkki luo yksinkertaisen piirto-ohjelman. Piirtokomennot PSet ja Line käsitellään oppaan seuraavassa osassa.

Private Sub Form_Load
    Me.DrawWidth = 4 'viivan paksuus 4
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    PSet (X, Y)
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Static vx As Single, vy As Single 'muuttujat osoittimen vanhalle paikalle
    If Button = 1 Then
        If vx <> 0 And vy <> 0 Then
            Line (vx, vy)-(X, Y)
        End If
        vx = X
        vy = Y
    Else
        vx = X
        vy = Y
    End If
End Sub

Näppäimistön käsittely

Näppäimistön käsittely on hyvin samantapaista kuin hiiren käsittely. Näppäimistöaliohjelmia on kolme, KeyDown, KeyPress ja KeyUp. Aliohjelmilla on seuraava tarkoitus:

KeyPress on ylemmän tason käsittelijä, ja se aktivoituu vain, jos KeyDownissa ei ole tehty mitään. Aliohjelmilla on lisäksi seuraavat erikoismuuttujat:

Käytännössä KeyPress on melko turha aliohjelma, samat asiat saa tehtyä KeyDownilla. Jos formilla on komponentteja, KeyPreview-ominaisuus määrittää, että kaikki näppäinpainallukset kulkevat ensin formin näppäimistöaliohjelmille.

Seuraava esimerkki näyttää näppäimistöstä painettaessa näppäinkoodin ja Shift-muuttujan arvon:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    MsgBox "Näppäinkoodi: " & KeyCode & vbCrLf & "Shift: " & Shift
End Sub

VB sisältää useimmille näppäimille vakion, joka korvaa vaikeasti muistettavan KeyCoden. Esimerkiksi näppäimen A vakio on vbKeyA, näppäimen Shift vbKeyShift, näppäimen Esc vbKeyEsc jne. eli vbKey + näppäimen nimi englanniksi.

Merkkijonofunktiot

Visual Basic sisältää monipuoliset merkkijonofunktiot. Tässä kappaleessa käsitellään niistä tärkeimmät.

Lopuksi

Kuudes osa alkaa olla lopussa, mutta ei hätää: jatkoa on luvassa. Miten nopeasti, se riippuu oppaasta saamastani palautteesta, jota voi lähetellä keskustelualueelle tai sähköpostilla.

Seuraavassa osassa käsitellään VB:n grafiikkakomentoja ja ehkä jotain muutakin.