Eränvalmistaja: 4 vaihetta

2024 Kirjoittaja: John Day | [email protected]. Viimeksi muokattu: 2024-01-30 09:04

PÄIVITÄ V2.0 NYT! LATAA ALTA Tämä on projekti, jota olen työskennellyt pienen hälinän vuoksi … se on tehty vb.net 2008: lla ja se tekee erän tekemisen yksinkertaiseksi aloittelijoille … !!!!!!!! HUOMAA !!!!! !!!!!!!! TÄMÄ TOIMII VAIN VISTA: lla, koska tein tämän nyt Vistassa, kun kokeilen sitä XP -koneella, siitä tulee virheilmoitus.. anteeksi ihmiset. Minun täytyy kiittää TATcreatoria, koska tiedänkin ei tiedä sitä hän antoi minulle idean tehdä tämä.. lol.

Varmista, että katsot ensimmäisen vaiheen "asennusta" ennen lataamista !!!! Toivon todella, että pidät siitä.. ja jos löydät ongelmia sen kanssa, jätä kommentti tai lähetä minulle pm, jotta voin korjata ne ja lähettää sen uudelleen … kiitos kommentoi mitä ajattelet ja älä unohda arvioida sitä =)

Vaihe 1: Asennus

Asenna noudattamalla vaiheita ja kuvia tarkasti !!! 1) Noudata kuvaa 1, jos saat vain sivun, jossa on paljon tekstiä, kun napsautat linkkiä2) Napsauta tallenna3) Varmista, että saat kaikki punaiset bitit oikein !!! Tallenna nimellä.exe ja varmista, että tallennat 'kaikki tiedostot' tai se ei toimi !!!!!

Vaihe 2: Kuinka se toimii: Osa 1

ComboBox

Kuten sanoin, tein sen vb 2008: lla, joten ei ole komentosarjoja. Jotta kaikki olisi todella tehtävä, minun oli vain: jos "write" on valittu comboboxchange label2 -kohdasta kohtaan "Kirjoita viesti - älä lisää kaiku!" textbox1 Vaihda textbox1 -tekstiksi "Mitä haluat sen sanovan?", joka osoittautuu muotoon: If ComboBox1. SelectedItem = ("Write") Sitten Label2. Text = ("Kirjoita viesti - Älä lisää kaiku!") TextBox1. Näytä () TextBox1. Text = ("Mitä haluat sen sanovan?") Lopeta Jos minun piti jatkaa tätä jokaisen yhdistelmälaatikon kohteen kohdalla.

Vaihe 3: Kuinka se toimii: Osa 2

Painikkeet

Painikkeet olivat yksi vaikeimmista tehtävistä, Lisää -painike Jotta lisäyspainike toimisi, minun piti tehdä paljon koodausta, mutta kun olin tehnyt, että loput olivat melko yksinkertaisia … Osa lisäkoodista: jos 'Kirjoita' on Valittu yhdistelmäruudussa ja lisää sitten "echo" + textbox1end -sisällön sisältö: Jos ComboBox1. SelectedItem = ("Write") Sitten ListBox1. Items. Add ("echo" + TextBox1. Text) End Jos se oli useimmiten sama useimmille Poista -painike on vain: Poista valittu kohde luettelosta, joka on: ListBox1. Items. RemoveAt (ListBox1. SelectedIndex) Tyhjennä -painike vain tyhjentää koko luettelon ja lisää sitten kaksi ensimmäistä riviä uudelleen: ListBox1. Items. Clear () ListBox1. Items. Add (":: Made With iRule Batch Maker") ListBox1. Items. Add ("@echo off") ja siirtäminen ylös ja alas vain siirtää valittua kohdetta ylös tai alas: (koodi kauan kestää)

Vaihe 4: Kuinka se toimii: Osa 3

Tallenna/lataa

Tallenna ja lataa oli luultavasti vaikein osa, Tämä on vain tallennuskoodi: Dim sfdMain As New SaveFileDialog sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments Dim Result As DialogResult sfdMain. Filter = "Batch Files (*.bat)) |*.bat | CMD -tiedostot (*. cmd) |*.cmd "sfdMain. FilterIndex = 1 sfdMain. ValidateNames = True Result = sfdMain. ShowDialog If Result = Windows. Forms. DialogResult. OK Sitten Dim sw kuten uusi järjestelmä. IO. StreamWriter (sfdMain. FileName) i As Integer = 0 ListBox1. Items. Count - 1 sw. WriteLine (ListBox1. Items. Item (i)) Seuraava sw. Close () sw. Dispose () Muu Exit Sub End Jos ymmärrät vb: n, tiedät mitä se tekee, mutta jos et ymmärrä: pohjimmiltaan se näyttää vain tallennusvalintaikkunan ja tallentaa kaiken luettelon sisällön erä- tai cmd -tiedostoon