در مورد 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