Attribute VB_Name = "ComputorMain"
Option Explicit

Public Sub Main()
'Do While Suicide = False
'    DoEvents
'Loop
End Sub