مرکز تخصصی کامپیوتر

پروژه ی ویژوآل بیسیک

شرح پروژه ی :

پروژه ای طراحی کنید که در آن یک Text Box ، بزرگ هم اندازه ی فرم ایجاد کنید ، سپس یک منوی کرکره ای که حاوی گزینه راست چین ، وسط چین و چپ چین باشد ایجاد کنید ، به طوریکه وقتی در داخل  Text Boxراست کلیک می کنیم ، منویی ظاهر شود ، با نام راست چین که در هنگام کلیک ، متن در قسمت راست Text Box نوشته شود .

دستورات حل پروژه :

Private Sub m11_Click()
t1.Alignment = 0
End Sub

Private Sub m111_Click()
t1.Alignment = 2
End Sub

Private Sub m1111_Click()
t1.Alignment = 1
End Sub

Private Sub t1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu m1
End If
End Sub

 نکته ۱: شما می بایست از قسمت Menu Editor تیک گزینه های Enabled و Visible را بردارید.

نکته ۲ : پیشنهاد می شود خصوصیت (Multi Line ) تکس باکس را برابر با True قرار دهید تا امکان نوشتن در بیش از یک سطر ممکن باشد.

لطفا با نظرات گران بهایتان ما را در جهت بهبود سطح کیفی پی سی امروز یاری کنید.