Ανοίξτε Visual Basic 6.0 2
Πληκτρολογήστε τον ακόλουθο κώδικα : . Private Sub MyText_MouseMove ( Button As Integer , Shift As Integer , X As Single , Y As Single ) ΤοΚείμενόΜου είναι το όνομα του κειμένου που θα πρέπει να κάνει το mouseover
εικόνων 3
Πληκτρολογήστε την επόμενη γραμμή κώδικα : . MyText.MousePointer = vbHourGlassThis θα παράγει το δείκτη του ποντικιού κλεψύδρα όταν το ποντίκι πηγαίνει πέρα από το πλαίσιο κειμένου ΤοΚείμενόΜου
Η 4
Κλείστε την υπορουτίνα με την ακόλουθη σειρά : . Κωδικός τέλους SubYou θα ήθελα : Private Sub MyText_MouseMove ( Button As Integer , Shift As Integer , X As Single , Y As Single ) MyText.MousePointer = vbHourGlassEnd Sub
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα