Isi kandungan:

Pembuat Kumpulan: 4 Langkah
Pembuat Kumpulan: 4 Langkah

Video: Pembuat Kumpulan: 4 Langkah

Video: Pembuat Kumpulan: 4 Langkah
Video: KUMPULAN 4 RESEP BOLU GULUNG MINI LENTUR ANTI PECAH 👍 SUPER LEMBUT DAN EMPUK 100% BERHASIL 2024, November
Anonim
Pembuat Kumpulan
Pembuat Kumpulan

KEMASKINI V2.0 SEKARANG KELUAR !!! DOWNLOAD BELOWIni adalah projek yang telah saya jalankan sedikit masa.. ia dibuat dengan vb.net 2008 dan ini menjadikan pembuatan kumpulan mudah untuk pemula … !!!!!!!! PERHATIKAN !!!!! !!!!!!!! INI HANYA AKAN BEKERJA DI LAWATAN Ini kerana saya membuat ini di Vista sekarang apabila saya mencubanya di mesin XP ia muncul dengan mesej ralat.. maaf orang. Saya harus berterima kasih kepada TATcreator kerana walaupun dia tahu dia tidak tahu ia memberi saya idea untuk membuat ini.. lol.

Pastikan anda melihat langkah pertama 'pemasangan' sebelum memuat turun !!!! Saya sangat berharap anda menyukainya.. dan jika anda menemui masalah dengannya sila tinggalkan komen atau pm saya supaya saya dapat memperbaikinya dan menyiarkannya semula … sila beri komen mengenai apa yang anda fikirkan dan jangan lupa untuk menilai =)

Langkah 1: Pemasangan

Pemasangan
Pemasangan
Pemasangan
Pemasangan
Pemasangan
Pemasangan

Untuk memasang ikuti langkah-langkah dan gambar dengan teliti !!! 1) Ikuti gambar 1 jika anda hanya mendapat halaman dengan banyak teks semasa anda mengklik pada pautan2) Klik simpan3) Pastikan anda mendapat semua bit merah dengan betul !!! Simpan sebagai.exe Dan Pastikan anda menyimpan sebagai 'Semua Fail' atau tidak akan berfungsi !!!!!

Langkah 2: Bagaimana Ia Berfungsi: Bahagian1

Bagaimana Ia Berfungsi: Bahagian1
Bagaimana Ia Berfungsi: Bahagian1
Bagaimana Ia Berfungsi: Bahagian1
Bagaimana Ia Berfungsi: Bahagian1

Kotak Kombo

Seperti yang saya katakan, saya membuatnya dengan vb 2008 sehingga tidak ada skrip batch. Untuk membuat semua yang saya benar-benar harus lakukan adalah: jika 'tulis' dipilih di label comboboxchange2 untuk 'Tulis mesej - Jangan tambahkan gema!' textbox1change textbox1 text to 'Apa yang anda ingin katakan?' Ternyata sebagai: Jika ComboBox1. SelectedItem = ("Tulis") Kemudian Label2. Text = ("Tulis mesej - Jangan tambahkan gema!") TextBox1. Tunjukkan () TextBox1. Text = ("Apa yang anda mahu katakan?") Akhiri IfI saya harus terus melakukan ini untuk setiap item pada kotak kombo.

Langkah 3: Bagaimana Ia Berfungsi: Bahagian 2

Bagaimana Ia Berfungsi: Bahagian 2
Bagaimana Ia Berfungsi: Bahagian 2
Bagaimana Ia Berfungsi: Bahagian 2
Bagaimana Ia Berfungsi: Bahagian 2

Butang

Butang adalah salah satu perkara yang paling sukar untuk dilakukan, Butang Tambah Untuk butang tambah untuk berfungsi, saya perlu melakukan banyak pengekodan tetapi setelah saya melakukan itu, selebihnya cukup mudah… Bahagian kod tambah: jika 'Tulis' adalah Dipilih dalam kotak kombo kemudian tambah 'gema' + isi kotak teks1end Yang berubah menjadi: Jika ComboBox1. SelectedItem = ("Write") Kemudian ListBox1 Items. Add ("echo" + TextBox1. Text) End Ifit kebanyakannya sama untuk kebanyakan seperti yang ditunjukkan dalam gambar. Butang hapus hanya: Keluarkan item yang dipilih dari senarai yang mana: ListBox1 Items. RemoveAt (ListBox1. SelectedIndex) butang kosong hanya membersihkan keseluruhan senarai kemudian menambah dua baris pertama sekali lagi: ListBox1 Items. Clear () ListBox1. Iems. Add (":: Made With iRule Batch Maker") ListBox1. Iems. Add ("@ echo off") dan kod bergerak naik dan turun hanya memindahkan item yang dipilih ke atas atau ke bawah: (kod ke lama untuk meletakkan)

Langkah 4: Bagaimana Ia Berfungsi: Bahagian3

Bagaimana Ia Berfungsi: Bahagian3
Bagaimana Ia Berfungsi: Bahagian3

Jimat / Beban

Simpan dan Muatkan mungkin bahagian yang paling sukar, Ini hanya kod simpan: Dim sfdMain Sebagai New SaveFileDialog sfdMain. InitialDirectory = My. Computer. FileSystem. SpecialDirectories. MyDocuments Dim Result As DialogResult sfdMain. Filter = "Batch Files (*.bat) | *.bat | Fail CMD (*. cmd) | *.cmd "sfdMain. FilterIndex = 1 sfdMain. ValidateNames = Keputusan Benar = sfdMain. ShowDialog Jika Hasil = Windows. Forms. DialogResult. OK Kemudian Dim sw Sebagai Sistem Baru. IO. StreamWriter (sfdMain. FileName) For i As Integer = 0 To ListBox1 Items. Count - 1 sw. WriteLine (ListBox1 Items Item (i)) sw berikutnyaClose () sw. Dispose () Else Exit Sub End Sekiranya anda memahami vb, anda akan tahu apa yang dilakukannya tetapi jika anda tidak: pada dasarnya, semua yang dilakukan adalah menunjukkan dialog simpan, dan menyimpan semua kandungan senarai ke dalam batch file atau file cmd

Disyorkan: