ايران ويج

Darg نوشته است:...برای اینکه رنگ متن رو برای نوشتن رو فرم بتونی تغییر بدی باید از همون خصوصیت ForeColor فرم استفاده کنی و بعد داده ها رو پرینت بگیری روی فرم...

EleRam نوشته است:اینو توی فرم لود امتحان کن ببین چطوره:
Dim MyText As String
MyText = "Hello World!"

For i = o To Len(MyText)

For ii = Len(MyText) To Len(MyText) * 4
Me.ForeColor = RGB(ii * i, ii, ii * ii)
Next

Print MyText
Next

siana_k1980 نوشته است:ببینید فرض کنید قراره روی فرم چند تا کلمه به صورت رندم چاپ بشه و هر کدوم دارای رنگ متفاوتی باشه

EleRam نوشته است:برای اینکار باید جمله رو بخونی و با رسیدن به یه کلمه اونو قرار بدی توی حافظه، رنگ ForeColor فرم رو تغییر بدی بعد هم از روی حافظه اونو چاپ کنی.
از اونجا که کلمات با فاصله از هم جدا میشن می تونی هر جا به Space رسیدی به برنامه بگی که کلمه جدیدی شروع میشه!