[Anas Mahmoud]

ال tag  على حد علمي تأخد كائن من النوع object وبالتالي يمكن ان تسند له List(of double) مثلا بدلا من double 

كود :

 Dim list1 As New List(Of Double)({2.1, 3.4, 3.5, 7.7})

        Button1.Tag = list1

وعند الحاجة اليها في مكان اخر في الكلاس يمكنك استخدام DirectCast :

كود :

 Dim list1 = DirectCast(Button1.Tag, List(Of Double))

        MsgBox(list1(2))

وكل عام وانت بخير