listbox

ali guard

ali guard

Member
دوستان من ميخواهم نويشتهاى داخلى يك ليست باكس با clipboard كبى كنم با زدنى دكمةى اينتر خيلى سيرج كردم بيدا نكردم ممنون
 
nevercom

nevercom

کاربر متخصص انجمن مولتی مدیا بیلدر
این رو امتحان کنید:
کد: 
[color=#000090][b]ListBoxGetSelectedItems[/b][/color]("ListBox","Items$,ItemsNum$,#,NumItems") 
[color=#0000FF]For[/color] i=NumItems [color=#0000FF]To[/color] [color=#ff0000]1[/color] 
  ArrayItem$ = [color=#000090][b]GetArrayItem[/b][/color](Items$,#,i) 
  [color=#000090][b]Clipboard[/b][/color]("SEND","ArrayItem$") 
[color=#0000FF]Next[/color] i


یا اینیکی رو:
کد: 
[color=#000090][b]ListBoxGetSelectedItems[/b][/color]("ListBox","Items$,ItemsNum$,#,NumItems") 
[color=#0000FF]For[/color] i=NumItems [color=#0000FF]To[/color] [color=#ff0000]1[/color] 
  ArrayItem$ = [color=#000090][b]GetArrayItem[/b][/color](Items$,#,i) 
  [color=#0000FF]If[/color] (ArrayItem$ <> [color=#800000]''[/color]) [color=#0000FF]Then[/color] 
    [color=#000090][b]Clipboard[/b][/color]("SEND","ArrayItem$") 
  [color=#0000FF]End[/color] 
[color=#0000FF]Next[/color] i
 
ali guard

ali guard

Member
nevercom گفت:
این رو امتحان کنید:
کد: 
[color=#000090][b]listboxgetselecteditems[/b][/color]("listbox","items$,itemsnum$,#,numitems") 
[color=#0000ff]for[/color] i=numitems [color=#0000ff]to[/color] [color=#ff0000]1[/color] 
  arrayitem$ = [color=#000090][b]getarrayitem[/b][/color](items$,#,i) 
  [color=#000090][b]clipboard[/b][/color]("send","arrayitem$") 
[color=#0000ff]next[/color] i


یا اینیکی رو:
کد: 
[color=#000090][b]listboxgetselecteditems[/b][/color]("listbox","items$,itemsnum$,#,numitems") 
[color=#0000ff]for[/color] i=numitems [color=#0000ff]to[/color] [color=#ff0000]1[/color] 
  arrayitem$ = [color=#000090][b]getarrayitem[/b][/color](items$,#,i) 
  [color=#0000ff]if[/color] (arrayitem$ <> [color=#800000]''[/color]) [color=#0000ff]then[/color] 
    [color=#000090][b]clipboard[/b][/color]("send","arrayitem$") 
  [color=#0000ff]end[/color] 
[color=#0000ff]next[/color] i
کلیک کنید تا باز شود...

ممنون از جوابتون ولى اينها زديد جواب من نداد
 
برای ارسال پاسخ شما باید وارد سیستم شوید.

آخرین مطالب مجیدآنلاین

جدیدترین ارسال ها

بالا