PDA

View Full Version : طریق نسبت دادن یه رویدا به یک کلید کیبورد



ykm145
دوشنبه 07 فروردین 1385, 16:32 عصر
دوستان معادل کار یک ماکرو autokeys (نسبت دادن یه رویداد به کلیدی از صفحه کلید)در یک ماجول چطور است

sarami
جمعه 11 فروردین 1385, 03:46 صبح
در قسمت onkeypress این کد رو قرار بده و با یه دستور select نسبت کلید خاصی رویداد خودت رو بنویس
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim strCharacter As String
strCharacter = Chr(KeyAscii)
MsgBox strCharacter
End Sub

ykm145
جمعه 11 فروردین 1385, 14:05 عصر
ممنون اقای صارمی
اگر بخواهی از کلیدهای ترکیبی استفاده کنی مثل ctrl+j
باتشکر

sarami
شنبه 12 فروردین 1385, 02:46 صبح
اول باید کد اسکی اون رو شناسائی کنی بعد با استفاده از کد اسکی بهش واکنش نشون بدی از همون کدی که برات گذاشتم برا شناسائی کد اسکی میتونی استفاده کنی