Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Muutamia hyödyllisiä käskyjä

Syöttö, käsittely ja tulostus

...

Code Block
'MäärittelytSub TietojenKysely()
'Muuttujien esittely
Dim etunimi, sukunimi, kokonimi As String
'SyöttöTietojen syotto
etunimi = InputBox("Kirjoita etunimesi")
sukunimi = InputBox("Kirjoita sukunimesi")
'KäsittelyTietojen yhdistaminen
kokonimi = etunimi & " " & sukunimi
'Tulostus
MsgBox ("Nimesi on " & kokonimi)
End Sub

...