عبارات باقاعده Regular Expressions

عبارات باقاعده برای تست کردن رشته هایی بکار میروند که میخواهیم نظم خاصی در کاراکترهای آن رشته وجود داشته باشد.

سه کتاب هم در این ضمینه دانلود کرده ام که در این وبلاگ میگذارم

مثال:
میخواهیم فقط رشته ای از اعداد  را از ورودی دریافت داریم که در آن 5 رقم متوالی وجود داشته باشد
مانند شکل زیر میتوانیم کاراکتر ها را مشخص کنیم

Imports System.Text.RegularExpressions

Dim regularExpression As String = "^\d{5}$"
Dim inputtext As String = InputBox("Enter regular expression: ")
If Regex.IsMatch(inputtext, regularExpression) Then
     MsgBox("is match")
Else
     MsgBox("is not match")
End If

استفاده از فضای امن IsolatedStorage برای ذخیره اطلاعات

IsolatedStorage یک فایل خصوصی سیستمی است که توسط دات نت مدیریت می شود.

Imports System.IO
Imports System.IO.IsolatedStorage

برای ساختن یک فایل IsolatedStorage

Dim IsoStore As IsolatedStorageFile = IsolatedStorageFile.GetUserStoreForAssembly
Dim IsoFile As IsolatedStorageFileStream = New IsolatedStorageFileStream("mytextfile.txt", FileMode.Create, IsoStore)
Dim sw As New StreamWriter(IsoFile)
sw.WriteLine("my computer name is: " & My.Computer.Name)
sw.Close()

برای خواندن از یک فایل IsolatedStorage

Dim IsoStorage As IsolatedStorageFile = IsolatedStorageFile.GetUserStoreForAssembly
Dim IsoFile As IsolatedStorageFileStream = New IsolatedStorageFileStream("mytextfile.txt", FileMode.Open, IsoStorage)
Dim sr As New StreamReader(IsoFile)
MsgBox(sr.ReadToEnd.ToString)
sr.Close()

فشرده کردن فایل ها و بازکردن آنها با استفاده از GZipStream

Imports System.IO
Imports System.IO.Compression

ساخت یک فایل فشرده:

Dim gzOut As New GZipStream(File.Create("data.zip"), CompressionMode.Compress)
Dim sw As New StreamWriter(gzOut)
For i As Integer = 1 To 999
     sw.Write("Hello, World! ")
Next
sw.Close()
gzOut.Close()

برای خواندن و باز کردن فایل های فشرده نیز مانند کد های پایین عمل میکنیم:

Dim gzIn As New GZipStream(File.OpenRead("data.zip"), CompressionMode.Decompress)
Dim sr As New StreamReader(gzIn)
MsgBox(sr.ReadToEnd())
sr.Close()
gzIn.Close()

تولد ۳۰ سالگی DOS

27 July 1981

سال ۱۹۸۱، اولین نسخه سیستم‌عامل DOS روانه بازار شد. سیستم‌عاملی که مایکروسافت بعد از نسخه چهارم تصمیم داشت تا تقریبا آن‌را به‌طور کامل از بین ببرد و حالا، بعد از گذشت ۳۰ سال از اولین ارائه آن Dos سی ساله شده است.
هسته اولیه این سیستم‌عامل توسط یک شرکت در سیاتل نوشته شده بود تا با آن، کارهای آزمایشگاهی خود را انجام دهند. تقریبا در همان زمان، مایکروسافت قرار بود تا برای کامپیوترهای شخصی IBM، سیستمی را طراحی کند؛ بنابر این، آنرا خریداری کرده و توسعه داد.

ذخیره داده در حافظه توسط MemoryStream

MemoryStream نوع داده ای است برای ذخیره موقت در حافظه و سپس ذخیره آن به طور یکجا در دیسک.

در محیط های چند کاربره ، وقتی شما میخواهید روی یک سری اطلاعات فرایندی را انجام دهید و سپس نیاز به ذخیره آن داشته باشید استفاده میشود.

Imports System.IO

Dim ms As New MemoryStream()

Dim sw As New StreamWriter(ms)
sw.WriteLine("Hello, World!")
sw.Flush()
ms.WriteTo(File.Create("d:\memory.txt"))
sw.Close()
ms.Close()