PDA

View Full Version : پیش فرض Replace و InStr



aleas2
چهارشنبه 08 آذر 1391, 18:42 عصر
سلام خسته نباشید اگر تو جه کنید در توابع های
Replace و InStr
پیشفرص حساس به حروف کوچک بزرگ راهی نیست یه بار تعریف کنم که حسای به حروف کوچک بزرگ نیست vbTextCompare

که هر بار از Replace و InStr استفاده میکنم هی از اول برای هم کدوم ننویسم
vbTextCompare

؟این کار شدنی هست؟

M.T.P
چهارشنبه 08 آذر 1391, 19:20 عصر
سلام

با تابع LCase یا UCase متن متن مبدا و مقصد رو یک شکل کنید.

مثال:


Dim strText As String
Dim strWord As String

strText = "Ali is a student"
strWord = "ali"

MsgBox InStr(1, UCase$(strText), UCase$(strWord))

aleas2
چهارشنبه 08 آذر 1391, 20:15 عصر
مشکل اینجاست متن مبدا نمیخوام کلشو حروف کوچک کنم

محسن واژدی
چهارشنبه 08 آذر 1391, 23:03 عصر
سلام علیکم
دستور:

Option Compare Text

را در بالاترین قسمت ماژول بنویسید در اینصورت مقایسه پیش فرض اون ماژول متنی هست

موفق باشید