Съдържание:

Производител на партиди: 4 стъпки
Производител на партиди: 4 стъпки

Видео: Производител на партиди: 4 стъпки

Видео: Производител на партиди: 4 стъпки
Видео: Стоян колев се кара с яница 2024, Юли
Anonim
Производител на партиди
Производител на партиди

Актуализирайте V2.0 СЕГА !!! ИЗТЕГЛЕТЕ ПО -ДОЛУ Това е проект, върху който работя за малко хитрост.. той е направен с vb.net 2008 и прави опростяването на партидата за начинаещите … !!!!!!!! ВНИМАНИЕ !!!!! !!!!!!!! ТОВА ЩЕ РАБОТИ САМО НА VISTAit, защото сега го направих на Vista, когато го опитам на машина с XP, се появява съобщение за грешка.. съжалявам хора. Трябва да благодаря на TATcreator, защото дори знам, че той не знам той ми даде идеята да направя това.. хаха.

Не забравяйте да разгледате първата стъпка „инсталация“, преди да изтеглите !!!! Наистина се надявам да ви хареса.. и ако откриете някакви проблеми с нея, моля, оставете коментар или ми пишете, за да мога да ги поправя и да я публикувам отново… моля коментирайте какво мислите и не забравяйте да го оцените =)

Стъпка 1: Инсталиране

Инсталация
Инсталация
Инсталация
Инсталация
Инсталация
Инсталация

За да инсталирате, следвайте стъпките и снимките отблизо !!! 1) Следвайте снимка 1, ако просто получите страница с много текст, когато щракнете върху връзката 2) Щракнете върху запазване 3) Уверете се, че сте получили всички червени битове правилно !!!.exe И не забравяйте да запишете като „Всички файлове“или няма да работи !!!!!

Стъпка 2: Как работи: Част 1

Как работи: Част 1
Как работи: Част 1
Как работи: Част 1
Как работи: Част 1

ComboBox

Както казах, направих го с vb 2008, така че няма пакетни скриптове. За да направя всичко, наистина трябваше да направя: ако „write“е избрано в comboboxchange label2 към „Напиши съобщение - Не добавяй ехото!“textbox1променете текстовото поле1 на „Какво искате да каже?“Което се оказва като: Ако ComboBox1. SelectedItem = („Запиши“) Тогава Label2. Text = („Напишете съобщение - Не добавяйте ехото!“) TextBox1. Show () TextBox1. Text = ("Какво искате да кажете?") Край Ако трябваше да продължа да правя това за всеки елемент в комбинираната кутия.

Стъпка 3: Как работи: Част 2

Как работи: Част 2
Как работи: Част 2
Как работи: Част 2
Как работи: Част 2

Бутоните

Бутоните бяха едно от най -трудните неща, които трябва да се направят, бутонът за добавяне За да работи бутонът за добавяне, трябваше да направя много кодиране, но след като направих това, останалото беше доста просто … Част от кода за добавяне: ако „Писане“е Избрано в комбинирано поле thenadd 'echo' + съдържанието на textbox1end Което се оказва като: Ако ComboBox1. SelectedItem = ("Write") Тогава ListBox1. Items. Add ("echo" + TextBox1. Text) End Ifit беше почти същото за повечето от бутоните за премахване са само: Премахване на избрания елемент от списъка, който е: ListBox1. Items. RemoveAt (ListBox1. SelectedIndex) бутонът за изчистване просто изчиства целия списък, след което отново добавя първите два реда: ListBox1. Items. Clear () ListBox1. Items. Add (":: Made With iRule Batch Maker") ListBox1. Items. Add ("@echo off") и кодът за преместване нагоре и надолу просто премества избрания елемент нагоре или надолу: (код на дълго да се търпи)

Стъпка 4: Как работи: Част 3

Как работи: Част 3
Как работи: Част 3

Запазване/зареждане

Запазването и зареждането вероятно бяха най -трудната част. Това е само кодът за запазване: Dim sfdMain As New SaveFileDialog sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments Dim Result As DialogResult sfdMain. Filter = Пакетни файлове (| |.. IO. StreamWriter (sfdMain. FileName) For i As Integer = 0 To ListBox1. Items. Count - 1 sw. WriteLine (ListBox1. Items. Item. Item) Next sw. Close () sw. Dispose () Else Exit Sub End Ако разбирате vb, ще знаете какво прави това, но ако не го правите: по принцип всичко, което показва, е да покаже диалоговия прозорец за запазване и той записва цялото съдържание на списъка в партиден файл или cmd файл

Препоръчано: