Remove empty lines and move Form_Close() to End of file

i-nex · Nov 2, 2013 · bb026db · bb026db
1 parent a2dbcd5
commit bb026db
Showing 1 changed file with 7 additions and 12 deletions.
diff --git a/src/i-nex/.src/FUdisks.class b/src/i-nex/.src/FUdisks.class
@@ -20,13 +20,6 @@ Public Sub Button2_Click()
  Finfosys.Show
 End
 
-Public Sub Form_Close()
-
- Me.Close
- Finfosys.Show
-
-End
-
 Public Sub Udisks()
 
   Dim sdx As String
@@ -91,15 +84,17 @@ Public Sub Udisks_get_info()
  GridView1[10, 0].Text = "Removable: "
  GridView1[11, 0].Text = "Has media: "
 
-
-
-
-
-
 End
 
 Public Sub ComboBox1_Click()
 
  Udisks_get_info
 
 End
+
+Public Sub Form_Close()
+
+ Me.Close
+ Finfosys.Show
+
+End