Membuat Program Menggunakan Fungsi MDIForm

Konsep program yang akan dibuat kali ini adalah:

1. Tahap pertama kita akan membuat sebuah Form login yang digunakan untuk masuk kedalam MDIForm, Form login ini tidak termasuk kedalam anak program dari MDIForm
2. Membuat MDIForm lalu buat sebuah menu dengan nama menu lalu mempunyai sebuah submenu dengan nama Matrik Program. 
3. Membuat anak form, yang dimana form ini berisikan tentang program efek text matrik. 

Oke langsung saja buat programnya:

A. Membuat Form Login (Form 1)


1. Buat Form Login seperti dimana:

dibawah ini adalah isi kode dari program Form Login:

Dim pass As String
Dim user As String
Dim p As Integer
Dim Hit As Integer

Private Sub Command1_Click()
pass = "fajar"
user = "fajar rifai"
If Hit < 2 Then
If Text1.Text = user And Text2.Text = pass Then
MsgBox "Selamat Anda Berhasil Login", vbInformation, "berhasil"
MDIForm1.Show
Me.Hide

Else
MsgBox "Login Error"
Hit = Hit + 1
Label3.Caption = "remaining " & (3 - Hit) & " more times"
End If

Else
MsgBox "youre account has been blocked"
End
End If

End Sub

Private Sub Command2_Click()
Text1.Text = " "
Text2.Text = " "
End Sub

Private Sub Command3_Click()
End
End Sub

Catatan: untuk dapat masuk kedalam MDIForm pada program ini anda memasukan Username dengan nama fajar rifai dan Password fajar.

B. Membuat Program Efek Text Matrik (Form 2)

1.Buat Form Seperti Gambar dibawah:

dibawah ini adalah kode pada progra Efek Text Matrik:

Private Sub Command1_Click()
MDIForm1.Show
Me.Hide
End Sub

Private Sub Command2_Click()
p = MsgBox("Keluar Aplikasi?", vbInformation + vbYesNo)
If p = vbYes Then
End
Else
Me.Show
End If
End Sub

Private Sub Timer1_Timer()
Label1.Top = Val(Label1.Top) + 30
Label2.Top = Val(Label2.Top) + 50
Label3.Top = Val(Label3.Top) + 60
Label4.Top = Val(Label4.Top) + 90
Label5.Top = Val(Label5.Top) + 70
Label6.Top = Val(Label6.Top) + 30
Label7.Top = Val(Label7.Top) + 40
Label8.Top = Val(Label8.Top) + 20
Label9.Top = Val(Label9.Top) + 80
Label10.Top = Val(Label10.Top) + 50

If Label1.Top > 4000 Then
Label1.Top = -2000
End If

If Label2.Top > 4000 Then
Label2.Top = -2000
End If

If Label3.Top > 4000 Then
Label3.Top = -2000
End If

If Label4.Top > 4000 Then
Label4.Top = -2000
End If

If Label5.Top > 4000 Then
Label5.Top = -2000
End If

If Label6.Top > 4000 Then
Label6.Top = -2000
End If

If Label7.Top > 4000 Then
Label7.Top = -2000
End If

If Label8.Top > 4000 Then
Label8.Top = -2000
End If

If Label9.Top > 4000 Then
Label9.Top = -2000
End If

If Label10.Top > 4000 Then
Label10.Top = -2000
End If
End Sub
 
Catatan : pada Propertiesnya atur MDIChild-nya menjadi TRUE

C. Membuat Membuat MDIForm

1. Buat Form Seperti dibawah ini:

setelah membuat Menu dan Submenunya adalah Matrik Program, pada submenu Matrik Program, klik dan isikan perintah seperti dibawah ini:

Private Sub k_Click()
Form2.Show
End Sub

Program Membuat Bolu Tart Via Python

Okelah, kali ini saya akan memposting program Bolu Tart, program ini dibuat dengan menggunakan bahasa pemrograman Python, cuma sharing ilmu saja, teman saya berkata bahwa bahasa pemrograman python dipakai atau digunakan untuk membangun sebuah sistem operasi Linux yang sangat terkenal, distronya adalah LINUX BACTRACK, tidak disangka, jadi buat referansi, buat anda yang ingin menguasai Linux Backtrack anda bisa mempelajar bahasa pemrograman python ini, kembali kejudul postingan, dibawah ini adalah listing dari program Bolu Tart:

