تقييم الموضوع :
  • 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
جزاكم الله خيرا
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل هنالك امكانية لطباعة النص داخل الداتا ريبورت بشكل عامودي mohammed_atallah 2 700 11-09-22, 06:00 PM
آخر رد: mohammed_atallah
  [سؤال] عندي مشكله ارجوووو الحل ?? Sami Taha 1 1,165 03-09-22, 10:12 AM
آخر رد: gonm64
  [سؤال] ممكن الحل donia hamdan 0 612 01-06-22, 02:22 PM
آخر رد: donia hamdan
  [سؤال] ممكن الحل donia hamdan 2 1,222 15-05-22, 10:36 PM
آخر رد: Taha Okla
  [تم الحل] سؤال في الرصيد بعد كل عملية والرصيد الافتتاحي - حركة السيارات awidan76 8 3,149 16-06-19, 06:14 PM
آخر رد: awidan76
  [ تمّ الحل ] : إجراء عملية القرعة عبد العزيز البسكري 23 7,768 16-05-18, 11:47 AM
آخر رد: عبد العزيز البسكري
  [سؤال] تم الحل: مساعدة اخي احمد منصور علي مثالك لنسخ قاعدة البيانات والاتصال بها awidan76 7 2,977 28-01-18, 06:56 PM
آخر رد: awidan76
  (تم الحل)مشكلة في الاستعلام بين تاريخين awidan76 14 7,862 13-01-18, 01:06 PM
آخر رد: awidan76
  المساعدة - في تجزئة النص hamedi2727 7 3,293 19-12-17, 07:20 PM
آخر رد: Amir_Alzubidy
  اظهار المتقاعدين عمور2016 11 3,842 11-06-17, 02:32 AM
آخر رد: مصمم هاوي

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


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