For Each(plr in Players) <--- I don't know how to do a For Each Statement in VB for the Players
InitializeHUD(plr.UniqueID)
Next
Private Sub InitializeHUD(ByVal ID As Byte)
InSim.Send_BTN_CreateButton("TestButton1234", "", Flags.ButtonStyles.ISB_DARK, 15, 30, 0, 90, 0, 0, ID, 0, False)
End Sub