khorasan66
2015/10/21, 11:23
سلام
چگونه می شود ابعاد و فونت و رنگ InputBox , Msgbox را از حالت پیش فرض تغییر داد و با کد مشخص نمود
چگونه می شود اعداد و حروف تایپ شده در InputBox به صورت ***** نمایش داده شوند جهت وارد نمودن pasword
لازم به توضیح است که موارد فوق برای استفاده در Form نمی باشد مثلا در کد زیر :
Sub pass_01()
On Error Resume Next
Dim A!
A = InputBox("بهینه ساز", "کلمه عبور را وارد نمائید")
B = 1234
If A <> B Then
Exit Sub
Else
Call UNPB
......
چگونه می شود ابعاد و فونت و رنگ InputBox , Msgbox را از حالت پیش فرض تغییر داد و با کد مشخص نمود
چگونه می شود اعداد و حروف تایپ شده در InputBox به صورت ***** نمایش داده شوند جهت وارد نمودن pasword
لازم به توضیح است که موارد فوق برای استفاده در Form نمی باشد مثلا در کد زیر :
Sub pass_01()
On Error Resume Next
Dim A!
A = InputBox("بهینه ساز", "کلمه عبور را وارد نمائید")
B = 1234
If A <> B Then
Exit Sub
Else
Call UNPB
......