MEMBUAT SEBUAH APLIKASI MENGHITUNG SEDERHANA

I. PENDAHULUAN
        1.1 Latar Blakang
        1.2 Tujuan Tema yang saya buat
II. MAKSUD DAN TUJUAN
        2.1 Maksud dari Tulisan dan Tujuannya
III. ISI / MAKSUD
        3.1 Tujuan yang Ingin dicapai Ketika Masalah itu Selesai
IV. MASALAH
        4.1 Masalah Pembuatan Tema
V. METODE YANG DIGUNAKAN
        5.1 Studi Pustaka
VI. LANDASAN TEORY
        6.1 Definisi
        6.2 Landasan Teory
        6.3 Pembuatan Program
VII. PENUTUP
        7.1 Kesimpulan
        7.2 Hasil yang di Capai
VIII. SARAN
        8.1 Apakah Ada Metode Lainya

PENDAHULUAN

1.1 Latar Blakang

   Puji syukur panjatkan ke hadiran Allah Subhanahuwata’ala, karena berkat Rahmatnya Saya bisa menyelesaikan Karangan Ilmiah ini yang bertemakan tentang Membuat Kalkulator Sederhana. Karangan Ilmiah ini di ajukan untuk memenuhi tugas mata kuliah Rekayasa Prangkat lunak.

  Semoga makalah ini memberikan informasi bagi orang lain dan bermanfaat untuk pengembangan wawasan dan peningkatan ilmu pengetahuan bagi kita semua.

1.2 Tujuan Tema yang Saya Buat dan Tujuannya

- Tujuan tema ini untuk membantu berhitung dalam plajaran IPA / Berhitung serta memudah kan kita untuk
   melakukan hitungan yang banyak serta dapat kn hasil bisa dikatakan 98% akurat.
- Mampu membuat aplikasi yang seder hana
- Mengetahui prosedur apa saja yang harus dilakui untuk membuat sebuah aplikasi

MAKSUD DAN TUJUAN

2.1 Maksud dari Tulisan

    Adapula maksud dan Tujuan dari tulisan ini ialah untuk menjelasakn bagai mana prinsip kerja program yang akan saya buat dan pengaplikasiannya kedalam bahasa pemmrograman agar dapat diplajarin dan dapat dikembangkan oleh siapapun.

ISI/MAKSUD

3.1 Tujuan yang ingin dicapai Ketika Masalah itu Selesai

    Tujuan yang ingin dicapai yaitu Menyelesaikan Disain yang sederhana maupun baris - baris program yang simpel dan mudah diplajarin, sehingga dapat mudah di mengerti setiap baris program yang akan di buat, selain itu memiliki hasil yang akurat setiap input yang akan dimasukan.

                   

MASALAH

4.1 Masalah Pembuatan Tema ini
   
    Dalam sebuah penelitian ilmiah pasti terdapat masalah - masalah yang akan dihadapin. Untuk penelitian saya kali ini, ada pun masalah yang saya hadapin yak ini:

1. Pembuatan rumus - rumus yang harus diselesaikan sebelum pengapplikasian kedalam
   sebauh program.
2. Code pemmrograman yang simpel dan memiliki hasil yang akurat
3. Desain yang menarik serta mudah digunakan
4. Program yang dibutuh kan VB(Visual Basic) untuk penerjemah bahasa program ke
   bahasa mesin (komputer).

METODE YANG DIGUNAKAN

5.1 Studi Pustaka


      Dalam penelitian ini untuk mengimplementasikannya kedalam bahasa pemrograman saya menggunakan
CASE. Case ialah sebauah keputusan yang terdapat pada semua bahsa pembrograman agar dapat memenuhi keputusan apa yang kita inginkan untuk memerintahkan komputer, case ini bisa kita berikan keputusan lebih dari 1 atau pencabangan case yang mudah dan sedikit baris program dalam membuat sebuah keputusan.

     Ada juga keputusan yang saya gunakan yaitu IF THEN, if then ialah sebuah keputusan yang sama seperti case namun masing - masing keputusan tersebut memiliki kelebihan dan ke kurangan, if then biasanya digunakan untuk keputusan yang simpel / sedikit sehingga tika perlu penulisan baris program yang panjang dan ribet yang akan menambah berat kinerje program tersebut mau pun memory yang digunakan.

LANDASAN TEORY

6.1 Defi Nisi

      Sebuah aplikasi dapat didefinisikan sebagai suatu program komputer yang dibuat
untuk menolong manusia dalam melaksanakan tugas tertentu.Aplikasi berbeda dengan sistem operasi (yang menjalankan komputer). Utitility (yang melaksanakan perawatan atau tugas – tugas umum) dan bahasa yang
digunakan untuk membuat program komputer) tergantung dari tujuan pekerjaan yang dimaksudkan. Suatu aplikasi dapat memanipulasi teks, angka, grafik atau kombinasi dari unsur – unsur tersebut.

6.2 Landasan Teori

1. Persiapan Ruang Kerja
    Dalam membuat sebuah program aplikasi, maka hendaklah terlebih dahulu harus mempersiapkan tempat kerja (folder). Yang berfungsi sebagai tempat untuk menyimpan semua file yang akan dibuat nantinya dengan VB(Visual Basic).
  

 2. Tipe - Tipe data
      Dalam bahasa pemmrograman ini (Visual Basic) memiliki beberapa macam tipe data yang bisa digunakan didalam pemmrograman.Tipe - tipe data yang dapat dalam bahasa pemmrograman ini ialah :

- Integer : Tipe data numerik yang berupa bilangan bulat, mulai dari -32.768 -s/d 32.767.
-Byte  : Tipe data yang berupa nilai bualat positif, mulai dari 0 s/d 255.
-Decimal : Tipe data yang digunakan untuk menyimpan nilai desimal dengan ketepatan  hingga
  28 angka desimal.
- Boolean  : Tipe data yang hanya memiliki dua buah nilai yakni True dan False.

-String : Tipe data yang memiliki alfanumerik, bisa berupa huruf, karakter khusu atau angka.
- Single : Tipe data Numerik, mulai dari -3.402823E+38 hingga 3.402823E+38.

 - Double : Tipe data numerik yang memiliki kisaran nilai yang sangat besar, mulaidari -1.79769313486232E

  +308 hingga 1.79769313486232E+308.

- Date: tipe data yang digunakan untuk menyimpan nilai tanggal dan jam.

- Currency: tipe data yang digunakan untuk menyimpan nilai uang.

- Long: tipe data numerik yang mirip dengan integer, hanya saja kisarannyalebih besar

   yaitu dari -2.147.483.648 hingga 2.147.483.648.

- Object: tipe data yang digunakan untuk menyimpan objek seperti

  form,kontrol dan sebagainya.

-Variant: tipe data ini bisa berisi segala macam tipe data yang 

  berbeda.Biasanya digunakan jika kita tidak tahu tipe data apa yang akan digunakan

 
Dari beberapa tipe data yang disebut diatas adapula tipe data yang saya gunakan dalam penelitian saya, yaitu Integer, string, single dan long.


3. Oprato

    Oprator adalah perintah yang memanipulasi nilai atau variable dalam memberikan suatu hasil.

4. Oprator Aritmatika

    Operator ini biasa digunakan untuk perhitungan matematis. Beberapa

operator yang biasa digunakan dalam Visual Basic dapat dilihat pada tabel dibawah in :

5. Operator Pembanding

    Operator ini digunakan untuk membandingkan dua buah nilai, untuk menghasilkan True(benar) atau False (salah) yang terdapat pada suatu kondisi. Beberapa operatorpembanding antara lain :

 

6.Operator Logika

   Operator ini digunakan untuk membandingkan “perbandingan”, untuk menghasilkan Trueatau False. Bentuk dan contoh dari operator ini dapat dilihat pada tabel dibawah ini:

 6.3 Pembuatan Program
       Utuk membuat proggram ini, langkah pertama ialah menjalankan applikasinya (VB).
1. klik menu start>All program>Microsoft Visual Studio 6.0>Microsoft Visual Basic 6.0

Gambar : 1.1 Proses menjalakan aplikasi

Setelah langkah diatas dilakukan, maka komputer akan menampilkan jendela Start Up dari visual basic,dan dilanjutkan dengan jendela New Project.

Gambar : 1.2 Tampilan jendela New Project

2. Dari jendela tersebut, kemudian pilih Standard EXE.
3. Lalu klik Open.
    Maka jendela Visual Basic akan tampil seperti gambar 1.3 dibawah ini.

Gambar : 1.3 Tampilan Jendela kerja Visual Basic

Nah setelah tampil jendela Visual Basic seperti diatas, maka selanjutnya kita mendesain tampilan sesuai ke trampilan diri kita masing {kreasi / imajinasi setiap orang}, brikut ini Gambar : 1.4 tampilan desain dari saya.

Gambar : 1.4 Tampilan Desain

Gambar 1.4 diatas adalah tampilan desain dari saya, dimana saya membuat 2 forms yang mana satu forms untuk aplikasi kalkulator yang saya buat dan satu lagi untuk tentang pembuat program.

4. Souce code program :
    Setelah mendesain tampilan program yang kita buat, maka sekarang souce code program
brikut souce kode programnya untuk forms pertama (untuk kalkulator):

Dim angka(1 To 2) As Single
Dim oprator As String
Dim ab As Integer

Private Sub cmd3_Click()
If Len(Text1.text) > 0 Then
Text1.text = Text1.text ^ 3
End If
End Sub

Private Sub cmdakar_Click()
If Len(Text1.text) > 0 Then
Text1.text = Sqr(Text1.text)
End If
End Sub

Private Sub cmdangka_Click(Index As Integer)
Text1.text = Text1.text & cmdangka(Index).Caption
End Sub

Private Sub cmdBersih_Click()
Text1.text = ""
End Sub

Private Sub cmd2_Click()
If Len(Text1.text) > 0 Then
Text1.text = Text1.text ^ 2
End If
End Sub


Private Sub cmdhitung_Click()
Dim hasil As Single
If Text1.text = "" Then Exit Sub
angka(2) = Text1.text
Select Case oprator
        Case "x^y"
        hasil = angka(1) ^ angka(2)
        Case "%"
        hasil = angka(1) * angka(2) / 100
        Case "+"
        hasil = angka(1) + angka(2)
        Case "-"
        hasil = angka(1) - angka(2)
        Case "x"
        hasil = angka(1) * angka(2)
        Case ":"
        hasil = angka(1) / angka(2)
    End Select
    Text1.text = hasil
End Sub

Private Sub cmdoprator_Click(Index As Integer)
If Text1.text = "" Then Exit Sub
angka(1) = Text1.text
oprator = cmdoprator(Index).Caption
Text1.text = ""
End Sub

Private Sub CmdC_Click()
If (Text1.text) = "" Then
MsgBox "text telah kosong", vbInformation, "INFO"
    ElseIf (Text1.text) > 0 Then
    Text1.text = Mid(Text1.text, 1, Len(Text1.text) - 1)
    End If
End Sub

Private Sub Cmdtk_Click()
If Left(Text1.text, 1) = "-" Then
Text1.text = Mid(Text1.text, 2, Len(Text1.text) - 1)
Else
Text1.text = "-" & Text1.text
End If
End Sub


Private Sub Command1_Click()
Dim text As Double
If Len(Text1.text) > 0 Then
Text1.text = Tan(Text1.text)
End If
End Sub

Private Sub Command2_Click()
Dim text As Double
If Len(Text1.text) > 0 Then
Text1.text = Sin(Text1.text)
End If
End Sub

Private Sub Command3_Click()
Dim text As String
If Len(Text1.text) > 0 Then
text = Cos(Text1.text)
End If
Text1.text = text
End Sub

Private Sub Form_Load()
MsgBox "Terimakasih Atas Kepercayaan Anda Kepada Program Saya", vbOKOnly, "TERIMAKASIH"
Timer1.Interval = 59
Timer1.Tag = 1
Timer2.Interval = 180

                Text1.text = ""
                Text1.MaxLength = 11
                Text1.Locked = True
                Text1.DragMode = 1
                Text1.Alignment = 1
                Text1.ForeColor = &HFF
                Text1.FontSize = 16
               
Label1.Alignment = 2
Label2.Alignment = 2
Label1.BorderStyle = 1
Label2.BorderStyle = 1
Label1.BackColor = 45455
Label2.BackColor = 45455
End Sub

Private Sub subab_Click(Index As Integer)
frmabout.Show
End Sub

Private Sub subExt_Click(Index As Integer)
Dim quit
quit = MsgBox("apakah anda yakin inginkluar dari program ini???", vbYesNo, "Exit")
If quit = vbYes Then
End
End If
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "dd-mm-yyyy")
Label2.Caption = Format(Now, "hh:mm:ss Am/Pm")
End Sub

Private Sub Timer2_Timer()
Static i         As Long
Const strCaption As String = "Kalkulator"
i = i + 1
If i > Len(strCaption) Then
i = 0
End If
frmkalkulator.Caption = Left(strCaption, i)
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim quit
quit = MsgBox("Apakah Anda yakin ingin keluar dari program ini ?", vbYesNo, "Exit")
If quit = vbNo Then
Cancel = 1
Exit Sub
End If
End Sub


Berkut souce code untuk forms kedua  :

Private Sub cmdtutup_Click()
Unload Me
End Sub

Private Sub Form_Load()
frmkalkulator.Enabled = False
Text1.Top = 2000
Timer1.Interval = 50
           
            Timer2.Interval = 220
End Sub

Private Sub Form_Unload(Cancel As Integer)
frmkalkulator.Enabled = True
End Sub

Private Sub Timer1_Timer()
Dim bergerak
bergerak = Text1.Top - 20

Text1.Top = bergerak

If bergerak < -5800 Then

Text1.Top = 2090

End If
End Sub

Private Sub Timer2_Timer()
Static i         As Long
Const strCaption As String = "About"
i = i + 1
If i > Len(strCaption) Then
i = 0
End If
frmabout.Caption = Left(strCaption, i)
End Sub

 VII. PENUTUP

7.1 Kesimpulan

   Dalam membuat sebuah aplikasi tidak lah sulitt, hanya saja membutuh kan ketelitian dan ke uletan serta niat untuk membuatnya, aplikasi ini mudah digunakan dan serta mudah dalam penggunaanya.

7.2 Hasil Yang Dicapai

      Applikasi ini dapat mengeluar hasil yang akurat, tetapi aplikasi ini tidak bisa menampilkan angka 0 (nol) di awal seperti aplikasi kalkulator yang pada setiap komputer, butuh pengembangn lebih lanjut agar applikasi ini dapat melakukan hal yang sama pada saat di jalankan namun applikasi ini bisa digunakan dan dapat melakukan hal - hal seperti kalkulator biasa yang dapat melakukan penambahan, pengurangn, pengalian, pembagian dan perkalian namun ada tabahan yang saya berikan pada aplikasi ini seperti pemangkatan, akar, dan lain - lain.

VIII. SARAN

 8.1 Apakah Ada Metode Lainya

       Seiring perkembangan waktu dan zaman maka berkembang pula wawasan setiap manusia yang memiliki niat blajar dan keingin tahuan yang tinggi untuk mengembangkan sebuah applikasi, selain metode yang saya gunakan untuk pembuatn applikasi ini ada pula metode - metode lain yang dapat digunakan dalam pembuatan applikasi seperti ini misalnya saja menggunakan penggabungan semua perulangan untuk mencapai hasil yang lebih maksimal.

DAFTARPUSTAKA

Ardhy(2012).Implementasi IT untuk disain dan souce code. Fromhttp://blajar-yuuk.blogspot.com/2012/03/membuat-applikasi-sederhana.html, 27 Maret 2012.



Applikasi yang saya buat dapat di download, Klik Disini

UPGRAD Galaxy Mini Gingerbread 2.3.6

kali ini ane mau share cara upgrade galaxy mini (galmin) ke gingerbread 2.3.6..
gak banyak sihhh perbedann dengan versi sebelumnya yang gingerbread 2.3.3 atau pun 2.3.4

tapi untuk versi resmi gingerbread 2.3.6 ini udah mendekatan CM7...
beberapa ada perbaikan bug" sehingga lebih ringan dan cepat,selain itu juga batrenya terbilang lebih hemat sedikit dari pada versei sebelumnya.. apa lagi klo di tambah dengan aplikasi pendukung seperti SET CPU, BOOSTER MEMRY RAM. Dijamin batre lebih awet dari perkiraan temen-temen sekalian...
saya yang sudah merasakan langsung batre bisa bertahan hampir 3 hari dalam modus 3.5G dan penggunaan standard. seperti SMS
dari pada banyak cerita langsung aja ke TKP heheheh

bahan yang harus diperlukan
1.Odin Multi Downloader Disini
2.Download USB samsung bagi yang belum punya Disini
3.Firmwarenya S5570DDKQ7 Disini

4.Tass OPS Disini
5.USB buat si galmin jangan ampe ketinggalan y.....
password: belajar-yuuk

kalo dah di persiapkan semua bahannya mari kita beda Galminnya yuuuukk mariii:
1. Pertama install dulu Samsung USB (bagi yang belum menginstallnya, bagi yang sudah langsung z ketahap
    yang ke 2)
2. Buka Odin Downloader, jangan buru-buru nyambunginnya ke PC... ubah dulu mini kedalam mode
   downloader caranya mudah koq... dalam ke adaan mati si mini alias OFF... TEKAN dan TAHAN
   TOMBOL POWER (yang ada di sebelah kanan atas) + TOMBOL HOME(yang ditengah itu
    lohh)+VOLUME KEY DOW(yang sebelah kanan bawah). INGAT YA.....MENEKANNYA SECARA
    BERSAMAAN..
 
    ne contoh gambarnya :

   Tahan terus tombolnya secara bersamaan sampai masuk seperti ini :

     Kalo udah seperti di atas tinggal colokin z galaxy mininya ke PC menggunakan USB yang udah di 

     siapkan di awal tadi.

3. Sambungkan USB ke PC dan tunggu sampai ODIN ditec divice galaxy mininya

   kalau sudah diteck maka odin seperti di atas.. ada tanda kuningnya (COM 1)

  

4. Ini yang  paling penting klik buton OPS (masukin ops yang udh d download di awal tadi TASS_v1.0.ops)

    kemudian CENTAN/CEKLIS  ONE PACKAGE yang ada di OPTION sebelah kiri.

    lalu KLIK BUTON ONE PACKAGE yang ada di sebelah kanan paliiiiiiiing bawahhh....

    dan masukin firmwarenya yang terlebih dahulu di EXTRACT ya....

    trakhir klik buton start dehhhhhhhh dan tunggu galmin anda sampai reboot sendiri

    hasilnya seperti gambar di bawah ini...(ane ambil dari blog tetangga hehehe)

   

   setelah telah reboot gambar seperti ini :

   

tandanya sudah berhasil meng upgrade galaxy mini kmu...................

INGAT : apapun kerusakan yang terjadi saya tidak bertanggung jawab.saya hanya membantu anda sekalian.

Pada umumnya flashing sangat aman dilakukan apabila sesuai prosedur yang saya berikan. karna saya udah mencoba berkali-kali untuk melakukannya karna saya suka mengganti costum ROM galmin....

klo ada masalah silahkn posting dibawah y...

ntr saya coba membantu...

selamat mencoba....