Visual Basic Programming Basics Cheat Sheet by Siniansung

Dim <var_name> as <data-type>

' benutze den Apostroph

[Public/Private] Sub <name>
    <statements>
End Sub

[Public/Private] Function <name> (<arg>) As <result>
     <statements>
     return <result>
End Function

Public Class <name>
    Public <eigenschaftsname>

    Public Property <Name>() As <datatype>
        Get
            <statements>
        End Get
        Set(ByVal value As <datatype>)
            <statements>
        End Set
    End Property
End Class

Private Sub btn_Start_Click(ByVal...)
    ‘Deklaration der Variablen
    Dim var1 As Single
    Dim var2 As Single
    ‘Eingabe der Variable
    var1=tb_var1.Text
    ‘Verarbeitung
    var2 = var1*2
    ‘Ausgabe der Variable 2
    lbl_ziel.Text = var2
End Sub

For index = 0 to array.length-1
    Array(index) = ...
Next

Dim werte(0 to n) as <Datentyp>

Dim werte() as <Datentyp> = {w1,w2,w3,w4}

' Eingabe über ein Objekt mit Texteigenschaften
<variable> = <Objektname>.Text

' Ausgabe über ein Objekt mit Texteigenschaft
<Objektname>.Text = <variable>

If <bedingung> Then
    <statements>
[ElseIf <bedingung> Then]    'optionale Bedingung
    <statements>
Else
    <statements>
End If

Select Case <expression>
    Case 0  'einfacher Wert
        <statements>
    Case 1 To 5     'mehrere Werte
        <statements>
    Case Is <5      'Bereich von Werten
        <statements>
    Case Else
        <statements>
End Select

For <zaehler> = <start> To <end> Step <inc>
    <statements>
Next

Do While <bedingung>
    <statements>
Loop
'  oder
Do until <bedingung>
    <statements>
Loop

Do 
    <statements>
Loop while <bedingung>
'  oder
Do 
    <statements>
Loop until <bedingung>

<Objektname>.Image = My.Resources.<bildname>

My.Computer.Audio.Play(<dateipfad>,<option>)

<dateipfad> = My.Resources.<dateiname>
<option> = AudioPlayMode.Background
           AudioPlayMode.BackgroundLoop
           AudioPlayMode.WaitToComplete