Esempio n. 1
0
        private void tombolCiptakan_Click(object sender, EventArgs e)
        {
            //Variabel-variabel lokal
            StreamWriter FileKeluaran;   //Variabel Objecct
            int          intJumMaks = 0; //Jumlah nilai
            int          intHitung  = 0; //Kounter loop, ditetapkan 0
            int          intAngka   = 0; //Memuat masukan pengguna

            try
            {
                //Membaca angka-angka dari pengguna

                int jumMaks = 0;
                if (InputBox("Berapa Banyak Integer", "Banyak Integer:", ref jumMaks) == DialogResult.OK)
                {
                    intJumMaks = jumMaks;
                }

                try
                {
                    //Menciptakan file
                    FileKeluaran = File.CreateText(strNAMAFILE);
                    //Membaca angka-angka dan menuliskan ke file
                    while (intHitung < intJumMaks)
                    {
                        try
                        {
                            int angka = 0;
                            if (InputBox("Masukkan Integer", "Integer:", ref angka) == DialogResult.OK)
                            {
                                intAngka = angka;
                            }

                            //Menuliskan integer tersebut ke dalam file
                            FileKeluaran.WriteLine(intAngka);
                            //Menginkremen intHitung
                            intHitung += 1;
                        }
                        catch
                        {
                            //Pesan error untuk integer tak-valid
                            MessageBox.Show("Nilai terakhir yang Anda masukkan bukanlah" +
                                            " sebuah integer yang valid. Coba lagi.");
                        }
                    }
                    //Menutup file
                    FileKeluaran.Close();
                }
                catch
                {
                    //Pesan error untuk error penciptaan file
                    MessageBox.Show("Error penciptaan file " + strNAMAFILE);
                }
            }
            catch
            {
                //Pesan error untuk angka tak-valid
                MessageBox.Show("Silahkan masukkan integer yang valid");
            }
        }
Esempio n. 2
0
        //Prosedur BukaDokumen menyimpan dokumen
        private void SimpanDokumen()
        {
            StreamWriter FileKeluaran; //Variabel Object

            try
            {
                //Menciptakan file
                FileKeluaran = File.CreateText(strNamaFile);
                //Menuliskan kotak teks ke file
                FileKeluaran.Write(teksDokumen.Text);
                //Menutup file
                FileKeluaran.Close();
                //Memperbarui blnApaBerubah
                blnApaBerubah = false;
            }
            catch
            {
                //Pesan error untuk error penciptaan file
                MessageBox.Show("Error penciptaan file.");
            }
        }