عنصر LISTBOX

صفحه 1:


صفحه 2:
با ‎SS‏ ‏عنصر 1/۳00 را: خواص : 8 خاصیت ‎DOLMGELEOT‏ با استفاده از اين گزینه مي توان تععین کرد در اين عنصر چند گزینه را مي توان انتخاب کرد . خاصیت (9/0(68090) : با استفاده از اين خاصيت مي توان تععين كرد كه آيا كزينه هاي عنصر 109000907,| به صورت مرتب شده نمايش داده شوند ويا خير. خاصیت 19/۳/,ا: آرایه اي است که شامل گزینه هاي عنصر ۱,1۵۳)90 مي باشد . # خاصیت ,9/۳۷۱): این خاصیت براي تععین نوع نمایش ۱1۵/۳60 به کار مي رود. 

صفحه 3:
SS ‏با‎ * متد 01,0000 : اين متد تمام كزينه هاي عنصر ۱/1۵/۳602 را حذف مي كند .اين متد به صورت زير بكار مي رود . ‎aie hb CLEGR F‏ ® متد ‎L@DOOINED‏ استفاده از اين متد مي توان يك گزینه به گزینه هاي عنصر 10976960 را اضافه کرد .کاربرد متد 90060/70200) به صورت زیر است : عبارت ‎aie i BOOINED‏ ]شماره ‎JLIGTA.COOINED "IPED( G23)‏ * مند 600061۳60: با استفاده از اين متد مي توان گزینه اي را از عنصر ۲ حذف کرد .اين متد به صورت زير بكار مي رود : اندیس گزینه 0۲000001۲۳۵0 . نام عنصر 

صفحه 4:
با ‎SS‏ ‏تمرین :برنامه اي بنویسید که اعداد 4 تا 000 را نمایش داده و سپس مجموع مربعات اعداد 4 تا 00) را نمایش دهد . لمرا_ و ط) عم( ۳ Guo =O Por t= dT dO Guo < ‏وه‎ + () مصا341). هرا Dent Lobel .Cupiiva = "suc" + Gir(Gu) ud Gub 

صفحه 5:
با ‎SS‏ ‏عنصر ‎:OGPLEXGRIO‏ ‏با این عنصر مي نوان اطلاعات متني را به صورت جدول نمایش داد .هر جدول زل تعدادي سطر و ستون تشکیل شده است . براي افزودن اين عنصر به جعبه ابزار : از منوي 0060 گزینه 00000060 را انتخاب کنید در لیست ظاهر شده 4438 ‎DICROGOET PLEXBRID COMPMROL‏ را اننخاب كنيد و دکمه ا() را كليك کنید. 

صفحه 6:
با ‎SS‏ ‏تمرین : برنامه اي بنویسید که جدول ضرب 0*00 را نمایش دهد . لمرا_ و ط) عم( ‎Por i= AT dO‏ Por {=A To dO OGPexCridd.Row = i- OGPlex@ridd.Cot = j- 0 OGPtexCridd. ext = i * | Dent i, it Eud Gub 

صفحه 7:
با ‎SS‏ ‎vkevkbox alc‏ این عنصر براي تعریف گزینه هايي با دو انتخاب استفاده مي شود . خاصیت ماد : اين خاصیت براي تععین وضعیت ءررولمسلن بکار مي رود . تمرین :برنامه اي بنویسید که يك عدد را خوانده مجموع اعداد زوج تا آن عدد یا مچموع اعداد فرد تا آن عدد را محاسبه ‎checkbox jeaic, US‏ تعيين ميكند جه عملي انجام شود .اگر فعال باشد مجموع اعداد فرد و اگر فعال نباشد مجموع اعداد زوج محاسبه مي شود . 

صفحه 8:
()Prixte sub ‏عاصات_بواوصك‎ 7 = Od Pex. 0 1۳ ‏و‎ > ۳۰ ۰ OD 1۳ ‏س0۳.)3‎ < 1۳ 120 be ۱ Cod F Cun =O )سا Ov Lisl. Oct lew (Gi-(i)) Gun = Gun +i i=ite Loop Det > up ۱. ‏مسو‎ = "sun ts =" + Gir(Gu) Cad Gb 

صفحه 9:
با کی ۲ عنصر همه این عنصر باري ایجاد مجموعه اي از گزینه ها بکار مي رود . خاصیت سعامر: با استفاده از این خاصیت مي توان تععین کرد که ایا عنصر انتخاب شده است و یا خیر ‏ دستور 0006868 ‎:GELECT‏ ‎GELECT COGES Le<‏ > >عبارت ‎>dC@GE‏ ‏مجموعه دستورات 4 >عبارت)00)08 < مجموعه دستورات 6 ‎COGE ELGE‏ مجموعه دستورات 0 ‎EOD GELECT‏ 

صفحه 10:
با ‎SS‏ ‏تمرین :برنامه اي بنویسید که روزهاي هفته را با استفاده از دکمه هاي 0220100 نمايش مي دهد .با انتخاب يك دكمه از م0 نام روز هفته و شماره روز هفته را نمايش مي دهد و با ورود يك عدد » نام روز هفته را نمايش مي دهد و دکمه مووم) مربوط به آن را فعال مي کند . ۱ ‎Pen)‏ )م00 2 مد vbr Owe cue Cove ‎"satura‏ = مورا" ‎Opto. Ocke = Pree‏ ‎Cw & ‎"babel .Copiva = "sucnky Opt Ocker = Pre 

صفحه 11:
روموت > مرو سار" ‎.Ocke = Pre‏ سوه ‎Ouse &‏ ‎"Nesta‏ = ماهر" ‎Ocker = Dror‏ 0۳ ‎Owe S‏ ‎"YobeK. Captiva = "Wweadecesday Optod.Ockr = Pre Owr 8 ‎"LabeK.Capion = "kur 0 ‏عد‎ - Pre ‏وه‎ ‏رو > .)لور 9 ‎od Geert‏ ‎Cod Gb 

