την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" από το αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας , και επεκτείνουν " Visual Basic " κάτω " εγκατεστημένα πρότυπα . " Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " από το κέντρο του παραθύρου διαλόγου , για να δημιουργήσετε ένα νέο έργο . 2
διπλό κλικ στο " Χρονόμετρο " για να προσθέσετε ένα χρονόμετρο στη φόρμα σας . Κάντε διπλό κλικ στο " Ετικέτα " για να προσθέσετε μια νέα ετικέτα στη φόρμα σας . Προσθέσετε ένα κουμπί χρησιμοποιώντας την ίδια τεχνική . . Κάντε διπλό κλικ στο " Button1 " για να δημιουργήσετε ένα συμβάν κλικ σε αυτό το κουμπί για
εικόνων 3
αντιγραφή και επικόλληση του παρακάτω κώδικα μέσα στο κουμπί κάντε κλικ στο συμβάν :
Για δείκτες As Integer = 0 να UBound ( textString )
Dim workedString As String = " "
workedString = scrollText.Substring ( index ) & "" & scrollText.Substring ( 0 , index )
textString ( index ) = workedString
Επόμενο
Timer1.Interval = 75
Timer1.Enabled = True
Timer1.Start ( )
Φτηνές 4
Επιστρέψτε στην προβολή σχεδίασης φόρμας και κάντε διπλό κλικ στο " Timer1 " για να δημιουργήσετε ένα συμβάν τσιμπούρι για το χρονοδιακόπτη . Προσθέστε τον ακόλουθο κώδικα στο εσωτερικό της εκδήλωσης :
XPOS + = 1
Dim tmrStr Όπως String
tmrStr = textString ( XPOS )
Label1.Text = tmrStr
Αν XPOS = UBound ( textString ) Στη συνέχεια XPOS = -1
5
Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμα και κάντε κλικ στο " Button1 " για να εμφανιστεί το κυλιόμενο κείμενο χρησιμοποιώντας την ετικέτα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα