تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[تم الحل] اظهار النص علي هيئة نجوم
#1
السلام عليكم

لي برنامج به مربع بحث InputBox للبحث عن شئ فهل يمكن عند البحث وكتابة النص المراد البحث عنه داخل مربع البحث يتم اظهار النص علي هيئة نجوم ولكم مني جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#2
بسم الله الرحمن الرحيم

عند استخدامك textbox عادي :
1- حدد ال textbox المراد اظهار به النص على شكل نجوم .
2- اذهب لشاشة الخصائص واختر خاصية passwordchar .
3- ضع علامة النجمة من الكيبورد .

انتهى

اما اذا كنت تقصد مربع inputbox الجهاز فأنا والله لا اعرف الطريقة

بالتوفيق
الرد }}}}
تم الشكر بواسطة:
#3
وعليكم السلام ورحمة الله وبركاته

ضع هدا الكود في Module

PHP كود :
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As StringByVal lpWindowName As String) As Long
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As LongByVal hWnd2 As LongByVal lpsz1 As StringByVal lpsz2 As String) As Long
Public Declare Function SetTimerLib "user32" (ByVal hwnd&, ByVal nIDEvent&, ByVal uElapse&, ByVal lpTimerFunc&)
Public Declare Function 
KillTimerLib "user32" (ByVal hwnd&, ByVal nIDEvent&)
Public Declare Function 
SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As LongByVal wMsg As LongByVal wParam As LonglParam As Any) As Long
Const EM_SETPASSWORDCHAR = &HCC
Public Const NV_INPUTBOX As Long = &H5000&
Public 
Sub TimerProc(ByVal hwnd&, ByVal uMsg&, ByVal idEvent&, ByVal dwTime&)
Dim EditHwnd As Long
EditHwnd 
FindWindowEx(FindWindow("#32770"App.Title), 0"Edit""")
Call SendMessage(EditHwndEM_SETPASSWORDCHARAsc("*"), 0)
KillTimer hwndidEvent
End Sub 


وضع الكود التالي في زر

PHP كود :
Private Sub Command1_Click()
Dim A As String
SetTimer hwnd
NV_INPUTBOX10AddressOf TimerProc
InputBox("Enter Password")
MsgBox A
End Sub 


بالتوفيق
الرد }}}}
تم الشكر بواسطة:
#4
جزاك الله خيرا
فعلا مشاركة متميزة
وأود أن تلبي رجائي بشرح حتي ولو بشكل بسيط للأكوادونكون شاكرين جهدك الكريم.
الرد }}}}
تم الشكر بواسطة:
#5
جزاكم الله خيرا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [ تم الحل ] : البحث بأوّل حرف داخل الفليكس جريد عبد العزيز البسكري 5 72 30-11-16, 01:54 AM
آخر رد: عبد العزيز البسكري
  [سؤال] البحث في مربع النص المعتصم بالله جمال الدين 6 190 21-06-16, 05:59 AM
آخر رد: المعتصم بالله جمال الدين
  (تم الحل) سؤال في الاكمال التلقائي (مهم ) awidan76 3 284 17-01-16, 01:16 PM
آخر رد: ahmedabdelaliem
  (تم الحل)مشكلة في الاستعلام بين تاريخين awidan76 13 934 06-01-16, 11:07 AM
آخر رد: Ashraf Elafify
  [تم الحل] كيف يمكنى اضافة ملف exe الى المشروع ..؟ karika 8 1,016 27-12-15, 03:56 AM
آخر رد: awidan76
  [تم الحل] القسم الصحيح من عدد asto 2 407 26-12-15, 02:37 PM
آخر رد: awidan76
  مشكلة فى اظهار الارقام بما يمثلها من اسماء هيثم مازن 0 337 05-06-14, 01:44 PM
آخر رد: هيثم مازن
  سؤال عن اداة النص AhmedSamir3 16 1,604 19-08-13, 09:44 PM
آخر رد: AGASHE
  مرحبا؟اريد كود تصوير الفورم ووضع الصورة في اداة مربع النص واظهار حوار لحفظ الصورة بتنسيق bmp وشكرا طارق 2 1,084 13-08-13, 04:32 AM
آخر رد: VB_Coder
  تغير لون النص الكوماند عند مرور المؤشر عليه ويرجع اللون الى اصله عند ابتعاد المؤشر عنه علي عبد الوهاب 2 602 31-07-13, 09:21 PM
آخر رد: عبد الله190

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم