Type testName(Name As String, doc_ID As String)
'''''In my main class this is how I populate the info into the DT.
Dim data As testName
data.Name = "test data here"
data.DOC_ID = someNum
myButton.Tag = data
'''''''''''''''''''''''''''''''''''''''''''