Referenced files in a drawing

[cmines]

I have a 2 part assembly on a drawing.  When I use the following code, checkFilename is giving me the full file name of one of the parts instead of the full file name of the assembly.  How can I fix this?  Thanks in advance for any help!

Dim checkBalloon As Balloon

Dim valueSet As BalloonValueSet

Set valueSet = CheckBalloon.BalloonValueSets.Item(1)

Dim checkFilename As String

checkFilename = valueSet.ReferencedFiles.Item(1).FullFileName

[cmines]

I was able to figure this one out.

checkFilename = valueSet.RerferencedRow.Parent.ReferencedDocumentDescriptor.FullDocumentName

I'm not too sure how robust this is, but it works for now.