Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


[How to] VB

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming
View previous topic :: View next topic  
Author Message
wofo
Expert Cheater
Reputation: 0

Joined: 12 Aug 2007
Posts: 211
PostPosted: Wed Oct 24, 2007 2:23 pm    Post subject: [How to] VB Reply with quote
How do you make in VB a program wich muliplys itself lots of times?
I wanna make something that when you open it starts to duplicate again and again in random places of the screen.
I know a little of VB.
Thanks to the next to post Very Happy
_________________
! 10\/3 1337

Happy Cheating guys
Back to top
View user's profile Send private message
Trow
Grandmaster Cheater
Reputation: 2

Joined: 17 Aug 2006
Posts: 957
PostPosted: Wed Oct 24, 2007 4:38 pm    Post subject: Reply with quote
what,

Private Sub Command1_Click()
Dim A As Form
Set A = New Form1
A.Show
End Sub?
_________________
Get kidnapped often.
Back to top
View user's profile Send private message
atom0s
Moderator
Reputation: 205

Joined: 25 Jan 2006
Posts: 8588
Location: 127.0.0.1
PostPosted: Wed Oct 24, 2007 6:08 pm    Post subject: Reply with quote
Eh... another pointless program -.-;

But.. if you 'have' to know..

Code:
Option Explicit

Private Sub Form_Load()

    Dim szAppName As String
    szAppName = App.EXEName & ".exe"
   
    Shell App.Path & "/" & szAppName

End Sub

_________________
- Retired.
Back to top
View user's profile Send private message Visit poster's website
wofo
Expert Cheater
Reputation: 0

Joined: 12 Aug 2007
Posts: 211
PostPosted: Thu Oct 25, 2007 3:52 pm    Post subject: Reply with quote
wiccaan are you trying to hack me?
_________________
! 10\/3 1337

Happy Cheating guys
Back to top
View user's profile Send private message
atom0s
Moderator
Reputation: 205

Joined: 25 Jan 2006
Posts: 8588
Location: 127.0.0.1
PostPosted: Thu Oct 25, 2007 7:56 pm    Post subject: Reply with quote
wofo wrote:
wiccaan are you trying to hack me?


Umm.. no?
_________________
- Retired.
Back to top
View user's profile Send private message Visit poster's website
Pseudo Xero
I post too much
Reputation: 0

Joined: 16 Feb 2007
Posts: 2607
PostPosted: Thu Oct 25, 2007 11:55 pm    Post subject: Reply with quote
wofo wrote:
wiccaan are you trying to hack me?

LOL.
_________________
haxory' wrote:
can't VB do anything??
windows is programmed using VB right? correct me if im wrong.

so all things in windows you have like the start menu is a windows form too.
Back to top
View user's profile Send private message
Mussy69
Grandmaster Cheater
Reputation: 0

Joined: 09 Mar 2007
Posts: 842
Location: Sydney
PostPosted: Fri Oct 26, 2007 5:57 am    Post subject: Reply with quote
wofo wrote:
wiccaan are you trying to hack me?

Laughing U asked for helping ur getting it so accept it
_________________
Back to top
View user's profile Send private message AIM Address
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579
PostPosted: Fri Oct 26, 2007 6:03 am    Post subject: Reply with quote
Ive never really tried this but what about
On form load:
Code:
Form1.Show
Loop
Back to top
View user's profile Send private message
atom0s
Moderator
Reputation: 205

Joined: 25 Jan 2006
Posts: 8588
Location: 127.0.0.1
PostPosted: Fri Oct 26, 2007 7:12 am    Post subject: Reply with quote
Moller wrote:
Ive never really tried this but what about
On form load:
Code:
Form1.Show
Loop


This wont do anything but ensure that Form1 is shown. Plus it wont do anything as it's not coded properly.

To do what you want you would need to do something like this:

Code:
Private Sub form_load()
On Error Resume Next '// Because errors will happen..

    '// Create Blank Form Object
    Dim objBlankForm    As Form1
    '// Create Soon To Be Object
    Dim objNewForm      As Object
   
    '// Set The New Objects Then
    '// Create The Never Ending Loop ;)
    Set objBlankForm = New Form1
    Set objNewForm = objBlankForm
    objNewForm.Show

End Sub

_________________
- Retired.
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites