Form1.kbasic_form

CheckBox1_Click (m)

CommandButton1_Click (m)

RadioButton0_Click (m)

CheckBox1_DblClick (m)

ProgressBar0_Click (m)

Class Form1 Inherits Form
' ------------------------------------------------------------------------
  Enum gz
    ELEMENT1 = 1
    ELEMENT2 = 2
    ELEMENT3 = 3
  End Enum

  Sub CheckBox1_Click(m As Mouse)
    Print "Hi"

    CheckBox1.Value = False
    Print "CheckBox1.Value = " & CheckBox1.Value

    CheckBox1.Value = True
    Print "CheckBox1.Value = " & CheckBox1.Value

    ' Deactivate()

  End Sub

  Sub CommandButton1_Click(m As Mouse)
    Dim a = ProgressBar0.Value

    ProgressBar0.Value = 88
    CheckBox1.Value = True
    Label1.Caption = "Julie"

  End Sub

  Sub Label0_Click(m As Mouse)

  End Sub

  Sub Image5_Click(m As Mouse)

  End Sub

  Sub CheckBox1_Enter()

  End Sub

  Sub Form1_Open()
    Print "open"
    Label1.Caption = "111111111111"
  End Sub

  Sub Form1_Activate()

  End Sub

  Sub Form1_Deactivate()
  End Sub

  Sub Form1_Close()
    Label1.Caption = "99999999"
  End Sub

  Sub RadioButton0_Click(m As Mouse)

  End Sub

  Sub CheckBox1_DblClick(m As Mouse)

  End Sub

  Sub ProgressBar0_Click(m As Mouse)

  End Sub

' ------------------------------------------------------------------------
End Class