Iranian Scorpion Security Group

از خصوصیت Tag غافل نشوید

بیشتر برنامه نویسان Visual Basic هیچ وقت از خصوصیت Tag که همراه اغلب کنترلها هست، استفاده نمی کنند. براستی این خصوصیت که کاری انجام نمی دهد، پس فلسفه وجودی آن چیست؟ واقعیت آنست که این خصوصیت در موارد زیادی بسیار سودمند است. می تواینید هر گونه اطلاعاتی که می خواهید را در خصوصیات Tag کنترل ذخیره کنید و بهر طریقی که مایلید از آن اطلاعات استفاده کنید.

یک مثال، زمانی است که آرایه ای از کنترلهای CommandButton ایجاد می کنید. برنامه نویسان اغلب از آرگومان Index که به روال رویداد Click پاس داده می شود، برای تشخیص اینکه کدام دکمه از آرایه کلیک شده است استفاده می کنند. با انتساب یک مقدار گویا به خصوصیت  Tag، می توانید در عوض از آن استفاده کرده و در نتیجه کد خواناتری داشته باشید. در اینجا کدی برای یک مثال ساده می بینید:       

Private Sub Command1_Click(Index As Integer)

Select Case Command1(Index).Tag
    Case "Exit"
        ' Code to exit the program goes here.
    Case "Cancel"
        ' Code to cancel goes here.
End Select

End Sub

یک روش دیگر برای استفاده از خصوصیات Tag زمانی است که با کنترل TreeView کار می کنید. TreeView از چندین گره تشکیل می شود وخوبست که بازای هر گره، علاوه بر متنی که نمایش می دهد،  داده هایی مرتبط با آن داشته باشیم. اینکار را می توان بسادگی با استفاده از خصوصیت Tag هر کدام از گره ها انجام داد.

Accessibility Controls
access.cpl

Add Hardware Wizard
hdwwiz.cpl

Add/Remove Programs
appwiz.cpl

Administrative Tools
control admintools

Automatic Updates
wuaucpl.cpl

Bluetooth Transfer Wizard
fsquirt

Calculator
calc

Certificate Manager
certmgr.msc

Character Map
charmap

Check Disk Utility
chkdsk

Clipboard Viewer
clipbrd

Command Prompt
cmd

Component Services
dcomcnfg

Computer Management
compmgmt.msc

Date and Time Properties
timedate.cpl

DDE Shares
ddeshare

Device Manager
devmgmt.msc

Direct X Control Panel (If Installed)*
directx.cpl

Direct X Troubleshooter
dxdiag

Disk Cleanup Utility
cleanmgr

Disk Defragment
dfrg.msc

Disk Management
diskmgmt.msc

Disk Partition Manager
diskpart

Display Properties
control desktop

Display Properties
desk.cpl

Display Properties (w/Appearance Tab Preselected)
control color

Dr. Watson System Troubleshooting Utility
drwtsn32

Driver Verifier Utility
verifier

Event Viewer
eventvwr.msc

File Signature Verification Tool
sigverif

Findfast
findfast.cpl

Folders Properties
control folders

Fonts
control fonts

Fonts Folder
fonts

Free Cell Card Game
freecell

Game Controllers
joy.cpl

Group Policy Editor (XP Prof)
gpedit.msc

Hearts Card Game
mshearts

Iexpress Wizard
iexpress

Indexing Service
ciadv.msc

Internet Properties
inetcpl.cpl

IP Configuration (Display Connection Configuration)
ipconfig /all

IP Configuration (Display DNS Cache Contents)
ipconfig /displaydns

IP Configuration (Delete DNS Cache Contents)
ipconfig /flushdns

IP Configuration (Release All Connections)
ipconfig /release

IP Configuration (Renew All Connections)
ipconfig /renew

IP Configuration (Refreshes DHCP & Re-Registers DNS)
ipconfig /registerdns

IP Configuration (Display DHCP Class ID)
ipconfig /showclassid

IP Configuration (Modifies DHCP Class ID)
ipconfig /setclassid

ava Control Panel (If Installed)
jpicpl32.cpl

Java Control Panel (If Installed)
javaws

Keyboard Properties
control keyboard

Local Security Settings
secpol.msc

Local Users and Groups
lusrmgr.msc

Logs You Out Of Windows
logoff

Microsoft Chat
winchat

Minesweeper Game
winmine

Mouse Properties
control mouse

Mouse Properties
main.cpl

Network Connections
control netconnections

Network Connections
ncpa.cpl

Network Setup Wizard
netsetup.cpl

Notepad
notepad

Nview Desktop Manager (If Installed)
nvtuicpl.cpl

Object Packager
packager

ODBC Data Source Administrator
odbccp32.cpl

On Screen Keyboard
osk

Opens AC3 Filter (If Installed)
ac3filter.cpl

