وقت بخیر دوستان، با آموزش برنامه نویسی (Visual Basic.NET (VB.NET از وب سایت پی وی لرن همراه هستیم. بررسی رشته ها یا Strings در VB.net را با چند مثال از متدهای کلاس رشته در VB.net ادامه می دهیم. با مثال ها همراه باشید.
مثال های زیر برخی از روش های ذکر شده در جلسه ی قبل را نشان می دهد.
مقایسه ی رشته ها
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | Module strings Sub Main() Dim str1, str2 As String str1 = "This is test" str2 = "This is text" If (String.Compare(str1, str2) = 0) Then Console.WriteLine(str1 + " and " + str2 + " are equal.") Else Console.WriteLine(str1 + " and " + str2 + " are not equal.") End If Console.ReadLine() End Sub End Module |
هنگامی که کد بالا کامپایل و اجرا شد ، نتیجه زیر را ایجاد می کند.
1 | This is test and This is text are not equal. |
String Contains String
1 2 3 4 5 6 7 8 9 10 11 | Module strings Sub Main() Dim str1 As String str1 = "This is test" If (str1.Contains("test")) Then Console.WriteLine("The sequence 'test' was found.") End If Console.ReadLine() End Sub End Module |
هنگامی که کد بالا کامپایل و اجرا شد ، نتیجه زیر را ایجاد می کند.
1 | The sequence 'test' was found. |
دریافت یک Substring:
1 2 3 4 5 6 7 8 9 10 11 | Module strings Sub Main() Dim str As String str = "Last night I dreamt of San Pedro" Console.WriteLine(str) Dim substr As String = str.Substring(23) Console.WriteLine(substr) Console.ReadLine() End Sub End Module |
هنگامی که کد بالا کامپایل و اجرا شد ، نتیجه زیر را ایجاد می کند.
1 2 | Last night I dreamt of San Pedro San Pedro. |
پیوستن Strings
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | Module strings Sub Main() Dim strarray As String() = { "Down the way where the nights are gay", "And the sun shines daily on the mountain top", "I took a trip on a sailing ship", "And when I reached Jamaica", "I made a stop" } Dim str As String = String.Join(vbCrLf, strarray) Console.WriteLine(str) Console.ReadLine() End Sub End Module |
هنگامی که کد بالا کامپایل و اجرا شد ، نتیجه زیر را ایجاد می کند.
1 2 3 4 5 | Down the way where the nights are gay And the sun shines daily on the mountain top I took a trip on a sailing ship And when I reached Jamaica I made a stop |
با بررسی رشته ها یا Strings در VB.net همراه بودیم و در این بخش چند نمونه و مثال از متدهای کلاس رشته در VB.net رو مورد بررسی قرار دادیم. در جلسه ی آینده با مبحث Date & Time در خدمتتون خواهیم بود. با وب سایت اموزشی پی وی لرن همراه باشید.
MOSTAFA
سلام من میخوام در فرم اصلی وقتی دکمه های میانبر رو میزنم فرم مد نظرم باز بشه مثلا کلید عدد ۲۵ و میزنم فرم ۱ باز بشه وقتی کلید ۲a میزنم فرم ۲ کلید ۶c میزنم فرم ۳ به همین ترتیب میخوام کلید برای فرم های مدنظرم تعریف کنم با یک حرف میتونم باز کنم ولی با دو حرف نشد در ضمن از کلیدهای Ctrl , Alt ,Shift نمیخوام استفاده گنم فقط از اعداد رقمی ۱۰ تا ۹۹ و ترکیبشون با حروف مثل ۲a , 3b 4a 8k 9m و غیره ……