[Shoot]

HF Giveaway Tool

Introduction
It picks a random user, added in the settings, its just a simple tool i came up with, in my aspect its pretty cool but i created it so what do you guys think?

Picture

Features

• Up To 12 Users
  


• Member Friendly
  


• Add Members/Remove Members
  


• Ban/Unban Members
  


• Ban Checking (Silent)
  

Note: Turning on ban check will be a silent process, upon it detecting if a user is banned it will remove them completely unless you take them off the list, this is good if you have a big giveaway with alot of people

Virus Scan
==> VirusTotal <==

Download
==> Mediafire <==

[Shoot]

Your applications are getting more and more pointless. "Up to 12 users" - why not just use a listbox and create a function that adds a user to the listbox? For your user selection, just use Random.Next(1, ListBox.Items.Count)

no need for negativity. im updating it currently but in other words thanks for the suggestion

[Shoot]

Code

If (MySettingsProperty.Settings.u1.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u1 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u2.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u2 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u3.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u3 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u4.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u4 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u5.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u5 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u6.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u6 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u7.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u7 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u8.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u8 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u9.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u9 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u10.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u10 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u11.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u11 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If
      If (MySettingsProperty.Settings.u12.Contains(MySettingsProperty.Settings.list)) Then
      MySettingsProperty.Settings.u12 = ""
      MySettingsProperty.Settings.Save()
      Me.checkBan.[Stop]()
      End If

You're doing all this in a tick event? Holy hell.

for the checkBan because i dont know any other way to do so :(

[Entire]

Although it is pointless as fuck when you could use random.org for post count, I like the theme.