آیدی کنترل های InputBox

ارسال تکست به کپشن پنجره در صورت فشردن باتن Ok در صورتیکه تعداد کاراکتر داخل کنترل ادیت  بیشتر از 13 باشد

 Edit Control Notification Codes'

EN_SETFOCUS=&H100

EN_KILLFOCUS=&H200

---

EN_CHANGE=&H300

Parameters

wParam

The LOWORD contains the identifier of the edit control

.The HIWORD specifies the notification code

lParam

A handle to the edit control

To receive EN_CHANGE notification codes, specify ENM_CHANGE in the mask sent with 

the EM_SETEVENTMASKmessage 

(SendMessageA hwndEdit,EM_SETEVENTMASK,0,ENM_CHANGE)

EM_SETEVENTMASK message
Private Const EM_SETEVENTMASK As Integer = 1073

ENM_NONE = 0
ENM_CHANGE = 1
ENM_UPDATE = 2

Parameters

wParam

.This parameter is not used; it must be zero

lParam

New event mask for the rich edit control. For a list of 

.event masks, see Rich Edit Control Event Mask Flags

Return value

.This message returns the previous event mask

Remarks

The default event mask (before any is set) is 

.ENM_NONE

---

EN_UPDATE=&H400

EN_ERRSPACE=&H500

EN_MAXTEXT=&H501

WndProc

Case WM_COMMAND

    Case 1

(InputDataLen=SendDlgItemMessage(hwnd,EM_LINELENGTH,0,0

if InputDataLen>14 Then 

"....SetWindowTextA hwnd,"Exceed Data

Sleep 1000

End If 

Case 2

Case 4900

End Select 

این پیام هنگامی ارسال میشود که یوزر اقدام به تغییر متن در کنترل EDIT کرده است. ( منظور پیام EN_CHANGE )