Program Enkripsi Sederhana
Private Sub Command1ClickIf Text5.Text = ' ThenMsgBox 'Anda Belum Menginputkan Bit Geser.!!' , vbCritical, 'Warning'Text5.SetFocusEnd IfVar = Text5.TextText2 = 'If Var 90 ThenText2.SelText = Chr(64 + (Asc(P) - 90))ElseText2.SelText = PText1.Enabled = TrueEnd IfNextElseMsgBox ' Maksimal Bit Hanya 26.!!!' , vbOKOnly + vbInformation, 'Peringatan'Text5 = 'End IfEnd SubPrivate Sub Command2ClickVar = Text5.TextText4 = 'If Var 90 ThenText4.SelText = Chr(64 + (Asc(P) - 90))ElseText4.SelText = PEnd IfNextElseMsgBox ' Data Anda Salah.!!!' , vbOKOnly + vbInformation, 'Peringatan'Text5 = 'End IfEnd SubPrivate Sub Command3ClickText1 = 'Text2 = 'Text3 = 'Text4 = 'Text5 = 'Text5.SetFocusEnd SubPrivate Sub Command4ClickEndEnd SubPrivate Sub Text1KeyPress(KeyAscii As Integer)Text1.SetFocusIf KeyAscii = 8 Then Exit SubKeyAscii = Asc(UCase(Chr(KeyAscii)))If Not (KeyAscii = 65 And KeyAscii = 65 And KeyAscii = 65 And KeyAscii. Safari s pdf as html form. Posting KomentarBerhubung Makin Banyaknya Komentar Yang Tidak Mematuhi Peraturan, Maka Setiap Komentar Yang Masuk Akan Di Moderasi (Diterbitkan Atas Persetujuan) Oleh Admin Terlebih Dulu.Aturan Berkomentar1. Silakan Berkomentar Dengan Baik Dan Sopan.2.
Program Enkripsi Sederhana Di
Komentar Sesuai Topik Artikel3. Mohon Untuk Tidak Mencantumkan Link Aktif Pada Komentar.4. Mohon Untuk Tidak Promosi Produk Disini (Dianggap Spam).5. Komentar Menggunakan Akun Personal (mis. Akun Google), Bukan Akun Nama Produk Barang (Dianggap Promosi) dan Nama yang Mengarah ke URL Tertentu (Dianggap Spam).6. Bila Komentar Tidak Sesuai Aturan Diatas Maka Komentar Tidak Diterbitkan Dan Akan Saya Hapus.Spam = Delete.!!Promosi = Spam = Delete.!!Komentar Yang Sesuai Aturan akan Diterbitkan Selambat-Lambatnya Dalam 1x24 Jam.-Untuk Pertanyaan Yang Dirasa Penting (Urgent) Silakan Contact Saya Melalui Email Pada Link Berikut Ini.