سوال در مورد xml

[sonofsun]

سلام به همه ی دوستان
من یه فایل xml درست کردم و برای دسترسی به اون از کد زیر استفاده کردم.

Sub ReadXmlFile()
Dim d = gdate.GetDayOfMonth(Date.Now).ToString
Dim doc = XDocument.Load("XMLFile1.xml")
Dim Hadis = doc.<hadis>.<d10>
htext.Text = Hadis.Value
End Sub


می خوام از متغیر d به جای d10 استفاده کنم چی جوری می تونم این کار رو بکنم.
کد فایل xml

<?xml version="1.0" encoding="utf-8" ?>
<hadis>
<d10>
آنچه را که برای خود نمی پسندی برای دیگران هم نپسند
امام علی (ع)
</d10>
</hadis>

[فرید نجفلو]

سلام
Dim Hadis = doc.<hadis>(0).Element(d)

[sonofsun]

سلام خیلی ممنون که جواب دادی
میشه در مورد کدت یه کم توضیح بدی
بازم ممنون