Jump to content

ABEO

Member
  • Posts

    284
  • Joined

  • Last visited

  • Donations

    0.00 USD 
  • Country

    United Kingdom

Everything posted by ABEO

  1. What exactly is it? Because for a 56Ker 8Mb is a lot!
  2. cool is all this true? I met one of the stunt men from gladiator once, but nothing good
  3. I'm actually allergic to beer, I bet thats a new low!! Better shoot me too I guess
  4. riiight... now I completely understand
  5. lol, why is that an insult?
  6. and they think they know all LOL @ them, suckers @Rufo: you got 98 or 98SE?
  7. LMAO, have you actually revised during the revision period?
  8. ABEO

    Bored?

    OK so maybe I should have made the pic a bit smaller... Ahh well at least its good quality
  9. ABEO

    Bored?

    I found this a while ago and discovered a cheat try and beat that
  10. He already has quite a few clients, and is doing quite well in his first month
  11. ABEO

    Bored?

    I will beat that score!
  12. He hasn't done his site yet. I have set up the domains myself and will host on his server still. But I need a topic to do my site on when I have finished college, any ideas?
  13. He hasn't finished the site yet, he is setting up domains for people using word of mouth atm. When his site is done I will post it
  14. Or I have a mate who for £20 will set you up a domain and give you webspace
  15. Actually it does a bit, but I don't see and funny squiggles that look like an S
  16. tbh I have never actually heard any of their songs. Are they good? What type of music?
  17. lol I didn't even understand shaft
  18. If I was in Australia..... no
  19. hmm tough one but: 1) Weird Al Yankovic - Amish Paradise 2) Weird Al Yankovic - Weenie In A Bottle 3) Weird Al Yankovic - Cats In The Kettle 4) Weird Al Yankovic - Forest Gump 5) Linkin Park - Metora(Whole Album) Ok so all Weir Al songs are really good but they are just a couple of my favorites
  20. OK all that stuff Crispy said went straight over my head :/ Just tell me this, when will you use that in your career? I have only done GCSE maths and I haven't used any of it yet @becca: I'm sure you did fine hunny, u seem like a smart girl
  21. Ok this is a simple scribble pad, when you run it you can... scribble First of all create a module. In the Module put: Option Explicit Public bNowDraw As Boolean Now on the main form put 4 command buttons. Call them: Command1 - cmdExit Command2 - cmdClear Command3 - cmdSave Command4 - cmdLoad Make the buttons quite small and put them at the top of the form. Now put this in the form code: Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) bNowDraw = True CurrentX = X CurrentY = Y End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If bNowDraw = True Then Line -(X, Y) Else Exit Sub End If End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) bNowDraw = False End Sub Private Sub cmdExit_Click() Unload Me End Sub Private Sub cmdClear_Click() If MsgBox("Do you wish to save first?", vbYesNo + vbQuestion, "Save...") = vbYes Then SavePicture Form1.Image, "c:\picture.bmp" Form1.Cls Else Form1.Cls End If End Sub Private Sub cmdLoad_Click() Form1.Picture = LoadPicture("c:\picture.bmp") End Sub Private Sub cmdSave_Click() SavePicture Form1.Image, "c:\picture.bmp" MsgBox "Picture Saved", vbOKOnly + vbInformation, "Saved..." End Sub That should be about it You can add whatever features you like, when I had the basic program working I added colours to it so you can draw in better colours(black gets boring ) Have fun, more will come soon
×
×
  • Create New...