آموزش ساخت جعبه متن (TextBox) سفارشی محدود به عدد

Public Class NumericTextBox

    Protected Overrides Sub OnKeyPress(e As System.Windows.Forms.KeyPressEventArgs)

        Select Case e.KeyChar

            Case "0" To "9"

            Case Else

                e.Handled = True

        End Select

        MyBase.OnKeyPress(e)

    End Sub

End Class

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

https://aparat.com/v/uBGCr

محدود کردن به حروف فارسی و انگلیسی

محدود کردن به حروف فارسی و انگلیسی

Select Case UCase(e.KeyChar)

Case "ا" To "ی", Chr(Keys.Back), "A" To "Z", Space(1)

Case Else

e.Handled = True

End Select

محدود کردن به اعداد

Select Case e.KeyChar

Case Chr(Keys.Back), "0" To "9"

Case Else

e.Handled = True

End Select

در این ویدئو نحوه محدود کردن TextBox (جعبه متن) برای حروف انگلیسی، فارسی و یا اعداد آموزش داده می شه ....

https://aparat.com/v/CHSGg

آموزش تشخیص اجرای نرم افزار در حالت مدیریتی کاربری ویندوز

در این ویدئو نحوه تشخیص اجرای نرم افزار توسط کاربر در حالت Administrator در کدنویسی توضیح داده شده است.

Dim Role As ApplicationServices.BuiltInRole

        Role = ApplicationServices.BuiltInRole.Administrator

        Dim Expr As Boolean = My.User.IsInRole(Role)

        MsgBox(If(Expr, "برنامه در حالت Administrator اجرا شده است", "برنامه بصورت عادی اجرا شده است"))
https://aparat.com/v/AcjHo

آموزش جداسازی کلمات جمله و اختصاص هر کلمه به یک عنصر از آرایه

در این ویدئوی آموزشی همونی که توی عنوان ویدو نوشتم انجام می شه....

https://aparat.com/v/arj51

آموزش باز تعریف آرایه بدون حذف شدن مقادیر قبلی عناصر

در این ویدئوی آموزشی آرایه بازتغریف و به عناصر آن تعدادی عنصر اضافه شده و با حفظ مقادیر عناصر قبلی و مقدار دهی عناصر جدید مقادی اجزای آن چاپ می شه.

https://aparat.com/v/LYX9U