PDA

View Full Version : سوال: کوچیک و بزرگ



sina_saravi1
شنبه 17 مرداد 1388, 07:59 صبح
سلام دوستان گلم

میخواستم ببینم اگه من یه متن داشته باشم که از چند خط تشکیل شده باشه و بخوام حروفش رو یکی در میون بزرگ (A) و کوچیک (a) بکنم، چجوری باید پیش برم

کلی روش فکر کردم ، آخرش هم قاطی کردم ، تو پروژه هر کاری کردم درست کار نکرد

لطفا کمک کنید، ممنونم ازتون

Tasiyan
شنبه 17 مرداد 1388, 08:13 صبح
تابع Lcase یا $Lcase رشته رو به حروف کوچیک تبدیل می کنه
تابع Ucase یا $Ucase رشته رو به حروف بزرگ تبدیل می کنه

?Lcase("TEST")
:لبخند:

sina_saravi1
شنبه 17 مرداد 1388, 08:25 صبح
بابا ایول!
با این کد منو یه قدم به مایکروسافت نزدیک تر کردی:کف:

نه من میخواستم یه تکستی که چند خط داره ، حروفش رو یکی در میون بزرگ و کوچیکش کنم

Felony
شنبه 17 مرداد 1388, 09:27 صبح
با یه حلقه به طول رشتت دونه دونه کارکتر ها رو بخون و اگر متغیر حلقت مثلا روج بود کارکتر جاری رو به وسیله ی توابع معرفی شده بزرگ کن و در غیر این صورت کوچیک .

sina_saravi1
شنبه 17 مرداد 1388, 17:15 عصر
با یه حلقه به طول رشتت دونه دونه کارکتر ها رو بخون و اگر متغیر حلقت مثلا روج بود کارکتر جاری رو به وسیله ی توابع معرفی شده بزرگ کن و در غیر این صورت کوچیک .
خوب میگم این کار رو کردم
چون زیاد حلقه ها تو هم بودن قاطی کردم

اگه یه وقت به خط جدید رسید تر میزنه

Felony
شنبه 17 مرداد 1388, 19:58 عصر
خوب میگم این کار رو کردم
چون زیاد حلقه ها تو هم بودن قاطی کردم

اگه یه وقت به خط جدید رسید تر میزنه

حلقه تو در تو چرا ؟ با یک حلقه راحت انجام میشه :


For i = 1 To Len(Text1)
T1 = Mid(Text1, i, 1)
If i Mod 2 = 0 Then
T2 = UCase(T1)
Else
T2 = LCase(T1)
End If
Text2 = Text2 + T2
Next i

sina_saravi1
شنبه 17 مرداد 1388, 21:33 عصر
واقعا ممنونم

مشکل من با همین مثال شما حل شد
بازم ممنونم