class Resep:
    def gula(self,jum):
        self.gula = jum
        print 'Gula = '+str(self.gula)+' gr'
    def telur(self,jum):
        self.telur=jum
        print 'Telur = '+str(self.telur)+' butir'
    def tepung(self,jum):
        self.tepung=jum
        print 'Tepung = '+str(self.tepung)+' gr'
    def mentega(self,jum):
        self.mentega=jum
        print 'Mentega = '+str(self.mentega)+' gr'
    def adonan1(self):
       
        print'Campur gula dan telur, kocok sampai halus.'
    def adonan2(self):
        print 'Tambahkan mentega yang sudah dicairkan.'   
    def adonan3(self):
        print 'Tambahkan tepung lalu aduk rata.'
        self.adonan3
    def oven(self):
        print 'Masukkan adonan ke dalam oven sekitar 30 menit. Sajikan.'
g=[500,700]
tl=[4,6]
tp=[800,600]
m=[0,300]
x='y'
y=1
while y :
    if x=='y':
        p=raw_input('\n===Resep Membuat Kue===\n1. Bolu\n2. Tart\n \nMasukkan pilihan anda : ')      
        while p!='2'and p!='1':
            p=raw_input('\nMaaf pilihan anda salah\nMasukkan pilihan anda : ')
        p=int(p)
        if p=='1':
            print '\n===Kue Bolu==='
            Kue=Resep()
            Kue.gula(g[p+1])
            Kue.telur(tl[p-1])
            Kue.tepung(tp[p-1])
            kue.mentega(m[p-1])
            Kue.adonan3()
            Kue.oven()
        else:
            print '\n===Kue Tart==='
            Kue=Resep()
            Kue.gula(g[p-1])
            Kue.telur(tl[p-1])
            Kue.tepung(tp[p-1])
           
            Kue.adonan1()
            Kue.adonan2()
            Kue.adonan3()
            Kue.oven()
    elif x=='t':
        if x=='t':
          y=0
    else:
        print '\nMaaf, anda menekan tombol yang salah.\nTekan tombol y atau t saja.'
    print raw_input('\nUntuk mengulangi tekan y, untuk keluar tekan t : ')
print '\nTerima kasih.'
 

atau anda bisa mendownload programnya di : Program Membuat Bolu Tart Via Python

Contoh Program Faktorial dan Fibonaci Via Ruby

 Menu baru yang saya buat yaitu Expert Program berisikan tentang Program-program yang menurut saya sangat sulit atau sudah masuk pada level expert, hahah, seperti pada contoh dibawah ini, saya membuat sebuah program (sebenarnya bukan saya yang buat sepenuhnya) dengan menggunakan bahasa pemrograman Ruby, program ini mempunyai 3 menu utama yaitu menu pertama berisi tentang faktorial, yang kedua juga sama namun yang membedakan adalah logika yang digunakannya, dan yang terakhir atau yang ketiga adalah fibonaci, langsung saja copy paste program dibawah ke dalam notepad dengan extension .rb lalu jalankan pada Command Prompt.

def faktorial (nilai)
if nilai <= 1
return 1
else
return nilai*faktorial(nilai-1)
end
end

def faktorial(n)
hasil = 1
ctr = 0
n.times do
ctr += 1
hasil *= ctr
end
return hasil
end

def fibonaci (n)
if n < 0
puts "fibonaci tidak ada "
elsif n == 0 or n == 1
return n
else
return fibonaci(n-1) + fibonaci(n-2)
end
end

puts

printf ("\n=====Menu=====")
printf ("\n1.Faktorial 1")
printf ("\n2.Faktorial 2")
printf ("\n3.Fibonaci")
puts
print ("Masukan Pilihan: ")
pil = gets.to_i

if pil == 1
print "masukkan angka : "
x = gets.to_i
for i in 1..x
printf "%2d! = %d\n" ,i,faktorial(i)
end
end

if pil == 2
puts "faktorial 5 = " +
faktorial(5).to_s
puts "faktorial 10 = " +
faktorial(10).to_s
end

