Batch Maker: 4 Βήματα

2024 Συγγραφέας: John Day | [email protected]. Τελευταία τροποποίηση: 2024-01-30 08:39

ΕΝΗΜΕΡΩΣΗ V2.0 ΤΩΡΑ ΕΚΤΟΣ !!! ΚΑΤΕΒΑΣΤΕ ΠΑΡΑΚΑΤΩ Αυτό είναι ένα έργο στο οποίο εργάζομαι για λίγο wile..έχει γίνει με vb.net 2008 και καθιστά απλή την παρτίδα για τους αρχάριους… !!!!!!!! ΠΑΡΑΚΑΛΩ ΣΗΜΕΙΩΣΕ !!!!! Αυτό !!!!! δεν το γνωρίζει μου έδωσε την ιδέα να το φτιάξω.. lol.

Βεβαιωθείτε ότι έχετε δει το πρώτο βήμα "εγκατάσταση" πριν από τη λήψη !!!! Ελπίζω πραγματικά να σας αρέσει.. και αν βρείτε κάποιο πρόβλημα με αυτό, αφήστε ένα σχόλιο ή στείλτε μου pm για να τα διορθώσω και να τα δημοσιεύσω ξανά … παρακαλώ σχολιάστε τι πιστεύετε και μην ξεχάσετε να το αξιολογήσετε =)

Βήμα 1: Εγκατάσταση

Για εγκατάσταση ακολουθήστε προσεκτικά τα βήματα και τις φωτογραφίες !!! 1) Ακολουθήστε την εικόνα 1 αν έχετε μόλις μια σελίδα με πολύ κείμενο όταν κάνετε κλικ στο σύνδεσμο2) Κάντε κλικ στην αποθήκευση3) Βεβαιωθείτε ότι έχετε πάρει όλα τα κόκκινα κομμάτια σωστά !!! Αποθήκευση ως.exe Και Βεβαιωθείτε ότι έχετε αποθηκεύσει ως "Όλα τα αρχεία" διαφορετικά δεν θα λειτουργήσει !!!!!

Βήμα 2: Πώς λειτουργεί: Μέρος 1

Το ComboBox

Όπως είπα, το έκανα με το vb 2008, οπότε δεν υπάρχει δέσμη ενεργειών δέσμης ενεργειών. Για να το κάνω, το μόνο που πραγματικά έπρεπε να κάνω ήταν: εάν η επιλογή "εγγραφή" είναι επιλεγμένη στο comboboxchange label2 στο "Γράψτε ένα μήνυμα - Μην προσθέσετε την ηχώ!" textbox1 αλλάξτε textbox1 κείμενο σε "Τι θέλετε να λέει;" Το οποίο αποδεικνύεται ως εξής: Αν ComboBox1. SelectedItem = ("Γράψτε") Στη συνέχεια Label2. Text = ("Γράψτε ένα μήνυμα - Μην προσθέσετε την ηχώ!") TextBox1. Εμφάνιση () TextBox1. Text = ("Τι θέλετε να λέει;") Τέλος Αν έπρεπε να συνεχίσω να το κάνω για κάθε στοιχείο στο combobox.

Βήμα 3: Πώς λειτουργεί: Μέρος 2

Τα κουμπιά

Τα κουμπιά ήταν ένα από τα πιο δύσκολα πράγματα, το κουμπί Προσθήκη Για το κουμπί προσθήκης στη δουλειά έπρεπε να κάνω πολλή κωδικοποίηση, αλλά μόλις το έκανα αυτό, τα υπόλοιπα ήταν αρκετά απλά… Μέρος του κώδικα προσθήκης: αν το 'Γράψτε' είναι Επιλεγμένο στο σύνθετο πλαίσιο, στη συνέχεια, προσθέστε «ηχώ» + περιεχόμενα textbox1endΠοια εμφανίζεται ως: Αν ComboBox1. SelectedItem = ("Γράψτε") Στη συνέχεια, ListBox1. Το κουμπί αφαίρεσης είναι απλώς: Αφαίρεση επιλεγμένου στοιχείου από τη λίσταη οποία είναι:. Clear () ListBox1. Items. Add (":: Made With iRule Batch Maker") ListBox1. Items. Add ("@echo off") και ο κωδικός μετακίνησης πάνω και κάτω απλώς μετακινήστε το επιλεγμένο στοιχείο πάνω ή κάτω: (κωδικός πολύ καιρό να τα βάλω)

Βήμα 4: Πώς λειτουργεί: Μέρος 3

Αποθήκευση/Φόρτωση

Η αποθήκευση και η φόρτωση ήταν ίσως το πιο δύσκολο μέρος, Αυτός είναι μόνο ο κωδικός αποθήκευσης: Dim sfdMain As New SaveFileDialog sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments Dim Result As DialogResult sfdMain. Filter = "Batch Files (*.bat) |*.bat | Αρχεία CMD (*. cmd) |*.cmd "sfdMain. FilterIndex = 1 sfdMain. ValidateNames = True Result = sfdMain. ShowDialog If Result = Windows. Forms. DialogResult. OK Στη συνέχεια Dim dim ως νέο σύστημα. IO. StreamWriter (sfdMain. FileName) For i As Integer = 0 To ListBox1. Items. Count - 1 sw. WriteLine (ListBox1. Items Item (i)) Next sw. Close () sw. Dispose () Else Exit Sub End Εάν καταλαβαίνετε το vb, θα ξέρετε τι κάνει, αλλά αν όχι: βασικά, το μόνο που κάνει είναι να εμφανίζει το παράθυρο διαλόγου αποθήκευσης και αποθηκεύει όλο το περιεχόμενο της λίστας σε ένα αρχείο δέσμης ή αρχείο cmd