Filehost.ro - gazduire fisiere
Hacking and more...
HaCkinG CulT 		Nou pe simpatie:
ro_xy20
Femeie
24 ani
Bucuresti
cauta Barbat
24 - 45 ani
Hacking and more...ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
Hacking and more... / S.O.S. /

eroare

 Pagini: 1 Moderat de Shocker
#1
hackedss
Elite Member
Postari: 858
imi poate zice  ce eraore poate sa aiba ....

Code:

Option Explicit

Private Sub IcE_Load()
    Form1.Caption = "Print - PSet (clic pe forma)"
    Randomize
End Sub

Private Sub START_Click()
            
End Sub
Dim CX As Integer, CY As Integer, Msg As String
    XPos As Integer, YPost As Integer, ciclu As Integer
  ScaleMode = 3
  DrawWidth = 5
  ForeColor = QBColor(4)
  FontSize = 24
  CX = ScaleWidth / 2
  CY = ScaleHeight / 2
  Cls
  Msg = "La Multi Ani BOBY!!"
  CurrentX = CX - TextWidth(Msg) / 2
  CurrentY = CY - TextHeight(Msg)
  Print Msg
  
  ciclu = 0
  Do
    XPos = Rnd * ScaleWidth
    YPos = Rnd * ScaleHeight
    PSet (XPos, YPos), QBColor(Rnd * 15)
    ciclu = ciclu + 1
    If ciclu = 200 Then
    Exit Do
    End If



_______________________________________
 
   
#2
hackedss
Elite Member
Postari: 858
ma ajuta cineva ce eroare POATE SA AIBA VREAU SA IL FAC SA MEARGA  va rog mult

_______________________________________
 
   
#3
AntiTrusT
Senior
Din: C:\WINDOWS\system32\
Postari: 108
Nu stiu care e solutia pentru eroare...dar te rog sa imi spui ce ar terbui sa faca si in ce e facut scriptul..pascal?

_______________________________________
ERROR: Signature format unknown! Signature cannot be revealed! If the problem persists blow up your computer and try again!
 
   
#4
hackedss
Elite Member
Postari: 858
e in visual basic si ar trebui sa apara o fereatra cu scris la multi ani si sa straluceasca cam 200 de puncte mici ..

_______________________________________
 
   
#5
hackedss
Elite Member
Postari: 858
haideti ma fratilor va rog zice-timi si mie ce tre sa fac ca sa mearga ?

_______________________________________
 
   
#6
d3light
Elite Member
Din: Orasul Fantomelor
Postari: 981
nu mai face si tu dublu host.daca stia cineva iti rasundea pana acum.

_______________________________________
SIGNATURE UNDER CONSTRUCTION
________________________________________________
Before doing something perfect,do something perfectable!
 
   
#7
RockWilder
Elite Member
Din: Real World!
Postari: 894
@hackedss, ce e "ICE" ? ce e "START"? buton sau forma? butoanele nu au "LOAD", doar daca ar fii o forma, dar ar trebui sa fie "Form_Load()" inlocuieste cu Form_Load(), incearca... 

_______________________________________
Only those who attempt the absurd will achieve the impossible. (M C Escher)
 
   
#8
shpagyn
Membru nou
Postari: 16
La pima vedere :muta tot ce este dupa ultimul "End Sub" inaintea lui (intre "Private Sub START_Click()" si "End Sub".In principiu ar trebui sa faca ceva .Inca ceva , nu sunt 100% sigur, dar cred ca ar fi bine ca liniile de cod sa fie in locul unde este si "Form-ul" nu intr-un modul separat.

Last edit:
Nu-s mare expert in VB6,lucrez mai mult cu VBA (pt MS Excel),care e putin diferit de VB6,dar asemanator.Din pacate ce am scris din prima e ok doar 5o%.Mai am gasit erori :
1.La declarare variabile mai trebuia un DIm sau "_" la prima linie la declaratiile de variabile
2.Ypost in loc de Ypos (sau invers).
3.Mai lipsea si un "loop" la final
M-am cam grabit , as fi vrut sa fac punctele sa apara asa pe rand dar nu amers ceva,si am dat-o in plictiseala.Modificarile le vezi daca descarci arhiva.
Aici download project,form ,module+exe(la mine functioneaza).

http://rapidshare.com/files/29257622/hackedss.rar

Oricum nice proggy , nu m-am gandit niciodata sa fac asa ceva.
 
   
#9
S1las
Old School Member
Din: Kernel
Postari: 490
poti sa zici unde anume iti da eroare , ca iti apare si linia

_______________________________________
NU DA CLICK !!
Don ' t be a script kiddie all your life ...
Learn to think .... CrazZy-World


 
   
#10
hackedss
Elite Member
Postari: 858
tzava shapagyn am avut nevoie de prog asta acu 1 sapt cand era ziua lu unu )    oricum ms si sa it izic ceva nu se poate ca punctele alea sa se miste... fara sa dai u click?

_______________________________________
 
   
#11
shpagyn
Membru nou
Postari: 16
M-ai botezat "shapagyn" .Oki am sa incerc , nu promit , dar azi m-a lovit plictisu',ceva cu "Wait(5)" (5 ar vrea sa fie secundele de asteptare )intercalat undeva printre "Do" si "Loop",dar mai tre sa study the problem.Poti sa incerci si tu.Sory about delay da' mai bine mai tarziu decat never.(n-am avut timp) 

 
   
Pagini: 1  
Mergi la