Partiju veidotājs: 4 soļi

2024 Autors: John Day | [email protected]. Pēdējoreiz modificēts: 2024-01-30 10:59

ATJAUNINĀT V2.0 TŪLĪT !!! LEJUPIELĀDĒT TĀLĀK !!!!!!!! Tas darbosies tikai vietnē VISTAit nezinu, viņš man iedeva ideju to uztaisīt.. lol.

Pirms lejupielādes pārliecinieties, ka apskatāt pirmo soli "instalēšana" !!!! Es patiešām ceru, ka jums tas patīk.. un, ja jums rodas kādas problēmas, lūdzu, atstājiet komentāru vai rakstiet man pm, lai es varētu tos labot un atkārtoti ievietot … lūdzu komentējiet savu viedokli un neaizmirstiet to novērtēt =)

1. darbība: uzstādīšana

Lai instalētu, sekojiet soļiem un attēliem !!! 1) Izpildiet 1. attēlu, ja, noklikšķinot uz saites, tiek parādīta lapa ar daudz teksta2) Noklikšķiniet uz saglabāt.exe Un pārliecinieties, ka saglabājat kā "Visi faili", pretējā gadījumā tas nedarbosies !!!!!

2. darbība. Kā tas darbojas: 1. daļa

ComboBox

Kā jau teicu, es to izdarīju ar vb 2008, tāpēc nav sērijveida skriptu. Lai to izdarītu, man tiešām bija jādara: ja kombinācijā “rakstīt” ir atlasīta “rakstīt” uz “Rakstīt ziņu - nepievienojiet atbalsi!” textbox1mainiet textbox1 tekstu uz "Ko jūs vēlaties, lai tas teiktu?" Kas izrādās šādi: If ComboBox1. SelectedItem = ("Write") Tad Label2. Text = ("Rakstīt ziņu - nepievienot atbalsi!") TextBox1. Rādīt () TextBox1. Text = ("Ko jūs vēlaties, lai tas teiktu?") Beigt, ja man tas būtu jādara arī turpmāk katram vienumam kombinētajā lodziņā.

3. darbība. Kā tas darbojas: 2. daļa

Pogas

Pogas bija viena no visgrūtākajām lietām, poga Pievienot Atlasīts kombinētajā lodziņā, pēc tam pievienojiet “echo” + textbox1end saturs, kas tiek izcelts kā: If ComboBox1. SelectedItem = ("Write"), tad ListBox1. Items. Add ("echo" + TextBox1. Text) Beigt, ja lielākoties tas bija vienāds tos, kā parādīts attēlā. Poga Noņemt ir tikai: Noņemt atlasīto vienumu no saraksta, kas ir: ListBox1. Items. RemoveAt (ListBox1. SelectedIndex) poga Notīrīt tikai izdzēš visu sarakstu un pēc tam atkal pievieno pirmās divas rindas: ListBox1. Items. Clear () ListBox1. Items. Add (":: Izgatavots ar iRule Batch Maker") ListBox1. Items. Add ("@echo off") un pārvietošanas augšup un lejup kods vienkārši pārvieto atlasīto vienumu uz augšu vai uz leju: (kods uz ilgi jāsamierinās)

4. darbība. Kā tas darbojas: 3. daļa

Saglabāt/ielādēt

Saglabāt un ielādēt, iespējams, bija grūtākā daļa, tas ir tikai saglabāšanas kods: Dim sfdMain As New SaveFileDialog sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments Dim Rezultāts kā DialogResult sfdMain. Filter = "Batch Files (*.) |*.bat | CMD faili (*. cmd) |*.cmd "sfdMain. FilterIndex = 1 sfdMain. ValidateNames = True Result = sfdMain. ShowDialog If Result = Windows. Forms. DialogResult. OK Tad Dim sw kā jauna sistēma. IO. StreamWriter (sfdMain. FileName) i As Integer = 0 Uz ListBox1. Items. Count - 1 sw. WriteLine (ListBox1. Items. Item (i)) Next sw. Close () sw. Dispose () Cits Iziet Sub End Ja jūs saprotat vb, jūs zināt, ko tas dara, bet ja jūs to nesaprotat: būtībā viss, kas tiek darīts, ir parādīt saglabāšanas dialoglodziņu, un tas saglabā visu saraksta saturu pakešdatnē vai cmd failā