Kamis, 07 November 2013

CARA MENGEMBALIKAN FILE YANG DISEMBUNYIKAN VIRUS

Virus komputer semakin hari semakin banyak jenis dan variannya. Beberapa jenis virus komputer ada yang dibuat dengan tujuan untuk mencuri data atau file pemilik komputer, sekedar merusak sistem dan ada juga yang hanya sekedar iseng yang membuat pemilik komputer jengkel.
Beberapa hal yang biasa terjadi setelah kita berhasil membersihkan virus komputer adalah masih adanya sistem registry yang tidak atau belum bisa kembali secara normal yang salah satunya adalah berakibat adanya file atau folder yang disembunyikan atau di-hidden oleh virus.
Beberapa antivirus seperti SmadAV begitu kita selesai melakukkan scanning virus maka akan ada pilihan untuk mengembalikan atau menampilkan file atau folder yang telah disembunyikan oleh virus (misalnya virus shortcut). Namun bila ternyata tetap ada file atau folder yang masih tersembunyi, anda bisa coba mengembalikan sendiri dengan cara manual melalui Command Prompt atau CMD. Berikut ini caranya:

HUBUNGAN STATISTIK DENGAN TEKNIK INFORMATIKA

HUBUNGAN ILMU STATISTIKA DENGAN TEKNIK INFORMATIKA

Statistika adalah ilmu yang mempelajari bagaimana merencanakan, mengumpulkan, menganalisis, menginterpretasi, dan mempresentasikan data. Singkatnya, statistika adalah ilmu yang berkenaan dengan data.
Istilah ‘statistika’ (bahasa Inggris: statistics) berbeda dengan ‘statistik’ (statistic). Statistika merupakan ilmu yang berkenaan dengan data, sedang statistik adalah data, informasi, atau hasil penerapan algoritma statistika pada suatu data.
Statistika banyak diterapkan dalam berbagai disiplin ilmu, baik ilmu-ilmu alam (misalnya astronomi dan biologi maupun ilmu-ilmu sosial (termasuk sosiologi dan psikologi), maupun di bidang bisnis, ekonomi, dan industri). Statistika juga digunakan dalam pemerintahan untuk berbagai macam tujuan; sensus penduduk merupakan salah satu prosedur yang paling dikenal. Aplikasi statistika lainnya yang sekarang popular adalah prosedur jajak pendapat atau polling (misalnya dilakukan sebelum pemilihan umum), serta jajak cepat (perhitungan cepat hasil pemilu) atau quick count. Di bidang komputasi, statistika dapat pula diterapkan dalam pengenalan pola maupun kecerdasan buatan.

ORGANISASI KOMPUTER

Pengertian Organisasi Komputer Dan Arsitektur Komputer


Pengertian Organisasi Komputer adalah bagian yang terkait erat dengan unit-unit operasional dan interkoneksi antar komponen penyusun sistem komputer dalam merealisasikan aspek arsitekturnya. Contoh aspek operasionalnya adalah teknologi hardware, perangkat antar muka atau interface, teknologi memori, sistem memori, dan sinyal-sinyal kontrol.


Pengertian Arsitektur Komputer adalah lebih cendrung dikategorikan pada kajian atribut-atribut sistem komputer yang terkait dengan seorang programmer. Contoh : set instruksi, aritmatika yang digunakan teknik pengalamatan, mekanisme I/O.

Bagian Utama Pada Sistem Komputer

Jumat, 01 November 2013

Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net

Tugas Belajar Bahasa Pemograman

1. Desainlah Formnya seperti gambar di bawah ini :


2. ketiklah listing berikut ini :

Public Class Form_Nilai

    Private Sub Form_Nilai_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        KodeDosen.Items.Add("001312")
        KodeDosen.Items.Add("001654")
        KodeMataKuliah.Items.Add("001")
        KodeMataKuliah.Items.Add("002")
        NPM.Items.Add("12110639")
        NPM.Items.Add("12116780")
        NPM.Items.Add("12113412")
        Dim i As Integer
        For i = 1 To 100
            NilaiKehadiran.Items.Add(i)
        Next i
        i = 100
        For i = 1 To 100
            NilaiTugas.Items.Add(i)
        Next i
        i = 100
        For i = 1 To 100
            NilaiUTS.Items.Add(i)
        Next i
        For i = 1 To 100
            NilaiUAS.Items.Add(i)
        Next i
    End Sub

    Private Sub BtnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapus.Click
        NPM.Text = ""
        Nama.Text = " "
        Jenjang.Text = ""
        Jurusan.Text = ""
        NamaDosen.Text = ""
        MataKuliah.Text = " "
        KodeMataKuliah.Text = ""
        KodeDosen.Text = ""
        Keterangan.Text = ""
        NilaiKehadiran.Text = " "
        NilaiTugas.Text = " "
        NilaiUTS.Text = " "
        NilaiAkhir.Text = " "
        NilaiUAS.Text = " "
        NilaiHuruf.Text = ""
    End Sub

    Private Sub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click
        End
    End Sub

    Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click
        NilaiAkhir.Text = 0.1 * NilaiKehadiran.Text + 0.15 * NilaiTugas.Text + 0.3 * NilaiUTS.Text + 0.45 * NilaiUAS.Text
        If NilaiAkhir.Text >= 50 Then
            Keterangan.Text = "Anda Lulus"
        Else
            Keterangan.Text = "Anda Gagal"
        End If
        If NilaiAkhir.Text >= 80 Then
            NilaiHuruf.Text = "A"
        ElseIf NilaiAkhir.Text >= 70 Then
            NilaiHuruf.Text = "B"
        ElseIf NilaiAkhir.Text >= 60 Then
            NilaiHuruf.Text = "C"
        ElseIf NilaiAkhir.Text >= 50 Then
            NilaiHuruf.Text = "D"
        Else
            NilaiHuruf.Text = "E"
        End If
    End Sub

    Private Sub KodeDosen_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KodeDosen.SelectedIndexChanged
        Dim z As String
        z = KodeDosen.Text
        If z = "001312" Then
            NamaDosen.Text = "Mesran S.Kom,M.Kom"
        ElseIf z = "001654" Then
            NamaDosen.Text = "Sinar Sinurat, ST, M.Kom"
        End If
    End Sub

    Private Sub KodeMataKuliah_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KodeMataKuliah.SelectedIndexChanged
        Dim p As String
        p = KodeMataKuliah.Text
        If p = "001" Then
            MataKuliah.Text = "Pemograman Visual Basic"
        ElseIf p = "002" Then
            MataKuliah.Text = "Matematika Diskrit"
        End If
    End Sub

    Private Sub NPM_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NPM.SelectedIndexChanged
        Dim a As String
        a = NPM.Text
        If NPM.Text = "12110639" Then
            Nama.Text = "Sondang R. Sitohang"
        ElseIf NPM.Text = "12116780" Then
            Nama.Text = "Yanti"
        ElseIf NPM.Text = "12113412" Then
            Nama.Text = "Murni"
        End If
    End Sub
End Class

3. Tekan F5, dan hasilnya seperti gambar dibawah ini :


Sekian postingan tugas saya ini....