صفحه 12:
۲ ‏با کی‎ (Private Sub ‏ون‎ 6 AP Opto Ook = Prive Phea Lobel. Capiva = "soturday": ‏نس"‎ 2 0 1۳ 0۳ ‏سس‎ Phen Lobel Capiva = "suadas": Pentex AP Opto) .Odke = Prue Dheo babekl.Copioa = "sorentay": ‏وج ليج‎ = © AP Opto Onke = Prue Phea babekl.Capioa = "Mesa": Dextl. Dent = 4: AP Opto .Ocke = Prue Phe bobeK Caption = "Wweadearsdas": Dextl ‏سا‎ ud Gub 

عنصر :LISTBOX خواص : خاصيت :MULTISELECTبا استفاده از اين گزينه مي توان تععين كرد در اين عنصر چند گزينه را مي توان انتخاب كرد . خاصيت : STOREDبا استفاده از اين خاصيت مي توان تععين كرد كه آيا گزينه هاي عنصر LISTBOXبه صورت مرتب شده نمايش داده شوند ويا خير . خاصيت :LISTآرايه اي است كه شامل گزينه هاي عنصر LISTBOX مي باشد . خاصيت :STYLEاين خاصيت براي تععين نوع نمايش LISTBOX به كار مي رود. متدها : متد : CLEARاين متد تمام گزينه هاي عنصر LISTBOXرا حذف مي كند .اين متد به صورت زير بكار مي رود . .CLEAR نام عنصر متد :ADDITEMبا استفاده از اين متد مي توان يك گزينه به گزينه هاي عنصر LISTBOXاضافه كرد .كاربرد متد ADDITEMبه صورت زير است : عبارت . ADDITEMنام عنصر ]شماره انديس,["LIST1.ADDITEM "ITEM1 متد :REMOVEITEMبا استفاده از اين متد مي توان گزينه اي را از عنصر LISTBOXحذف كرد .اين متد به صورت زير بكار مي رود : انديس گزينه . REMOVEITEMنام عنصر  را نمايش داده و سپس مجموع10 تا1 برنامه اي بنويسيد كه اعداد: تمرين . را نمايش دهد10 تا1 مربعات اعداد )(Private Sub Form_Load List1.Clear Sum = 0 For i = 1 To 10 Sum = Sum + i ^ 2 List1.AddItem (i) Next Label1.Caption = "sum" + Str(Sum) End Sub عنصر : MSFLEXGRID با اين عنصر مي توان اطالعات متني را به صورت جدول نمايش داد .هر جدول زل تعدادي سطر و ستون تشكيل شده است . براي افزودن اين عنصر به جعبه ابزار : از منوي PROJECTگزينه COMPONENTرا انتخاب كنيد در ليست ظاهر شده گزينه MICROSOFT FLEXGRID CONTROLرا اننخاب كنيد و دكمه ‌Okرا كلgيك كنيد. . را نمايش دهد10*10 برنامه اي بنويسيد كه جدول ضرب: تمرين )(Private Sub Form_Load For i = 1 To 10 For j = 1 To 10 MSFlexGrid1.Row = i - 1 MSFlexGrid1.Col = j - 1 MSFlexGrid1.Text = i * j Next j, i End Sub عنصر checkbox : اين عنصر براي تعريف گزينه هايي با دو انتخاب استفاده مي شود . خاصيت : valueاين خاصيت براي تععين وضعيت checkboxبكار مي رود . تمرين :برنامه اي بنويسيد كه يك عدد را خوانده مجموع اعداد زوج تا آن عدد يا مچموع اعداد فرد تا آن عدد را محاسبه كند .عنصر checkboxتعيين ميكند چه عملي انجام شود .اگر فعال باشد مجموع اعداد فرد و اگر فعال نباشد مجموع اعداد زوج محاسبه مي شود . )(Private sub display_click up = Val(Text1.Text) :10 If up < 1 Then GoTo 10 If Check1.Value = 1 Then i=1 Else i -2 End If Sum = 0 List1.Clear Do List1.AddItem (Str(i)) Sum = Sum + i i=i+2 Loop Until i > up label2.Caption = "sum is =" + Str(Sum) End Sub عنصر :optionbutton اين عنصر باري ايجاد مجموعه اي از گزينه ها بكار مي رود . خاصيت :valueبا استفاده از اين خاصيت مي توان تععين كرد كه ايا عنصر انتخاب شده است و يا خير . دستور :SELECT CASE >عبارت< SELECT CASE >عبارت < 1CASE مجموعه دستورات 1 >عبارت< 2CASE مجموعه دستورات 2 ‏CASE ELSE مجموعه دستورات N ‏END SELECT تمرين :برنامه اي بنويسيد كه روزهاي هفته را با استفاده از دكمه هاي OPTIONنمايش مي دهد .با انتخاب يك دكمه از Optionنام روز هفته و شماره روز هفته را نمايش مي دهد و با ورود يك عدد ،نام روز هفته را نمايش مي دهد و دكمه Optionمربوط به آن را فعال مي كند . )(Private Sub Command1_Click )num = Val(Text1.Text ‏Select Case num ‏Case 1 "Label1.Caption = "saturday ‏Option1.Value = True ‏Case 2 "Label1.Caption = "sunday ‏Option2.Value = True "Label1.Caption = "monday Option3.Value = True Case 4 "Label1.Caption = "tuesday Option4.Value = True Case 5 "Label1.Caption = "wendenesday Option5.Value = True Case 6 "Label1.Caption = "thursday Option6.Value = True Case 7 "Label1.Caption = "friday Option7.Value = True End Select End Sub )(Private Sub Command2_Click If Option1.Value = True Then Label1.Caption = "saturday": Text1.Text = 1 If Option2.Value = True Then Label1.Caption = "sunday": Text1.Text = 2 If Option3.Value = True Then Label1.Caption = "monday": Text1.Text = 3 If Option4.Value = True Then Label1.Caption = "tuesday": Text1.Text = 4 If Option5.Value = True Then Label1.Caption = "wendenesday": Text1.Text =5 End Sub