Password Properties
password.cpl

Performance Monitor
perfmon.msc

Performance Monitor
perfmon

Phone and Modem Options
telephon.cpl

Power Configuration
powercfg.cpl

Printers and Faxes
control printers

Printers Folder
printers

Private Character Editor
eudcedit

Quicktime (If Installed)
QuickTime.cpl

Regional Settings
intl.cpl

Registry Editor
regedit

Registry Editor
regedit32

Remote Desktop
mstsc

Removable Storage
ntmsmgr.msc

Removable Storage Operator Requests
ntmsoprq.msc

Resultant Set of Policy (XP Prof)
rsop.msc

Scanners and Cameras
sticpl.cpl

Scheduled Tasks
control schedtasks

Security Center
wscui.cpl

Services
services.msc

Shared Folders
fsmgmt.msc

Shuts Down Windows
shutdown

Sounds and Audio
mmsys.cpl

Spider Solitare Card Game
spider

SQL Client Configuration
cliconfg

System Configuration Editor
sysedit

System Configuration Utility
msconfig

System File Checker Utility (Scan Immediately)
sfc /scannow

System File Checker Utility (Scan Once At Next Boot)
sfc /scanonce

System File Checker Utility (Scan On Every Boot)
sfc /scanboot

System File Checker Utility (Return to Default Setting)
sfc /revert

System File Checker Utility (Purge File Cache)
sfc /purgecache

System File Checker Utility (Set Cache Size to size x)
sfc /cachesize=x

System Properties
sysdm.cpl

Task Manager
taskmgr

Telnet Client
telnet

User Account Management
nusrmgr.cpl

Utility Manager
utilman

Windows Firewall
firewall.cpl

Windows Magnifier
magnify

Windows Management Infrastructure
wmimgmt.msc

Windows System Security Tool
syskey

Windows Update Launches
wupdmgr

Windows XP Tour Wizard
tourstart

Wordpad
write

جلوگیری از اجرای چندین نمونه از یک برنامه

بسیاری از برنامه های ویندوز، از جمله برنامه هایی که توسط Visual Basic ایجاد می شوند، اجازه اینرا می دهند که در آن واحد، بیش از یک نمونه یا کپی از برنامه اجرا شود.  برای مثال می توانید در یک زمان، دو یا چند کپی از Notepad را در حال اجرا داشته باشید و با آن فایلهای متنی مختلف را ویرایش کنید.  مواردی هستند که در آنها مجاز دانستن چندین نمونه از یک برنامه فکر خوبی نیست. ممکن است برنامه ای یک فولدر را زیرنظر داشته باشد و بدنبال فایل های جدیدی باشد که در آن قرار داده می شود؛ بدین ترتیب هیچ نیازی به داشتن دو نمونه در حال اجرا از این برنامه نیست. همینطور برنامه ای که که front-end یک بانک اطلاعاتی است بایستی محدود به یک نمونه گردد، چراکه داشتن دو یا چند کپی اجرایی از آن در یک زمان ممکن است منجر به خطاهای کار با داده ها شود.

برای جلوگیری از اجرای همزمان چندین نمونه از یک برنامه، از خصوصیت App.PrevInstance استفاده کنید. این خصوصیت درصورتیکه نمونه دیگری از برنامه در حال اجرا باشد، مقدار True بر می گرداند. می توانید در یک روتین رویداد Load برنامه از این خصوصیت استفاده کنید. می توانید اگر مقدار True برگرداند، پیغامی را به کاربر نشان دهید و در صورت تمایل قبل از متوقف کردن نمونه تکراری جدید، کپی در حال اجرا را فعال سازید. در زیر نمونه کدی که باید آنرا در روتین رویداد Load قرار دهید آمده است:           

If App.PrevInstance Then
    MsgBox "یک نمونه دیگر از این برنامه اکنون در حال اجراست"
    AppActivate App.Title
    Unload Me
End If

منبع: http://www.pgacon.com/visualbasic.htm

نویسنده: Peter G. Aitken

لینک به منبع: http://www.pgacon.com/visualbasic.htm#Prevent%20Multiple%20Program%20Instances%20From%20Running

باسلام خدمت دوستان عزیز،

من بیتا، یه برنامه نویس تازه کار که اصلا خبره هم نیست و خودش هم مرتب داره از دیگران و اینجا و اونجا چیز یاد می گیره و بهمین دلیل هیچ ادعایی نداره، با یاد ایزد یکتا و امید به اینکه مطالبی که اینجا می نویسم مفید باشه و آموزنده، شروع می کنم. امیدوارم که فرصت کافی داشته باشم و بتونم در آینده بخش نکته ها و ترفندهای Visual Basic رو مرتب بروز کنم. لطفا از نظر دادن دریغ نفرمائید!