دسته‌بندی ترفند ها

استفاده از هندلر تیک تایمر برای اجرای پروسیجر ها

برای استفاده از تایمر راه ساده این است که قطعه کدی که میخواهید تکرار شود را در Timer1_Tick بنویسید

ولی زمانیکه میخواهید در دوره های زمانی مختلف قطعه کد های مختلفی را اجرا نمایید میتوانید فقط با فعال کردن تایمر و آدرس دهی تابع جدید که در اینجا با نام ActionSub آمده است، تابع جدید را فراخوانی نمایید.

Timer1.Enabled = True

AddHandler Timer1.Tick, AddressOf Me.ActionSub

سجّاد صرّاف مقدّم دوشنبه 1 خرداد‌ماه سال 1391 ساعت 06:20 ب.ظ

0 نظر

تغییر Home Page مرورگر Internet Explorer

ابتدا Namespace زیر را به ابتدای پنجره کد نویسی وارد کنید

Imports Microsoft.Win32

سپس از تابع زیر برای تغییر صفحه خانگی اینترنت اکسپلورر استفاده نمایید

    Public Sub Homepage(ByVal text As String)
        Dim key As RegistryKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Internet Explorer\Main", True)
        key.SetValue("Start Page", text)
    End Sub

طریقه فراخوانی این تابع نیز به صورت زیر است

Call Homepage("www.sarafmoghadam.com")

سجّاد صرّاف مقدّم دوشنبه 1 خرداد‌ماه سال 1391 ساعت 05:57 ب.ظ

0 نظر

افزایش زمان SplashScreen

صفحه SplashScreen همان صفحه ای است که برای معرفی نرم افزار در ابتدای برنامه باز و سپس بسته میشود.

با استفاده از قطعه کد زیر میتوانید مدت زمان پخش صفحه SplashScreen را افزایش دهید

Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
            ' Set the display time to 5000 milliseconds (5 seconds).
            Me.MinimumSplashScreenDisplayTime = 10000
            Return MyBase.OnInitialize(commandLineArgs)
End Function

برای وارد کردن این کد باید مراحل زیر را طی کنید

1. ابتدا وارد Properties پروژه تان شوید