944,138 Members | Top Members by Rank

Ad:
  • VB.NET Discussion Thread
  • Unsolved
  • Views: 2348
  • VB.NET RSS
Nov 11th, 2006
0

help with a project(tomagatchi clone)

Expand Post »
hey i wanted to start a tomagatchi clone project with vb..
im having problems with it...
cann't get it so that as time pass( every 1 minute) that the hunger,boredom, and need to poop increase
i tried to use the timer but i cant get it down...
an example would help a lot!:mrgreen:
oh yea im using vb express and im just learning vb as school and wanted to try to program somthing cool with vb.
thx
Similar Threads
Reputation Points: 10
Solved Threads: 0
Newbie Poster
lazysloth is offline Offline
3 posts
since Nov 2006
Nov 11th, 2006
0

Re: help with a project(tomagatchi clone)

Let's see ya code please.
Featured Poster
Reputation Points: 1536
Solved Threads: 431
Posting Expert
iamthwee is offline Offline
5,865 posts
since Aug 2005
Nov 11th, 2006
0

Re: help with a project(tomagatchi clone)

go easy on me i just started and don't really know what im doin
Public Class Form1
Dim play As Integer = lblplay.Text
Dim fullness As Integer = lblfullness.Text
Dim potty As Integer = lblfullness.Text

Private Sub btnfeed_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnfeed.Click


If fullness > 90 Then
MsgBox("Im full!!!")
Else
fullness = fullness + 10
End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


If play < 90 Then
play = play + 10
ElseIf play > 90 Then
MsgBox("I dont want to play anymore!")
End If
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

If potty < 90 Then
potty = potty + 10
ElseIf potty > 90 Then
MsgBox("I don't need to take a crap anymore!")
End If
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Timer1.Enabled = True
Timer1.Interval = 1000
Dim play As Integer
Dim potty As Integer
Dim fullness As Integer
neglect(play, potty, fullness)
End Sub
Public Function neglect(ByVal hun As Integer, ByVal pla As Integer, ByVal pott As Integer)

Return hun = hun - 1
Return pla = pla - 1
Return pott = pott - 1

End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


End Sub
End Class
Reputation Points: 10
Solved Threads: 0
Newbie Poster
lazysloth is offline Offline
3 posts
since Nov 2006
Nov 12th, 2006
0

Re: help with a project(tomagatchi clone)

Have u checked out this tutorial?

http://abstractvb.com/code.asp?A=1032
Featured Poster
Reputation Points: 1536
Solved Threads: 431
Posting Expert
iamthwee is offline Offline
5,865 posts
since Aug 2005
Nov 12th, 2006
0

Re: help with a project(tomagatchi clone)

thx
Reputation Points: 10
Solved Threads: 0
Newbie Poster
lazysloth is offline Offline
3 posts
since Nov 2006

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.
Message:
Previous Thread in VB.NET Forum Timeline: navigation within multiple form in VB.NET
Next Thread in VB.NET Forum Timeline: Am Getting System Errors When running my VB.NET project





About Us | Contact Us | Advertise | Acceptable Use Policy
Forum Index | Build Custom RSS Feed


Follow us on Twitter


© 2011 DaniWeb® LLC