بدست آوردن نام فایل بدون قالب(Extension) فایل

در این ویدئو برای برست آورد نام فایل بدون قالب فایل از متود GetFileNameWithoutExtension استفاده می شود....IO.Path.GetFileNameWithoutExtension(Item)https://aparat.com/v/bgrIB

نمایش نام فایل پروژه بجای آدرس کامل در لیست تاریخچه

در این ویدئو بجای آدرس پروژه بصورت کامل فقط نام فایل پروژه به نمایش درآمده و آدرس کامل در Tag از آیتم قرار می گیرد....

https://aparat.com/v/ohUg2

اضافه کردن آخرین پروژه ویرایش شده در ابتدای لیست تاریخچه

در این ویدئو نحوه اضافه شدن آخرین پروژه ویرایش شده در فایل تاریخچه و جلوگیری از ثبت آدرس تکراری توضیح داده شده....

https://aparat.com/v/BV105

ایجاد بخش تاریخچه پروژه ها بصورت کامل (از ایجاد کلاس تا بکارگیری)

در این ویدئو بخش تاریخچه پروژه ها از ایجاد کلاس تا بکارگیری آن بصورت کامل توضیح داده شده....

Imports System.Xml

Public Class ProjectsRecent

    Private Shared Document As New XmlDataDocument

    Private Shared Documentpath As String = String.Format("{0}\{1}", Application.LocalUserAppDataPath, "ProjectsRecent.xtd")

    Private Shared ItemsValue As New List(Of String)

    Public Shared ReadOnly Property Items() As ObjectModel.ReadOnlyCollection(Of String)

        Get

            Return ItemsValue.AsReadOnly

        End Get

    End Property

    Shared Sub Load()

        If IO.File.Exists(Documentpath) Then

            Document.Load(Documentpath)

        Else

            Document.LoadXml("")

        End If

        ItemsValue.Clear()

        With Document.DocumentElement

            For Each Item As XmlElement In .ChildNodes

                ItemsValue.Add(Item.InnerText)

            Next

        End With

    End Sub

    Shared Sub Add(Path As String)

        If Path.IsNullOrEmpty Then Exit Sub

        Dim Element As XmlElement = Document.CreateElement("Item")

        Element.InnerText = Path

        With Document

            With .DocumentElement

                For Each Item As XmlElement In .ChildNodes

                    If Item.InnerText.ToLower = Path.ToLower Then

                        Exit Sub

                    End If

                Next

                .AppendChild(Element)

            End With

            .Save(Documentpath)

        End With

    End Sub

End Class

ذخیره متن در فایل متنی بصورت راست به چپ

در این ویدئو نحوه استفاده از کلاس RichTextBox برای ذخیره متن در فایل متنی بصورت راست به چپ برای فارسی توضیح داده شده....

https://aparat.com/v/S3t7m