Hanya sekedar berbagi di blog

Jika ada yang suka dari blog saya silahkan ambil, jika tidak gak usah komen, semua artikel di blog ini terdiri dari beberapa sumber dan ada yang produk sendiri juga.

Hanya sekedar berbagi di blog

Jika ada yang suka dari blog saya silahkan ambil, jika tidak gak usah komen, semua artikel di blog ini terdiri dari beberapa sumber dan ada yang produk sendiri juga.

Hanya sekedar berbagi di blog

Jika ada yang suka dari blog saya silahkan ambil, jika tidak gak usah komen, semua artikel di blog ini terdiri dari beberapa sumber dan ada yang produk sendiri juga.

Hanya sekedar berbagi di blog

Jika ada yang suka dari blog saya silahkan ambil, jika tidak gak usah komen, semua artikel di blog ini terdiri dari beberapa sumber dan ada yang produk sendiri juga.

Hanya sekedar berbagi di blog

Jika ada yang suka dari blog saya silahkan ambil, jika tidak gak usah komen, semua artikel di blog ini terdiri dari beberapa sumber dan ada yang produk sendiri juga.

Selasa, 02 Desember 2014

Assalamu'alaikum Wr.Wb

Puihhhhhh....mungkin expresi itulah yang bisa saya keluarkan untuk kembali menulis di blog sederhana ini,bagaimana tidak sudah hampir 3 bulan saya agak sedikit malas belajar atau mengikuti mata kuliah dikampus, karena matkulnya lumayan ehh bukan lumayan lagi tapi bener2 menguras otak bingiittt.... #alay
Jika kalian kuliah dan ambil jurusan Teknik Informatika ( TI ) akan menemui yang namanya Kalkulus dan LSD ( logika sistem digital ), bener-bener menguras otak :D untuk saya sih dan mudah-mudahan kalian sama eheheh, karena dasar saya bukan IPA melainkan IPS jadi mungkin agak sedikit lemot kalau di kasih rumus rumus dan rumus..jadi puihhhhh aaaahhhh lega banget lepas dari semester kemarin, hehe..oke deh tanpa basa basi lagi langsung saja saya akan menulis (copas sih sebenarnya) sedikit tentang matkul yang baru saya pijak dan saya merasa semangat sekali, karena Bu dosennya masih muda dan cakep :D , heehehe dan matkulnya ialah Pengantar Teknologi Informasi dan Komunikasi alias PTIK dan ini bagian dari tugas yang bu dosen kasih :D


Apa itu TIK ?
Teknologi Informasi dan Komunikasi, adalah payung besar terminologi yang mencakup seluruh peralatan teknis untuk memproses dan menyampaikan informasi. TIK mencakup dua aspek yaitu teknologi informasi dan teknologi komunikasi. Teknologi informasi meliputi segala hal yang berkaitan dengan proses, penggunaan sebagai alat bantu, manipulasi, dan pengelolaan informasi. Sedangkan teknologi komunikasi adalah segala sesuatu yang berkaitan dengan penggunaan alat bantu untuk memproses dan mentransfer data dari perangkat yang satu ke lainnya. Oleh karena itu, teknologi informasi dan teknologi komunikasi adalah dua buah konsep yang tidak terpisahkan. Jadi Teknologi Informasi dan Komunikasi mengandung pengertian luas yaitu segala kegiatan yang terkait dengan pemrosesan, manipulasi, pengelolaan, pemindahan informasi antarmedia.Istilah TIK muncul setelah adanya perpaduan antara teknologi komputer (baik perangkat keras maupun perangkat lunak) dengan teknologi komunikasi pada pertengahanabad ke-20. Perpaduan kedua teknologi tersebut berkembang pesat melampaui bidang teknologi lainnya. Hingga awal abad ke-21, TIK masih terus mengalami berbagai perubahan dan belum terlihat titik jenuhnya.

Sejarah
Ada beberapa tonggak perkembangan teknologi yang secara nyata memberi sumbangan terhadap perkembangan TIK hingga saat ini. Pertama yaitu temuan telepon oleh Alexander Graham Bell pada tahun 1875. Temuan ini kemudian berkembang menjadi pengadaan jaringan komunikasi dengan kabel yang meliputi seluruh daratan Amerika, bahkan kemudian diikuti pemasangan kabel komunikasi trans-atlantik. Jaringan telepon ini merupakan infrastruktur masif pertama yang dibangun manusia untuk komunikasi global.
Memasuki abad ke-20, tepatnya antara tahun 1910-1920, terwujud sebuah transmisi suara tanpa kabel melalui siaran radio AM yang pertama. Komunikasi suara tanpa kabel ini pun segera berkembang pesat. Kemudian diikuti pula oleh transmisi audio-visual tanpa kabel, yang berwujud siaran televisi pada tahun 1940-an.
Komputer elektronik pertama beroperasi pada tahun 1943. Lalu diikuti oleh tahapan miniaturisasi komponen elektronik melalui penemuan transistor pada tahun 1947 dan rangkaian terpadu (integrated electronics) pada tahun 1957.
Perkembangan teknologi elektronika, yang merupakan cikal bakal TIK saat ini, mendapatkan momen emasnya pada era Perang Dingin. Persaingan IPTEK antara blok Barat (Amerika Serikat) dan blok Timur (dulu Uni Soviet) justru memacu perkembangan teknologi elektronika lewat upaya miniaturisasi rangkaian elektronik untuk pengendali pesawat ruang angkasa maupun mesin-mesin perang. Miniaturisasi komponen elektronik, melalui penciptaan rangkaian terpadu, pada puncaknya melahirkan mikroprosesor. Mikroprosesor inilah yang menjadi 'otak' perangkat keras komputer dan terus berevolusi sampai saat ini. Perangkat telekomunikasi berkembang pesat saat teknologi digital mulai digunakan menggantikan teknologi analog. Teknologi analog mulai terasa menampakkan batas-batas maksimal pengeksplorasiannya. Digitalisasi perangkat telekomunikasi kemudian berkonvergensi dengan perangkat komputer yang sejak awal merupakan perangkat yang mengadopsi teknologi digital. Produk hasil konvergensi inilah yang saat ini muncul dalam bentuk telepon seluler. Di atas infrastruktur telekomunikasi dan komputasi ini kandungan isi (content) berupa multimedia mendapatkan tempat yang tepat untuk berkembang. Konvergensi telekomunikasi - komputasi multimedia inilah yang menjadi ciri abad ke-21, sebagaimana abad ke-18 dicirikan oleh revolusi industri. Bila revolusi industri menjadikan mesin-mesin sebagai pengganti 'otot' manusia, maka revolusi digital (karena konvergensi telekomunikasi - komputasi multimedia terjadi melalui implementasi teknologi digital) menciptakan mesin-mesin yang mengganti (atau setidaknya meningkatkan kemampuan) 'otak' manusia.

Penerapan TIK dalam pendidikan di Indonesia[sunting | sunting sumber]
Indonesia pernah menggunakan istilah telematika (telematics) untuk arti yang kurang lebih sama dengan TIK yang kita kenal saat ini. Encarta Dictionary mendeskripsikan telematics sebagai telecommunication + informatics (telekomunikasi + informatika) meskipun sebelumnya kata itu bermakna science of data transmission. Pengolahan informasi dan pendistribusiannya melalui jaringan telekomunikasi membuka banyak peluang untuk dimanfaatkan di berbagai bidang kehidupan manusia, termasuk salah satunya bidang pendidikan. Ide untuk menggunakan mesin-belajar, membuat simulasi proses-proses yang rumit, animasi proses-proses yang sulit dideskripsikan sangat menarik minat praktisi pembelajaran.
Tambahan lagi, kemungkinan untuk melayani pembelajaran yang tak terkendala waktu dan tempat juga dapat difasilitasi oleh TIK. Sejalan dengan itu mulailah bermunculan berbagai jargon berawalan e, mulai dari e-book, e-learning, e-laboratory, e-education, e-library, dan sebagainya. Awalan e bermakna electronics yang secara implisit dimaknai berdasar teknologi elektronika digital.
Pemanfaatan TIK dalam pembelajaran di Indonesia telah memiliki sejarah yang cukup panjang. Inisiatif menyelenggarakan siaran radio pendidikan dan televisi pendidikan merupakan upaya melakukan penyebaran informasi ke satuan-satuan pendidikan yang tersebar di seluruh nusantara. Hal ini adalah wujud dari kesadaran untuk mengoptimalkan pendayagunaan teknologi dalam membantu proses pembelajaran masyarakat. Kelemahan utama siaran radio maupun televisi pendidikan adalah tidak adanya feedback yang seketika. Siaran bersifat searah yaitu dari narasumber atau fasilitator kepada pembelajar.
Introduksi komputer dengan kemampuannya mengolah dan menyajikan tayangan multimedia (teks, grafis, gambar, suara, dan gambar bergerak) memberikan peluang baru untuk mengatasi kelemahan yang tidak dimiliki siaran radio dan televisi. Bila televisi hanya mampu memberikan informasi searah (terlebih jika materi tayangannya adalah materi hasil rekaman), pembelajaran berbasis teknologi internet memberikan peluang berinteraksi baik secara sinkron (real time) maupun asinkron (delayed). Pembelajaran berbasis Internet memungkinkan terjadinya pembelajaran secara sinkron dengan keunggulan utama bahwa pembelajar maupun fasilitator tidak harus berada di satu tempat yang sama. Pemanfaatan teknologi video conference yang dijalankan dengan menggunakan teknologi Internet memungkinkan pembelajar berada di mana saja sepanjang terhubung ke jaringan komputer.
Selain aplikasi unggulan seperti itu, beberapa peluang lain yang lebih sederhana dan lebih murah juga dapat dikembangkan sejalan dengan kemajuan TIK saat ini.
Buku elektronik[sunting | sunting sumber]
Buku elektronik atau e-book adalah salah satu teknologi yang memanfaatkan komputer untuk menayangkan informasi multimedia dalam bentuk yang ringkas dan dinamis. Dalam sebuah e-book dapat diintegrasikan tayangan suara, grafik, gambar, animasi, maupun movie sehingga informasi yang disajikan lebih kaya dibandingkan dengan buku konvensional.
Jenis e-book paling sederhana adalah yang sekedar memindahkan buku konvensional menjadi bentuk elektronik yang ditayangkan oleh komputer. Dengan teknologi ini, ratusan buku dapat disimpan dalam satu keping CD atau compact disk (kapasitas sekitar 700MB), DVD atau digital versatile disk (kapasitas 4,7 sampai 8,5 GB) maupun flashdisk (saat ini kapasitas yang tersedia sampai 32 GB). Bentuk yang lebih kompleks dan memerlukan rancangan yang lebih cermat misalnya pada Microsoft Encarta dan Encyclopedia Britannica yang merupakan ensiklopedi dalam format multimedia. Format multimedia memungkinkan e-book menyediakan tidak saja informasi tertulis tetapi juga suara, gambar, movie dan unsur multimedia lainnya. Penjelasan tentang satu jenis musik misalnya, dapat disertai dengan cuplikan suara jenis musik tersebut sehingga pengguna dapat dengan jelas memahami apa yang dimaksud oleh penyaji.
E-learning
Beragam definisi dapat ditemukan untuk e-learning. Victoria L. Tinio, misalnya, menyatakan bahwa e-learning meliputi pembelajaran pada semua tingkatan, formal maupun nonformal, yang menggunakan jaringan komputer (intranet maupun ekstranet) untuk pengantaran bahan ajar, interaksi, dan/atau fasilitasi. Untuk pembelajaran yang sebagian prosesnya berlangsung dengan bantuan jaringan internet sering disebut sebagai online learning.
Definisi yang lebih luas dikemukakan pada working paper SEAMOLEC, yakni e-learning adalah pembelajaran melalui jasa elektronik. Meski beragam definisi namun pada dasarnya disetujui bahwa e-learning adalah pembelajaran dengan memanfaatkan teknologi elektronik sebagai sarana penyajian dan distribusi informasi. Dalam definisi tersebut tercakup siaran radio maupun televisi pendidikan sebagai salah satu bentuk e-learning. Meskipun radio dan televisi pendidikan adalah salah satu bentuk e-learning, pada umumnya disepakati bahwa e-learning mencapai bentuk puncaknya setelah bersinergi dengan teknologi internet.
Internet-based learning atau web-based learning dalam bentuk paling sederhana adalah website yang dimanfaatkan untuk menyajikan materi-materi pembelajaran. Cara ini memungkinkan pembelajar mengakses sumber belajar yang disediakan oleh narasumber atau fasilitator kapanpun dikehendaki. Bila diperlukan dapat pula disediakan mailing list khusus untuk situs pembelajaran tersebut yang berfungsi sebagai forum diskusi.
Fasilitas e-learning yang lengkap disediakan oleh perangkat lunak khusus yang disebut perangkat lunak pengelola pembelajaran atau LMS (learning management system). LMS mutakhir berjalan berbasis teknologi internet sehingga dapat diakses dari manapun selama tersedia akses ke internet. Fasilitas yang disediakan meliputi pengelolaan siswa atau peserta didik, pengelolaan materi pembelajaran, pengelolaan proses pembelajaran termasuk pengelolaan evaluasi pembelajaran serta pengelolaan komunikasi antara pembelajar dengan fasilitator-fasilitatornya. Fasilitas ini memungkinkan kegiatan belajar dikelola tanpa adanya tatap muka langsung di antara pihak-pihak yang terlibat (administrator, fasilitator, peserta didik atau pembelajar). ‘Kehadiran’ pihak-pihak yang terlibat diwakili oleh e-mail, kanal chatting, atau melalui video conference.

Haryanto, Edy. (2008). Teknologi Informasi dan Komunikasi: Konsep dan Perkembangannya. Pemanfaatan Teknologi Informasi dan Komunikasi Sebagai Media Pembelajaran
Bidang utama teknologi

Bidang

Bangunan dan Konstruksi
Teknik Perencanaan Wilayah dan Kota Teknik akustik Teknik arsitektur Teknik keselamatan Teknik konstruksi Teknik perawatan bangunan Teknik perlindungan kebakaran Teknik sipil Teknik sanitasi Teknik struktur Teknologi rumah tangga.

Biomedis
Bioinformatika Biomekatronika Bioteknologi Farmakologi Ilmu kedokteran nano Ilmu kesehatan Ilmu syaraf Informatika kimia Riset medis Teknik biologis Teknik biomedis Teknik genetika Teknik jaringan Teknologi medis Teknologi reproduksi Teknologi syaraf.

Energi
Energi terbarukan Penyimpanan energi Teknik nuklir Teknik perminyakan Teknologi nuklir.

Industri
Bioteknologi industri Gas industri Manajemen teknik Manufaktur Metalurgi Penelitian dan pengembangan Sistem manufaktur fleksibel Teknik bioproses Teknik biosistem Teknik finansial Teknik industri Teknik kewirausahaan Teknik manufaktur Teknik otomasi Teknik pertambangan Teknik proses.

Informasi dan Komunikasi
Ilmu komputer Kecerdasan buatan Teknik frekuensi radio Teknik komputer Teknik komputer dan jaringan Teknik ontologi Teknik penyiaran Teknik perangkat lunak Teknik telekomunikasi Teknik website Teknologi informasi Teknologi komputasi Teknologi komunikasi Teknologi musik Teknologi visual Grafis.

Lingkungan
Bangunan hijau Desain berkelanjutan Desain ekologis Energi terbarukan Ilmu lingkungan Teknik lingkungan Teknik lanskap Teknologi batu bara bersih Teknologi bersih Teknologi nano hijau.

Militer
Komunikasi militer Peperangan elektronik Teknik militer Teknologi siluman Zeni.

Pendidikan
Perangkat lunak pendidikan Teknologi digital dalam pendidikan TIK dalam pendidikan Dampak teknologi dalam sistem pendidikan Pembelajaran multimedia Kampus virtual Pendidikan virtual.

Pertanian
Budi daya perairan Ilmu perikanan Kimia pangan Lingkungan dan bangunan pertanian Mikrobiologi pangan Nutrisi Teknik pangan Teknik pertanian Teknologi pangan Teknologi pembekuan makanan.

Transportasi
Teknik kedirgantaraan Teknik lalu lintas Teknik otomotif Teknik perkapalan Teknik transportasi Teknologi luar angkasa.

Ilmu terapan lainnya
Elektronika Elektro-optika Fabrikasi mikro Geologi teknik Hidrolika Keteknikan nano Kriogenik Teknik fisika Teknik material Teknologi mikro.

Bidang ilmu teknik lainnya
Elektronika dan instrumentasi Mekatronika Rekayasa geoteknik Robotika Teknik audio Pengenalan suara  Teknik biokimia Teknik biosistem Teknik elektronika Teknik hidrolika Teknik kelautan Teknik keramik Teknik kimia Teknik kontrol Teknik listrik Pengolahan isyarat  Teknik pertambangan Teknik polimer Teknik mesin Teknik optika Teknik protein Teknik sistem Teknologi hiburan Teknologi kuantum.

Komponen
Infrastruktur Reka cipta Pengetahuan Mesin Kemampuan Peralatan Gadget.

Skala
Femtoteknologi Pikoteknologi Nanoteknologi Microteknologi Keteknikan makro Keteknikan skala mega.

Sejarah
Teknologi prasejarah Revolusi neolitik Teknologi kuno Teknologi abad pertengahan Teknologi abad renaisans Revolusi Industri Revolusi Industri kedua Jaman jet Revolusi Digital Jaman informasi.

Teori dan konsep
Determinisme teknologi Efemeralisasi Etika teknologi Evolusi teknologi Filosofi teknologi Kebangkitan teknologi Kritik teknologi Konsep komunikasi digital Konvergensi teknologi Momentum teknologi Nasionalisme teknologi Peningkatan teknologi Perubahan teknologi Rasionalitas teknologi Siklus hidup teknologi Siklus kematangan teknologi Singularitas teknologi Sistem inovasi teknologi Strategi teknologi Tekno-progresivisme Teknoetika Teknokapitalisme Teknokrasi Teknokritisisme Teknologi tepat guna Teknologi tinggi Teknomansi Teknorealisme Teknosentrisme Teori difusi inovasi Transhumanisme Utopianisme teknologi.

Lainnya
Daftar teknologi Demonstrasi teknologi Integrasi teknologi Jurnalisme teknologi Manajemen teknologi Pendidikan teknologi Pengarahan teknologi Pengaturan teknologi Penilaian teknologi Perusahaan teknologi Sains dan teknologi berdasarkan negara Sains dan Teknologi di Indonesia Skala Kardashev Strategi teknologi Teknologi fiksi Teknologi dan masyarakat Technology shock Transfer teknologi.
( sumber : wikipedia )

Cukup sekian bahasan saya kali ini, semoga bermanfaat, waktunya lanjutin ngopi bro
terima kasih
Wassalamu'alaikum Wr.Wb

Jumat, 18 April 2014



HITUNG NILAI MAHASISWA SEDERHANA VB.NET 2008


Assalamu'alaikum Wr.Wb

sebelum kopi ini kusrupurt sebelum rokok ini kunyalakan dan ku hisap, terlebih dulu saya membuka buku kecil saya yang berisi rangkaian tugas-tugas dari setiap MK yang  sedang saya tempuh sekarang, ternyata oh ternyata banyak banget dan menurut saya teramat sulit. bagaimana tidak ! bukan hanya sekedar sulit secara materi namun secara praktek saya mengalamai beberapa kendala, karena saya sangat asing dengan yang namanya bahasa pemograman VB.NET 2008. Tapi setelah berjibaku dengan sang guru pencari  ( Google ) akhirnya saya dapat pencerahan untuk menyelesaikan beberapa tugas yang diberikan sang dosen. di sini saya bukan mau pamer atau so pintar tapi hanya sekedar ingin berbagi untuk teman-teman di dunia maya umumnya dan teman-teman seperjuangan khususnya.

oke langsung saja ke pokok permasalahan

TUGAS 1 : HITUNG NILAI MAHASISWA

1. Buatlah Design seperti gambar di bawah ini ( Ini Versi Saya )















Nah setelah kalian selesai membuat design seperti diatas coba input codingnya :

Public Class Form1
    Dim s As String = " Tugas WANDI IRAWAN - HITUNG NILAI AKHIR MAHASISWA "

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Text = Microsoft.VisualBasic.Left(s, 60)
        s = Microsoft.VisualBasic.Right(s, Len(s) - 1) & Microsoft.VisualBasic.Left(s, 1)

    End Sub
( Coding diatas hanya untuk text berjalan di Form, jika mau pakai saja, jika tidak yah jangan :) )

    Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.Click
        Dim f = MsgBox("Apakah anda yakin ingin keluar?", vbYesNo, "KONFIRMASI")
        If f = vbYes Then
            MsgBox("Terimakasih telah menggunakan program ini.", MsgBoxStyle.DefaultButton1, "KONFIRMASI")
            Me.Close()
        ElseIf f = vbNo Then
            Exit Sub
        End If
    End Sub

    Private Sub BtnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClear.Click
        ComboBox1.Text = "---------Silahkan Pilih-------"
        TxtNama.Text = ""
        TxtAbsen.Text = ""
        TxtTugas.Text = ""
        TxtUts.Text = ""
        TxtUas.Text = ""
        Nakhir.Text = "--"
        Npredikat.Text = "--"
        ComboBox1.Focus()
    End Sub

    Private Sub BtnHitung_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHitung.Click
        Nakhir.Text = Val(TxtAbsen.Text * 0.1) + Val(TxtTugas.Text * 0.2) + Val(TxtUts.Text * 0.3) + Val(TxtUas.Text * 0.4)

        If Nakhir.Text >= 80 Then
            Npredikat.Text = "A"
        ElseIf Nakhir.Text >= 70 And Nakhir.Text < 80 Then
            Npredikat.Text = "B"
        ElseIf Nakhir.Text >= 60 And Nakhir.Text < 70 Then
            Npredikat.Text = "C"
        ElseIf Nakhir.Text >= 45 And Nakhir.Text < 60 Then
            Npredikat.Text = "D"
        ElseIf Nakhir.Text < 45 Then
            Npredikat.Text = "E"
        End If
    End Sub


    Private Sub nim_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        If ComboBox1.Text = "09360003" Then
            TxtNama.Text = "Wandi Irawan"
        ElseIf ComboBox1.Text = "09360012" Then
            TxtNama.Text = "Rodin Sonjaya"
        ElseIf ComboBox1.Text = "09360016" Then
            TxtNama.Text = "Nadia Fevaliana"
        ElseIf ComboBox1.Text = "09360020" Then
            TxtNama.Text = "Oktavia Eka Setiani"
        ElseIf ComboBox1.Text = "09360023" Then
            TxtNama.Text = "Ismu Widodo"
        ElseIf ComboBox1.Text = "09360026" Then
            TxtNama.Text = "Gunadi"
        ElseIf ComboBox1.Text = "09360027" Then
            TxtNama.Text = "Dedy Prayanto"
        ElseIf ComboBox1.Text = "09360028" Then
            TxtNama.Text = "Syahroni"
        ElseIf ComboBox1.Text = "09360029" Then
            TxtNama.Text = "Azis Ahmad Zaelani"
        ElseIf ComboBox1.Text = "09330033" Then
            TxtNama.Text = "Fahmi M Zuaeni"
        End If
    End Sub

End Class

ini merupakan hasil modifikasi saya, dan untuk sumbernya bisa kalian lihat di
http://fathimubarak.blogspot.com/2011/04/membuat-program-sederhana-dengan-vbnet.html


TUGAS 2 : HITUNG FAKTORIAL VB.NET 2008

Seperti biasa buatlah design sederhana seperti di bawah ini :



















Langsung masukin Codingnya


Public Class Form2
    Dim a, b As Integer
    Private Sub BtnHitung_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHitung.Click
        If TxtInputFaktorial.Text = String.Empty Then
            MsgBox("Anda Belum Memasukan Nilai", MsgBoxStyle.Exclamation, "Info")
            TxtInputFaktorial.Text = ""
            TxtInputFaktorial.Focus()
        Else
            a = TxtInputFaktorial.Text
            b = a
            While a <> 1
                a = a - 1
                b = b * a
            End While
            TxtHasil.Text = b
        End If


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TxtInputFaktorial.Text = ""
        TxtHasil.Text = ""
        TxtInputFaktorial.Focus()
    End Sub

    Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExit.Click
        Me.Close()
    End Sub


    End Class


TUGAS 3 : APLIKASI TIKET KERETA API

buatlah design sederhana seperti di bawah ini :






















Coding :

Nyusul yah hehehehe ( Pusing )


maaf saya tidak bisa jelaskan secara detail
Oke teman-teman sekian dului postingan kali ini , semoga bermanfaat

Salam Blogger


Rabu, 09 April 2014


TUGAS PAK HARJONO
Ini merupakan tugas UTS ( Ujian TIdak Serius ) pertama saya, setelah saya mencari ilham kesana kemari tentunya dengan bantuan si mesin pencari serba tahu yaitu google, akhirnya saya menemukan dasar-dasar coding perhitungan yang menurut saya cukup sulit, maklum kan namanya juga baru belajar alias pemula.
oke langsung saja pada ini masalahnya

Gambar Design Aplikasi Kasir Versi One

ada 4 tipe menu yang harus kita isi
1. menu makanan 1 ( jumlah dan harga )
2. menu makanan 2 ( jumlah dan harga )
3. menu minuman 1 ( jumlah dan harga ) 
4. menu minuman 2 ( jumlah dan harga )
terus kita hitung semuanya ( yaitu total harga dari menu makanan1.2 dan menu minuman 1,2 )
oke langsung simak aja pertanyaan dan jawabannya di bawah ini.

Pertanyaan :
No.1
1a.       Buat coding untuk mengisi menu makanan1
1b.       Buat coding untuk mengisi menu makanan2
1c.       Buat coding untuk mengisi menu makanan3
1d.       Buat coding untuk mengisi menu makanan4
Jawaban :
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ComboBox1.Items.Add("Menu Makanan1")
        ComboBox2.Items.Add("Menu Makanan2")
        ComboBox3.Items.Add("Menu Makanan3")
        ComboBox4.Items.Add("Menu Makanan4")
    End Sub


No.2
Buat coding tombol hitung ( ini buat menghitung secara keseluruhan dari setiap harga dan jumlah) jika tidak memakai label TOTAL HARGA  maka coding ( If TxtTotalBayar.Text = True Then
            lblTotal.Text = TxtTotalBayar.Text ) di hapus saja, karena ini adalah versi saya hehe
Jawaban :

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHitung.Click
        Dim hasil1, hasil2, hasil3, hasil4 As Integer
        hasil1 = Val(TxtJumlah1.Text) * (TxtHarga1.Text)
        hasil2 = Val(TxtJumlah2.Text) * (TxtHarga2.Text)
        hasil3 = Val(TxtJumlah3.Text) * (TxtHarga3.Text)
        hasil4 = Val(TxtJumlah4.Text) * (TxtHarga4.Text)
        TxtTotalBayar.Text = hasil1 + hasil2 + hasil3 + hasil4
        If TxtTotalBayar.Text = True Then
            lblTotal.Text = TxtTotalBayar.Text
        End If
    End Sub

No.3
Buat coding tombol Bersihkan
Jawaban :

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ComboBox1.Text = ""
        ComboBox2.Text = ""
        ComboBox3.Text = ""
        ComboBox4.Text = ""
        TxtJumlah1.Text = ""
        TxtJumlah2.Text = ""
        TxtJumlah3.Text = ""
        TxtJumlah4.Text = ""
        TxtHarga1.Text = ""
        TxtHarga2.Text = ""
        TxtHarga3.Text = ""
        TxtHarga4.Text = ""
        TxtTotalBayar.Text = ""
        TxtBayar.Text = ""
        TxtKembalian.Text = ""
    End Sub


No.4
Buat coding tombol Keluar
Jawaban :

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
        Me.Close()

    End Sub

End Class


mohon maaf jika ada kesalahan.
terima kasih sudah berkunjung ke blog sederhana ini.

 

Rabu, 19 Maret 2014

Salam bloger.
Pagi ini begitu cerah sekali, matahari tak malu lagi bersembunyi dibalik awan yang selalu menutupi dia dikala pagi,mungkin musim hujan akan segera berganti musim panas dan banjir di negara kita akan segera pergi. Nikmat sekali rasanya pagi ini ditemani secangkir kopi dan sebatang rokok serta kicauan burung milik tetanggaku yang begitu merdu berirama seakan membantu menghilangkan rasa penat dan kegalauan dihatiku.. haha kok malah curhat, heehehe
Oke deh teman-teman itu hanya sekedar pembuka untuk postingan saya yang pertama kali di blog baru ini, kali ini saya akan membahas tentang “Perancangan dan Implementasi Data Base”, sebelum saya melanjutkan bahasan kita kali ini terlebih dahulu saya minta maaf jika dalam postingan ini ada kekurangan dan untuk para master yang lebih tahu mohon untuk memberikan saran dan kritiknya untuk postingan saya ini.

“PERANCANGAN DAN IMPLEMENTASI DATA BASE”
KONSEP DASAR

Apa itu Data Base (DB) ?
Dari segi bahasa Data Base artinya : Pangkalan data atau basis data (bahasa Inggris: database), atau sering pula dieja basisdata yang artinya adalah kumpulan informasi yang disimpan di dalam komputer secara sistematik sehingga dapat diperiksa menggunakan suatu program komputer untuk memperoleh informasi dari basis data tersebut. Perangkat lunak yang digunakan untuk mengelola dan memanggil kueri (query) basis data disebut sistem manajemen basis data (database management system, DBMS). Sistem basis data dipelajari dalam ilmu informasi.
Istilah "basis data" berawal dari ilmu komputer. Meskipun kemudian artinya semakin luas, memasukkan hal-hal di luar bidang elektronika, artikel ini mengenai basis data komputer. Catatan yang mirip dengan basis data sebenarnya sudah ada sebelum revolusi industri yaitu dalam bentuk buku besar, kuitansi dan kumpulan data yang berhubungan dengan bisnis.
Konsep dasar dari basis data adalah kumpulan dari catatan-catatan, atau potongan dari pengetahuan. Sebuah basis data memiliki penjelasan terstruktur dari jenis fakta yang tersimpan di dalamnya: penjelasan ini disebut skema. Skema menggambarkan obyek yang diwakili suatu basis data, dan hubungan di antara obyek tersebut. Ada banyak cara untuk mengorganisasi skema, atau memodelkan struktur basis data: ini dikenal sebagai model basis data atau model data. Model yang umum digunakan sekarang adalah model relasional, yang menurut istilah layman mewakili semua informasi dalam bentuk tabel-tabel yang saling berhubungan dimana setiap tabel terdiri dari baris dan kolom (definisi yang sebenarnya menggunakan terminologi matematika). Dalam model ini, hubungan antar tabel diwakili denga menggunakan nilai yang sama antar tabel. Model yang lain seperti model hierarkis dan model jaringan menggunakan cara yang lebih eksplisit untuk mewakili hubungan antar tabel.
Istilah basis data mengacu pada koleksi dari data-data yang saling berhubungan, dan perangkat lunaknya seharusnya mengacu sebagai sistem manajemen basis data (database management system/DBMS). Jika konteksnya sudah jelas, banyak administrator dan programer menggunakan istilah basis data untuk kedua arti tersebut. ( sumber Wikipedia Indonesia )