if pil == 3
print "masukkan jumlah deret : "
x= gets.to_i
for i in 1..x
print " ",fibonaci(i)
end
end

if pil > 3
print ("Pilihan Tidak Ada")
end

atau anda bisa mendownloadnya disini : Fibo dan Fakto Dalam Satu Menu


 

Membuat Program Menghitung Determinan Ordo 2x2 dan Ordo 3x3

Membuat Program Menghitung Determinan Ordo 2x2 dan Ordo 3x3 

Kali ini saya akan berbagi bagaimana cara membuat program dengan menggunakan bahasa pemrograman java untuk menghitung Determinan dari Ordo 2x2 dan Ordo 3x3. sedikit penjelasan dari program menghitung determinan ordo 2x3 dan ordo 3x3. Pada program ini mengimport Util.Scanner untuk dapat melakukan penginputan. lalu Class utama dari program ini adalah class Determinan. yang nanti kelas determinan ini akan di buat objek baru dan di panggil pada program utama (dibawah Static Void Main).

Listing Program :

import java.util.Scanner;

class Determinan{
        Scanner input = new Scanner(System.in);
       
        public void ordox(){
        System.out.print("Ordo Matriks = 2X2");
                int [][] matrik = new int [2][2];
       
        System.out.println("\nMasukan Elemen Matriksnya:");
        for(int i=0;i<2;i++)
        {
            for(int j=0;j<2;j++)
            {
              System.out.print("Elemen ["+(i+1)+","+(j+1)+"]=");
              matrik[i][j]=input.nextInt();
             }
        }
       
        for(int i=0;i<2;i++)
        {
            System.out.print("|");
            for(int j=0;j<2;j++)
            {
                System.out.print(matrik[i][j]+" ");
               
            }
             System.out.println("|");
        }
        int dtre=(matrik[1][1] * matrik[0][0]) - (matrik[0][1] * matrik[1][0]);
        System.out.println("Determinannya="+dtre);
        }
   
        public void ordoxx(){
        System.out.println("Ordo Matriks = 3X3");
                int [][] matrika = new int [3][3];
       
        System.out.println("\nMasukan Elemen Matriksnya:");
        for(int i=0;i<3;i++)
        {
            for(int j=0;j<3;j++)
            {
              System.out.print("Elemen ["+(i+1)+","+(j+1)+"]=");
              matrika[i][j]=input.nextInt();
             
             }
        }
for(int i=0;i<3;i++)
        {
            System.out.print("|");
            for(int j=0;j<3;j++)
            {
                System.out.print(matrika[i][j]+" ");
               
            }
             System.out.println("|");
        }
int dtr=((matrika[0][0]*matrika[1][1]*matrika[2][2])+(matrika[0][1]*matrika[1][2]*matrika[2][0])+(matrika[0][2]*matrika[1][0]*matrika[2][1]))-((matrika[0][2]*matrika[1][1]*matrika[2][0])+(matrika[0][0]*matrika[1][2]*matrika[2][1])+(matrika[0][1]*matrika[1][0]*matrika[2][2]));
        System.out.println("Determinannya="+dtr);
        }
               
    public void menu(){
    System.out.println();
            System.out.println("================================");
            System.out.println("    MENU  UTAMA        ");
            System.out.println(" 1. Determinan Ordo 2X2   ");
            System.out.println(" 2. Determinan Ordo 3X3   ");
            System.out.println(" 3. Keluar                ");
            System.out.println("================================");
            System.out.println();
            System.out.print("Masukkan Pilihan Anda : ");
            int pil = input.nextInt();
           
            if(pil==1){
            ordox();
            menu();
            }
            if(pil==2){
            ordoxx();
            menu();
            }
            if(pil==3){
            System.out.println();
            System.out.println("Anda Telah Keluar");
            }
           }

    public static void main(String[] args)
    {
        Determinan x = new Determinan();
        x.menu();
       
    }
}

Download Program ini di -> Membuat Program Menghitung Determinan Ordo 2x2 dan Ordo 3x3 
Download Artikel ini di ->  Membuat Program Menghitung Determinan Ordo 2x2 dan Ordo 3x3 

Semoga Bermanfaat :)