PDA

View Full Version : مبتدی: در مورد caption فرم


behroz1992
چهارشنبه 27 آبان 1388, 19:13 عصر
سلام دوستان حالتون چطوره ؟؟ میخواستم بدونم چطوری میشه یه متن را در caption فرم متحرک باشه به چپ و راست حرکت کنه ممنون :متفکر:
Pr0grammer
چهارشنبه 27 آبان 1388, 19:51 عصر
ببینید این Sample کارتونو راه میندازه... ؟!
behroz1992
پنج شنبه 28 آبان 1388, 01:00 صبح
ممنون دوست عزیز به نظرت میشه از این ساده تر نوشت ؟؟؟کدش کمتر باشه
saman9999
پنج شنبه 28 آبان 1388, 01:58 صبح
دوستان من يه سؤالی دارم که اميد وارم ربط داده باشه ميشه کاری کرد که اگه هرچی تو يه تکست باکس type بشه رو عنوان ( caption ) فرم هم نمايش داده بشه؟
Pr0grammer
پنج شنبه 28 آبان 1388, 02:31 صبح
دوستان من يه سؤالی دارم که اميد وارم ربط داده باشه ميشه کاری کرد که اگه هرچی تو يه تکست باکس type بشه رو عنوان ( caption ) فرم هم نمايش داده بشه؟

در Sample بالا، می تونید یه Command و یه Text اضافه کنید و کد زیر رو در Command بنویسید:

Private Sub Command1_Click()
i = 0 : lr = 0
a = Text1.Text
App.Title = a : Me.Caption = a
End Sub