دليل استخدام إجراءات VBAppAss.dll للمبرمجين بلغة Visual Basic 6.0

الدالة DNSUIDArrToDNSUIDStr

تحويل مصفوفة DNSUID إلى نص DNSUID.

الصيغة:

Function DNSUIDArrToDNSUIDStr(UIDArr As Variant) As String

الصنف:
TString.

الوسائط (Parameters):

الشرح:
هذه واحدة من دوال تحويل أرقام DNSUID. رقم DNSUID هو سلسلة نصية (String) مكونة من 20 رقماً (مثلاً 62020050110194124031)، و يتم توليد هذه الأرقام بحيث لا يمكن أن يتكرر الرقم مرة أخرى. بالإضافة إلى كونه سلسلة نصية، يمكنك التعامل مع الرقم على أنه سجل يتكون من 10 حقول من النوع Byte، و كذلك يمكنك التعامل معه على أنه مصفوفة ذات 10 عناصر من النوع Byte (كل رقمين متتاليين في السلسلة النصية يمثلان بايتاً واحدة)، مع العلم أن تحويل النص إلى سجل أو مصفوفة يبدأ من اليسار إلى اليمين. حيث تقوم هذه الدالة بتحويل رقم DNSUID من مصفوفة إلى نص.
البارامتر UIDArr هو من النوع Variant و يجب أن يحتوي على مصفوفة ذات 10 عناصر من النوع العددي الصحيح (Integer أو Long أو Byte)، لكن أي عنصر في المصفوفة يجب أن تكون قيمته محصورة بين 0 و 99، و إلا فإن الدالة ستعيد نصاً فارغاً.
النص الناتج هو تمثيل نصي لعناصر المصفوفة ابتداءً من أول عنصر في المصفوفة عند بداية النص من اليسار، و انتهاءً بآخر عنصر في المصفوفة عند نهاية النص من اليمين.
يمكنك توليد أرقام DNSUID باستعمال الدالة GetDNSUIDStr أو إحدى أخواتها، و يمكنك استعمال هذه الأرقام كمعرفات فريدة لا تتكرر.

الاستخدام:

Dim ObjString As New TString
Dim UIDArray As Variant

UIDArray = ObjString.GetDNSUIDArr()
Text1.Text = ObjString.DNSUIDArrToDNSUIDStr(UIDArray)

انظر أيضاً:
الدالة DNSUIDRecToDNSUIDStr
الدالة DNSUIDStrToDNSUIDArr
الدالة DNSUIDStrToDNSUIDRec
الدالة GetDNSUIDArr
الدالة GetDNSUIDRec
الدالة GetDNSUIDStr

بداية الصفحة