behrooz69
پنج شنبه 24 مهر 1393, 16:25 عصر
سلام .
دیدم خیلی از بچه ها با این قضیه مشکل داشتن و از روش های غیر اصولی و درگیر حلقه های زیاد و طولانی شده بودن درگیری و اررور زیادی داشتن خواستم این آموزش رو بذارم.
اینجا میخوام آموزش ساخت اعداد غیر تکراری با استفاده از روش GUID رو بدم . که عددی که تولید میشه هیچ وقت تو برنامتون تکراری نمیشه .
خوب بریم سراغ آموزش .
************************************************** ************************
من تو آموزشم یه عدد 10 رقمی بدون تکرار رو آموزش میدم .
************************************************** ************************
اول یه Masket TextBox روی صفحه قرار بدین .
mask اون رو برابر ده تا 0 یعنی ( 0000000000 ) قرار بدید
مثلا : اسمش رو TxtBedonTekrar بذارید
حالا توی فرم Load برنامتون این کد رو بنویسید :
Dim x() As Byte = Guid.NewGuid.ToByteArray
TxtBedonTekrar.Text = ((BitConverter.ToInt64(x, 0).ToString))
x = Guid.NewGuid.ToByteArray
حالا شما یک عدد 10 رقمی + بدون تکرار دارید .
امید وارم مفید واقع شه واستون
یا حق
دیدم خیلی از بچه ها با این قضیه مشکل داشتن و از روش های غیر اصولی و درگیر حلقه های زیاد و طولانی شده بودن درگیری و اررور زیادی داشتن خواستم این آموزش رو بذارم.
اینجا میخوام آموزش ساخت اعداد غیر تکراری با استفاده از روش GUID رو بدم . که عددی که تولید میشه هیچ وقت تو برنامتون تکراری نمیشه .
خوب بریم سراغ آموزش .
************************************************** ************************
من تو آموزشم یه عدد 10 رقمی بدون تکرار رو آموزش میدم .
************************************************** ************************
اول یه Masket TextBox روی صفحه قرار بدین .
mask اون رو برابر ده تا 0 یعنی ( 0000000000 ) قرار بدید
مثلا : اسمش رو TxtBedonTekrar بذارید
حالا توی فرم Load برنامتون این کد رو بنویسید :
Dim x() As Byte = Guid.NewGuid.ToByteArray
TxtBedonTekrar.Text = ((BitConverter.ToInt64(x, 0).ToString))
x = Guid.NewGuid.ToByteArray
حالا شما یک عدد 10 رقمی + بدون تکرار دارید .
امید وارم مفید واقع شه واستون
یا حق