Microsoft mengumumkan fitur yang akan hadir di Windows 8.1

Windows 8.1 membawa kembali tombol Start dan beberapa fitur lainnya.

Microsoft mengumumkan secara resmi fitur Windows 8.1 yang rencananya akan hadir  dimana salah satunya adalah kehadiran kembali Start Button yang sebelumnya memang sudah diperkirakan akan hadir.

Berikut adalah beberapa fitur lain yang hadir di Windows 8.1:

Boot to Desktop: User akan dapat memilih apakah Windows akan langsung ke mode desktop atau ke Metro UI.

Start Button: Microsoft menambahkan tombol Start menu kembali, tapi sayangnya ffungsi Start menu hanya berguna menampilkan Start Screen dan bukan berfungsi seperti yang ada di Windows XP & 7 yang menampilkan pilihan menu. Di sisi ini tampaknya Microsoft tetap kekeuh dan tidak mengindahkan atau memang tidak mengerti apa yang diinginkan para konsumen.

Search: Fitur pencarian yang ditenagai oleh Bing yang akan menampilkan halaman web, applikasi, file, dan isi dari akun SkyDrive berdasarkan queri yang diketikkan.

Roaming settings: Personalisasi Windows (tema, applikasi dan setting) berdasarkan akun Outlook.com yg memudahkan user bila mengganti ke device / pc lain.

Multitasking: Fitur yang menampilkan banyak applikasi secara bersamaan dan dikustomasi bagi user yang menggunakan multi monitor.

Internet Explorer 11: Peningkatan dari IE10 yang didesain hanya untuk input touchscreen, diklaim lebih cepat dan memiliki beberapa fitur baru seperti sinkronisasi tab dengan device Windows 8.1 lain.

Desain Bentuk Komputer Terbaru 2013

Desain Bentuk Komputer Terbaru 2013

, mungkin sempat terlintas difikiran kita mengenai bagaiman desain komputer yang akan datang, banyak perusahaan2 komputer besar di dunia yang selalu merancang dan mendesain komputer/pc/laptop serta membuat inivasi-inovasi terbaru, dengan persaingan yang sangat ketat perusahaan siap meluncurkan produk terbaru dan unggulanya di pasaran, berikut Desain Bentuk Komputer Terbaru 2013 :

1. Laptop Fleksibel
Inilah tahun bagi laptop fleksibel. Kemampuan laptop yang bisa dilipat, ditekuk, diputar, ini melebihi yang sudah ada di tahun 2012. Salah satu produk laptop fleksibel yang sudah dirilis adalah laptopLenovo Yoga. Laptop ini sebelumnya dipamerkan di ajang CES 2012, dan muncul di pasaran pada kuartal ke-3.
2. All-in-one desktop
All-in-one PC dengan layar single tanpa box CPU terpisah diprediksi akan menjadi pusat perhatian di tahun 2013. Model komputer ini sebelumnya pernah terlihat melalui Apple iMac dan telah ditiru sejumlah produsen komputer lain. Dengan bawaan platform Windows 8 OS, perangkat ini menginspirasi bermunculannya PC all-in-one dekstop plus fitur tambahan layar sentuh.
Sementara, ada yang sedikit beda saat melihat Sony Vaio Tap 20 yang telah diluncurkan di tahun 2012. Produk all-in-one desktop ini malah terlihat seperti sebuah supertablet dengan layar sentuh berukuran 20 inci.
3. Prosesor Intel di perangkat mobile
Selama ini, Intel telah mengotaki sejumlah komputer desktop. Di tahun 2012 ini, Intel pun mulai melebarkan sayap dengan mensponsori sejumlah Android smartphone melalui debut mobile chip miliknya. Intel diperkirakan akan terus mengembangkan Ivy Bridge CPU, andalannya dengan kemampuan efisiensi listrik. Bisa jadi, di ajang CES2013, Intel memberikan kejutan dengan memaerkan Ivy Bridge dengan daya 10 Watt.
4. Kejutan AMD
AMD tak dipungkiri masih terus menmbayangi kesuksesan Intel. Namun, sayangnya produsen CPU/GPU ini masih kesulitan menghadirkan produk-produk yang lebih murah, Prosesor terbaru AMD yang telah dirilis di pasaran ini tidak begitu menarik minat publik baik dari sisi harga maupun perfomanya.
Di tahun 2013, harapannya AMD mampu membuat kejutan yang lebih baik untuk industri komputer dunia.

GARA GARA SINYA

Cowok:
aduh Bebz, nanti aja
telponnya, disini sinyal aku PUTUS
PUTUS,,,! Cewek: APPAAA!!! ? tega kamu ya,,, aku nelpon kamu dari paris ke indonesia kamu malah minta putus!!! ! SALAH AKU APA COBA!! Cowok: tuh kan, kamu salah dengar,,, DISINI sinyalnya JELEK!!! Cewek: hikz-hikz-hikz ... tega kamu, kamu putusin aku karena, kamu bilang salah aku karena aku jelek??? Cowok: Disini Aku nggak dapat sinyal! soalnya Operator aku Ax * s lagi gangguan, aku sayang kamu bebz! Cewek: apaa!! kamu bilang? kamu dpat gebetan baru, yang namanya ANIS? dan kamu lebih sayang dia? tega kamu! tega! Cowok: ya alloh, Mati gue, Bukan sayang, Aku minta kamu telpon aku sebentar lagi, Aku naik ke menara dulu, ya,? Cewek: apa?oke, aku akan naik menara Eifel, dan aku akan lompat, dan kamu nggak akan ngeliat aku untuk selamanya! dasar BUAYA! HABIS MANIS SEMPAK DIBUANG!!! Cowok: * # ¥ §% $ € £ (ngunyah hp)

Tips menghilangkan Rasa Bosan dan Jenuh

Cara Menghilangkan Rasa Jenuh - Bosan . Sahabat kucoba  kita tau bagaimana tidak enaknya perasaan kala sedang di landa kebosanan, apa-apa yang kita lakukan selalu membawa kejenuhuan apalagi kalau lagi menyendiri pasti deh rasa jenuh dan BT buat kita selalu bad mud. Umunya rasa bosan atau jenuh sering melanda kaum perempuan, namun tidak terkecuali juga kaum pria. Nah bagi Anda yang sudah terlanjur bad mud,   kang salman akan berbagi tips cara menghilangkan kejenuhan. Berikut tips-tipsnya:

1. Lakukanlah kegiatan yang tidak biasa Anda lakukan, misalnya anda jarang mengobrol dengan orang tua, kenapa tidak Anda coba? bahan obrolan yang biasanya enak ya tentang sejarah kita saat masi didalam kandungan, mama ngidam apa aja, terus ayah kita ngapain aja dan sebagainya.
2. Jika kalian menyukai game, teka-teka kenapa tidak untuk memecahkah dan menyelesaikan game tersebut? Dan bagi perempuan biasanya suka membaca puisi, cerpen, novel kenapa gak kalau kalian mencoba mencari inspirasi dari kejadian yang efisien atau dari khayalan kalian untuk di jadikan sebuah puisi yang indah atau cerpen dan novel yang unik. Siapa tau karya-karya kita bisa menjadi sumber rezeki dan berubah menjadi uang layaknya Raditiya Dika
3. Berkunjung kerumah teman, merupakan cara paling efektif menghilangkan rasa bosan.
4. Main dan memberi makan binatang peliharaan, seperti kucing, anjing, burung, atau ikan merupakan cara yang efektif juga.
5. Terakhir tidur.

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

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

JAWABAN 1

NAMA:BUDIANTO

NPM:1111626

KELAS:SI 1106

JAWABAN 2

Public Class Form1

    Sub buatTabel()

        LV.Columns.Add("NIK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("NAMA PEGAWAI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GOL", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PAJAK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PINJAMAN", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI BERSIH", 150, HorizontalAlignment.Center)

        LV.View = View.Details

        LV.GridLines = True

        LV.FullRowSelect = True

    End Sub

    Sub IsiTabel()

        Dim Lst As New ListViewItem

        Lst.Text = NIK.Text

        Lst.SubItems.Add(NAMAPEGAWAI.Text)

        Lst.SubItems.Add(GOL.Text)

        Lst.SubItems.Add(GAJI.Text)

        Lst.SubItems.Add(PAJAK.Text)

        Lst.SubItems.Add(PINJAMAN.Text)

        Lst.SubItems.Add(GAJIBERSIH.Text)

        LV.Items.Add(Lst)

    End Sub

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

        buatTabel()

        NIK.Items.Add("001")

        NIK.Items.Add("002")

        NIK.Items.Add("003")

        GOL.Items.Add("IIIA")

        GOL.Items.Add("IIIB")

        GOL.Items.Add("IIIC")

    End Sub

    Private Sub GOL_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GOL.SelectedIndexChanged

        Select GOL.Text

            Case "IIIA" : GAJI.Text = 1500000

            Case "IIIB" : GAJI.Text = 2500000

            Case "IIIC" : GAJI.Text = 3500000

        End Select

        PAJAK.Text = 0.15 * GAJI.Text

    End Sub

    Private Sub NIK_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged

        Select NIK.Text

            Case "001" : NAMAPEGAWAI.Text = "ANDI LUBIS"

            Case "002" : NAMAPEGAWAI.Text = "CANDRA"

            Case "003" : NAMAPEGAWAI.Text = "HARYADI"

        End Select

    End Sub

    Private Sub BTNPROSES_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNPROSES.Click

        GAJIBERSIH.Text = Val(GAJI.Text) - Val(PINJAMAN.Text) - Val(PAJAK.Text)

    End Sub

    Private Sub BTNSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNSIMPAN.Click

        IsiTabel()

        NIK.Text = ""

        NAMAPEGAWAI.Text = ""

        GOL.Text = ""

        GAJI.Text = ""

        PAJAK.Text = ""

        PINJAMAN.Text = ""

        GAJIBERSIH.Text = ""

    End Sub

    Private Sub BTNHAPUS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNHAPUS.Click

        LV.Items.Clear()

    End Sub

End Class

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

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

JAWABAN 1

NAMA:BUDIANTO

NPM:1111626

KELAS:SI 1106

JAWABAN 2

Public Class Form1

    Sub buatTabel()

        LV.Columns.Add("NIK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("NAMA PEGAWAI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GOL", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PAJAK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PINJAMAN", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI BERSIH", 150, HorizontalAlignment.Center)

        LV.View = View.Details

        LV.GridLines = True

        LV.FullRowSelect = True

    End Sub

    Sub IsiTabel()

        Dim Lst As New ListViewItem

        Lst.Text = NIK.Text

        Lst.SubItems.Add(NAMAPEGAWAI.Text)

        Lst.SubItems.Add(GOL.Text)

        Lst.SubItems.Add(GAJI.Text)

        Lst.SubItems.Add(PAJAK.Text)

        Lst.SubItems.Add(PINJAMAN.Text)

        Lst.SubItems.Add(GAJIBERSIH.Text)

        LV.Items.Add(Lst)

    End Sub

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

        buatTabel()

        NIK.Items.Add("001")

        NIK.Items.Add("002")

        NIK.Items.Add("003")

        GOL.Items.Add("IIIA")

        GOL.Items.Add("IIIB")

        GOL.Items.Add("IIIC")

    End Sub

    Private Sub GOL_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GOL.SelectedIndexChanged

        Select GOL.Text

            Case "IIIA" : GAJI.Text = 1500000

            Case "IIIB" : GAJI.Text = 2500000

            Case "IIIC" : GAJI.Text = 3500000

        End Select

        PAJAK.Text = 0.15 * GAJI.Text

    End Sub

    Private Sub NIK_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged

        Select NIK.Text

            Case "001" : NAMAPEGAWAI.Text = "ANDI LUBIS"

            Case "002" : NAMAPEGAWAI.Text = "CANDRA"

            Case "003" : NAMAPEGAWAI.Text = "HARYADI"

        End Select

    End Sub

    Private Sub BTNPROSES_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNPROSES.Click

        GAJIBERSIH.Text = Val(GAJI.Text) - Val(PINJAMAN.Text) - Val(PAJAK.Text)

    End Sub

    Private Sub BTNSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNSIMPAN.Click

        IsiTabel()

        NIK.Text = ""

        NAMAPEGAWAI.Text = ""

        GOL.Text = ""

        GAJI.Text = ""

        PAJAK.Text = ""

        PINJAMAN.Text = ""

        GAJIBERSIH.Text = ""

    End Sub

    Private Sub BTNHAPUS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNHAPUS.Click

        LV.Items.Clear()

    End Sub

End Class

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

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

JAWABAN 1

NAMA:BUDIANTO

NPM:1111626

KELAS:SI 1106

JAWABAN 2

Public Class Form1

    Sub buatTabel()

        LV.Columns.Add("NIK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("NAMA PEGAWAI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GOL", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PAJAK", 150, HorizontalAlignment.Center)

        LV.Columns.Add("PINJAMAN", 150, HorizontalAlignment.Center)

        LV.Columns.Add("GAJI BERSIH", 150, HorizontalAlignment.Center)

        LV.View = View.Details

        LV.GridLines = True

        LV.FullRowSelect = True

    End Sub

    Sub IsiTabel()

        Dim Lst As New ListViewItem

        Lst.Text = NIK.Text

        Lst.SubItems.Add(NAMAPEGAWAI.Text)

        Lst.SubItems.Add(GOL.Text)

        Lst.SubItems.Add(GAJI.Text)

        Lst.SubItems.Add(PAJAK.Text)

        Lst.SubItems.Add(PINJAMAN.Text)

        Lst.SubItems.Add(GAJIBERSIH.Text)

        LV.Items.Add(Lst)

    End Sub

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

        buatTabel()

        NIK.Items.Add("001")

        NIK.Items.Add("002")

        NIK.Items.Add("003")

        GOL.Items.Add("IIIA")

        GOL.Items.Add("IIIB")

        GOL.Items.Add("IIIC")

    End Sub

    Private Sub GOL_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GOL.SelectedIndexChanged

        Select GOL.Text

            Case "IIIA" : GAJI.Text = 1500000

            Case "IIIB" : GAJI.Text = 2500000

            Case "IIIC" : GAJI.Text = 3500000

        End Select

        PAJAK.Text = 0.15 * GAJI.Text

    End Sub

    Private Sub NIK_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged

        Select NIK.Text

            Case "001" : NAMAPEGAWAI.Text = "ANDI LUBIS"

            Case "002" : NAMAPEGAWAI.Text = "CANDRA"

            Case "003" : NAMAPEGAWAI.Text = "HARYADI"

        End Select

    End Sub

    Private Sub BTNPROSES_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNPROSES.Click

        GAJIBERSIH.Text = Val(GAJI.Text) - Val(PINJAMAN.Text) - Val(PAJAK.Text)

    End Sub

    Private Sub BTNSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNSIMPAN.Click

        IsiTabel()

        NIK.Text = ""

        NAMAPEGAWAI.Text = ""

        GOL.Text = ""

        GAJI.Text = ""

        PAJAK.Text = ""

        PINJAMAN.Text = ""

        GAJIBERSIH.Text = ""

    End Sub

    Private Sub BTNHAPUS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNHAPUS.Click

        LV.Items.Clear()

    End Sub

End Class