1. KOMPONEN BASIS DATA
komponen didalam basis data ada 4 yang mendominasi, :
a. Data

Ciri-ciri data didalam database :
· Data disimpan secara terintegrasi (integrated) : Database merupakan kumpulan dari berbagai macam file dari aplikasi-aplikasi yang berbeda, yang disusun dengan cara menghilangkan bagian-bagian yang rangkap (redundant)
· Data dapat dipakai secara bersama-sama (shared) : Masing-masing bagian dari database dapat diakses oleh pemakai dalam waktu yang bersamaan, untuk aplikasi yang berbeda.

b. Hardware ( Perangkat Keras )
Terdiri dari semua perangkat keras koputer sebagai pengolahan database tersebut :
· Peralatan untuk menyimpan data base , yaitu second storage (Harddisk, CD, disket, flashdisk dll)
· Peralatan out put & Input Device.
· Peralatan Komunikasi data

c. Software ( Perangkat Lunak )
Berfungsi sebagai perantara (interface) antara pemakai dengan data physik pada database. Softwar
pada sistem database dapat berupa:
· DBMS ( Database Management System ) ,Menangani akses dalam database , sehingga proses tidak terlalu memikirkan penyimpanan dan pengolahan yang terlalu detail.
· Program - program aplikasi dan prosedur - prosedur.

d. User
Terbagi menjadi 4 klasifikasi :
a. Sistem Engineer
Yaitu tenaga ahli yang bertanggung jawab atas pemasangan sistem basis data dan
juga mengadakan peningkatan dan melaporkan kesalahan dari sistem tersebut
kepada pihak penjual.
b. Database Administrator (DBA), orang/tim yang bertugas mengelola system
database secara keseluruhan.
database secara keseluruhan.
c. Programmer, orang/tim membuat program aplikasi yang mengakses database dengan
menggunakan bahasa pemprograman
menggunakan bahasa pemprograman
d. End user, orang yang mengakases database melalui terminal dengan menggunakan
query language atau program aplikasi yang dibuat oleh programmer.

2. TUJUAN PENGGUNAAN BASIS DATA

1. Mencegah data redudancy dan inconsistency
2. Mempermudah melakukan akses terhadap data
3. Data isolasi
4. Cegah concurrent access anomaly
5. Masalah keamanan data
6. Masalah integritas. 

3. KELEBIHAN DAN KEKURANGAN
a. Kelebihan data base :
1. Terkontrolnya kerangkapan data dan inkonsistensi
2. Terpeliharanya keselarasan data
3. Data dapat dipakai secara bersama-sama
4. Memudahkan penerapan standarisasi
5. Memudahkan penerapan batasan-batasan pengamanan.
6. Terpeliharanya intergritas data
7. Terpeliharanya keseimbangan atas perbedaan kebutuhan data dari setiap aplikasi
8. Program / data independent
b. Kekurangan
1. Mahal dalam implementasinya
2. Rumit/komplek
3. Penanganan proses recovery & backup sulit
4. Kerusakan pada sistem basis data dapat mempengaruhi departemen yang terkait
1. Terkontrolnya kerangkapan data dan inkonsistensi
2. Terpeliharanya keselarasan data
3. Data dapat dipakai secara bersama-sama
4. Memudahkan penerapan standarisasi
5. Memudahkan penerapan batasan-batasan pengamanan.
6. Terpeliharanya intergritas data
7. Terpeliharanya keseimbangan atas perbedaan kebutuhan data dari setiap aplikasi
8. Program / data independent
b. Kekurangan
1. Mahal dalam implementasinya
2. Rumit/komplek
3. Penanganan proses recovery & backup sulit
4. Kerusakan pada sistem basis data dapat mempengaruhi departemen yang terkait
Sumber data :
http://cuplis.net/2009/03/28/konsep-dasar-basis-data/Buku Catatan

Popular Posts