Whats the copy/paste code.

[OuTLawZGoSu]

Same as Subject.

[Grok]

Same as Subject.

For what?

Code Select Expand

Private Sub cmdPaste_Click()
   Text1.Text = Clipboard.GetText(vbCFText)
End Sub

Private Sub cmdCopy_Click()
   Clipboard.SetText Text1.Text, vbCFText
End Sub

[FuzZ]

nifty, i was gonna use the copy code for somethin but i forget now lol

[OuTLawZGoSu]

For what?

Code Select Expand

Private Sub cmdPaste_Click()
   Text1.Text = Clipboard.GetText(vbCFText)
End Sub

Private Sub cmdCopy_Click()
   Clipboard.SetText Text1.Text, vbCFText
End Sub

Hmmm, Can't get it to work. I need to make it so when I click on a listbox, it will copy the selected text.

I got this:

Code Select Expand


Private Sub List1_Click()
Text1.Text = (List1)
Clipboard.SetText Text1.Text, vbCFText
End Sub


Doesn't seem to copy. At All.

[OuTLawZGoSu]

Looks like I left out a lot of info.

I got a text box, and a listbox. Since " Clipboard.SetText (List1), vbCFText " didnt work,  I tryed to send the text from the listbox to text1. Then copy everything form text1.

@ Gork: I'm not a programmer? Who made OuTLawZ BoT again?
Oh ok then.

[Eli_1]

Hint: List1.ListIndex will display the currently selected index.  

Hint2: -1 <= List1.ListIndex <= List1.Listcount

[Grok]

Looks like I left out a lot of info.

I got a text box, and a listbox. Since " Clipboard.SetText (List1), vbCFText " didnt work,  I tryed to send the text from the listbox to text1. Then copy everything form text1.

@ Gork: I'm not a programmer? Who made OuTLawZ BoT again?
Oh ok then.

If you're a programmer, program.  I showed you how the Clipboard object works, in both directions.  When setting, it takes a parameter of the text to copy.  When retrieving, you set your own string variable to receive it.  There's nothing harder to it than that.

[Eli_1]

The second hint I gave you was to be read like math.
1 < x < 4 -- Read: x is greater than one and less than 4.

[Edit]

Hint: List1.ListIndex will display the currently selected index.  

Hint2: -1 <= List1.ListIndex <= List1.Listcount

List1.List(n), will display the text at index n. If you can't figure it out now, there is no hope

[Fr0z3N]

List1.List(List1.ListIndex)

[Dyndrilliac]

wow, thx for all your help.

Madz Botz forums it is.

I detest flaming, but you sir, are a dumbass.

Code Select Expand

Private Sub Command1_Click()
Clipboard.SetText Me.List.ListItems(Me.List.ListItems.Count), vbCFText
End Sub

Private Sub Command2_Click()
Me.Text.Text = Clipboard.GetText(vbCFText)
End Sub

Private Sub Form_Load()
Me.List.ListItems.Add , , "Text"
End Sub

That took 3 minutes tops.

It has been handed to you several times on a silver platter throughout the thread. By the way, I used a Listview, instead of Listboxes(They are in my opinion bad practice), but it should convert fine,

[GoSuGaMING]

@ Gork: I'm not a programmer? Who made OuTLawZ BoT again?
Oh ok then.

u didnt make outlawz bot remember your friend made it and "told" you that u could edit it... notice how you use hives 0x50 login? did u make that? dont think so... i have all ur source codes i added client icons, lag bars, everything you havnt done hardly shit 2 it

[CodeMaster]

Looks like I left out a lot of info.

I got a text box, and a listbox. Since " Clipboard.SetText (List1), vbCFText " didnt work,  I tryed to send the text from the listbox to text1. Then copy everything form text1.

@ Gork: I'm not a programmer? Who made OuTLawZ BoT again?
Oh ok then.

Also notice he referred to Grok as "Gork"

[Grok]

Maybe 3 or 4 more people should point out his typo.  I don't think the point was driven home.

[iago]

Holy crap, he said Gork! ahaha!

[OuTLawZGoSu]

Holy crap, he said Gork! ahaha!

Haha, you people find the most stupidest shit and make fun of it.
Who cares if it's grok or gork.