private sub form_load
plasound = ("theplacewhereitssaved")

endsub

 

if 3 = 3 then[INDENT]if 3 < 6 then[/INDENT][INDENT][INDENT]end[/INDENT][/INDENT][INDENT]End IF[/INDENT]
endif

(form1)

private sub command1_click ()[INDENT]me.hide[/INDENT][INDENT]form2.show[/INDENT][INDENT]form2.textbox1.text = me.textbox1.text[/INDENT]

end sub

(form2)

private sub command1_click ()[INDENT]me.hide[/INDENT][INDENT]form1.show[/INDENT][INDENT]form1.textbox1.text = me.textbox1.text[/INDENT]

end sub

Private Sub form1_Keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
[INDENT]If e.KeyChar = Microsoft.VisualBasic.ChrW(32) then[/INDENT][INDENT][INDENT]If count >= threshold[/][/]

private sub form1_keypress (keyascii as integer)

if image1.top <= image2.top + 105 and image1.top >= image2.top - 105 then
msgbox ("crashed")
endif