آیا با ویژوال میشه کاراکتر ستاره دار رو خواند؟

[scarce]

سلام دوستان عزیز

من یه برنامه دیدم که میتونست کاراکتر های ستاره دار رو نشون بده بعد از کلی تحقیق تازه فهمیدم این برنامه با دلفی نوشته شده بود ولی هر چی تو اینترنت و این سایت جستجو کردم سورسی مرتبط با ویژوال بیسیک پیدا نکردم آیا مشکل از ویژوال بیسیک هست ؟ :متفکر:

[r0ot$harp]

دوست عزیز شما یک نوع سوال را در نوع متن در این قسمت ارسال کرده اید . دوست عزیز در این تاپیک http://barnamenevis.org/forum/showthread.php?p=512840#post512840 شما می توانید سوالتون رو دنبال کنید .


باتشکر احسان

[roomezonline]

سلام دوستان عزیز

من یه برنامه دیدم که میتونست کاراکتر های ستاره دار رو نشون بده بعد از کلی تحقیق تازه فهمیدم این برنامه با دلفی نوشته شده بود ولی هر چی تو اینترنت و این سایت جستجو کردم سورسی مرتبط با ویژوال بیسیک پیدا نکردم آیا مشکل از ویژوال بیسیک هست ؟ :متفکر:

سلام دوست من شما با اين كد ميتونيد پسورد هاي ستاره اي رو بخوني:چشمک:د




Function GetText(hwnd) As String
nRet = SendMessage(hwnd, EM_GETPASSWORDCHAR, 0&, 0&)
If nRet <> 0 Then
'agar nRet<>0 bashad yani text box passworde
'* ro az roye text box barmidarim
PostMessage hwnd, EM_SETPASSWORDCHAR, 0&, 0&
End If
GetTrim = Sendmessagebynum(hwnd, 14, 0&, 0&)
TrimSpace$ = Space$(GetTrim)
GetString1 = SendMessageByString(hwnd, 13, GetTrim + 1, TrimSpace$)
If nRet <> 0 Then
'dobare * ro roye password mizarim
PostMessage hwnd, EM_SETPASSWORDCHAR, Asc("*"), 0&
End If
GetText = TrimSpace$
End Function

[scarce]

سلام دوست من شما با اين كد ميتونيد پسورد هاي ستاره اي رو بخوني:چشمک:د




Function GetText(hwnd) As String
nRet = SendMessage(hwnd, EM_GETPASSWORDCHAR, 0&, 0&)
If nRet <> 0 Then
'agar nRet<>0 bashad yani text box passworde
'* ro az roye text box barmidarim
PostMessage hwnd, EM_SETPASSWORDCHAR, 0&, 0&
End If
GetTrim = Sendmessagebynum(hwnd, 14, 0&, 0&)
TrimSpace$ = Space$(GetTrim)
GetString1 = SendMessageByString(hwnd, 13, GetTrim + 1, TrimSpace$)
If nRet <> 0 Then
'dobare * ro roye password mizarim
PostMessage hwnd, EM_SETPASSWORDCHAR, Asc("*"), 0&
End If
GetText = TrimSpace$
End Function


سلام دوست عزیز از بایت این سورس ممنون ولی این سورس آقا احسان تو یه تایپیکی زده بود البته از این کد شما استفاده کردم ولی فکر کنم یه چیز هایی کم داشت مثل API و چند تا چیز دیگه ولی بازم ممنون.