در مورد caption فرم

[behroz1992]

سلام دوستان حالتون چطوره ؟؟ میخواستم بدونم چطوری میشه یه متن را در caption فرم متحرک باشه به چپ و راست حرکت کنه ممنون

[Pr0grammer]

ببینید این Sample کارتونو راه میندازه... ؟!

[behroz1992]

ممنون دوست عزیز به نظرت میشه از این ساده تر نوشت ؟؟؟کدش کمتر باشه

[saman9999]

دوستان من يه سؤالی دارم که اميد وارم ربط داده باشه ميشه کاری کرد که اگه هرچی تو يه تکست باکس type بشه رو عنوان ( caption ) فرم هم نمايش داده بشه؟

[Pr0grammer]

دوستان من يه سؤالی دارم که اميد وارم ربط داده باشه ميشه کاری کرد که اگه هرچی تو يه تکست باکس 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