HURUF MUTU MAHASISWA STMIK YANG MEMAKAI KeyPress

TUGAS 2.8

Private Sub cbonpm_Click()
Dim nama, jurusan, hm As String

Select Case cbonpm.Text
Case "17100035"
nama = "RANTI WULANTIKA"
jurusan = "Sistem Informasi"
Case "17100034"
nama = "MARISCA NOVALINDA"
jurusan = "Sistem Informasi"
Case "17100003"
nama = "RENALDI ZAINAL ARIFIN"
jurusan = "Sistem Informasi"
Case "17100032"
nama = "DIKA ADI PRATAMA"
jurusan = " Sistem Informasi"
Case "17100033"
nama = "ROBIYANTO"
jurusan = "Sistem Informasi"
End Select
txtnama.Text = nama
txtjurusan.Text = jurusan
txtquis.SetFocus
End Sub

Private Sub cmdbatal_Click()
cbonpm.SetFocus
cbonpm.Text = ""
txtnama.Text = ""
txtjurusan.Text = ""
txtquis.Text = ""
txttugas.Text = ""
txtuts.Text = ""
txtuas.Text = ""
txtna.Text = ""
txthm.Text = ""
End Sub

Private Sub cmdkeluar_Click()
Unload Me
End Sub

Private Sub cmdproses_Click()
Dim na As Integer
Dim hm As String
QUIS = Val(txtquis.Text)
TUGAS = Val(txttugas.Text)
UTS = Val(txtuts.Text)
UAS = Val(txtuas.Text)
na = (QUIS + TUGAS + UTS + UAS) / 4
txtna.Text = na

Select Case txtna.Text
Case Is > 80
hm = "A"
Case Is > 70
hm = "B"
Case Is > 60
hm = "C"
Case Is > 50
hm = "D"
Case Is < 50
hm = "E"
End Select
txthm.Text = hm
End Sub

Private Sub Form_Load()
cbonpm.AddItem "17100035"
cbonpm.AddItem "17100034"
cbonpm.AddItem "17100003"
cbonpm.AddItem "17100032"
cbonpm.AddItem "17100033"
End Sub



Private Sub txtquis_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txttugas.SetFocus
End If
End Sub

Private Sub txttugas_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtuts.SetFocus
End If
End Sub




Private Sub txtuas_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Dim na As Integer
Dim hm As String
QUIS = Val(txtquis.Text)
TUGAS = Val(txttugas.Text)
UTS = Val(txtuts.Text)
UAS = Val(txtuas.Text)
na = (QUIS + TUGAS + UTS + UAS) / 4
txtna.Text = na

Select Case txtna.Text
Case Is > 80
hm = "A"
Case Is > 70
hm = "B"
Case Is > 60
hm = "C"
Case Is > 50
hm = "D"
Case Is < 50
hm = "E"
End Select
txthm.Text = hm
End If
End Sub

Private Sub txtuts_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtuas.SetFocus
End If
End Sub

HURUF MUTU MAHASISWA STMIK PRINGSEWU TIDAK MENGGUNAKAN KeyPress

TUGAS 2.7

Private Sub cbonpm_Click()
Dim nama, jurusan, hm As String

Select Case cbonpm.Text
Case "17100035"
nama = "RANTI WULANTIKA"
jurusan = "Sistem Informasi"
Case "17100034"
nama = "MARISCA NOVALINDA"
jurusan = "Sistem Informasi"
Case "17100003"
nama = "RENALDI ZAINAL ARIFIN"
jurusan = "Sistem Informasi"
Case "17100032"
nama = "DIKA ADI PRATAMA"
jurusan = " Sistem Informasi"
Case "17100033"
nama = "ROBIYANTO"
jurusan = "Sistem Informasi"
End Select
txtnama.Text = nama
txtjurusan.Text = jurusan
txtquis.SetFocus
End Sub

Private Sub cmdbatal_Click()
cbonpm.SetFocus
cbonpm.Text = ""
txtnama.Text = ""
txtjurusan.Text = ""
txtquis.Text = ""
txttugas.Text = ""
txtuts.Text = ""
txtuas.Text = ""
txtna.Text = ""
txthm.Text = ""
End Sub

Private Sub cmdkeluar_Click()
Unload Me
End Sub

Private Sub cmdproses_Click()
Dim na As Integer
Dim hm As String
QUIS = Val(txtquis.Text)
TUGAS = Val(txttugas.Text)
UTS = Val(txtuts.Text)
UAS = Val(txtuas.Text)
na = (QUIS + TUGAS + UTS + UAS) / 4
txtna.Text = na

Select Case txtna.Text
Case Is > 80
hm = "A"
Case Is > 70
hm = "B"
Case Is > 60
hm = "C"
Case Is > 50
hm = "D"
Case Is < 50
hm = "E"
End Select
txthm.Text = hm
End Sub

Private Sub Form_Load()
cbonpm.AddItem "17100035"
cbonpm.AddItem "17100034"
cbonpm.AddItem "17100003"
cbonpm.AddItem "17100032"
cbonpm.AddItem "17100033"
End Sub

Tuliskan Nama Anda Ranti Wulantika

TUGAS 2.6

Private Sub Check1_Click()
Label2.FontBold = Check1.Value
End Sub

Private Sub Check2_Click()
Label2.FontItalic = Check2.Value
End Sub


Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub

Private Sub Command2_Click()
End
End Sub
Private Sub Option1_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub

17100035-Ranti Wulantika-2.5

TUGAS 2.5

Private Sub chkbold_Click()
'membuat teks tebal
If chkbold.Value = 1 Then
lblteks.FontBold = True
Else
lblteks.FontBold = False
End If
End Sub

Private Sub chkitalic_Click()
'membuat teks miring
If chkitalic.Value = 1 Then
lblteks.FontItalic = True
Else
lblteks.FontItalic = False
End If
End Sub

Private Sub chkstrikethru_Click()
'membuat teks bergaris tengah
If chkstrikethru.Value = 1 Then
lblteks.FontStrikethru = True
Else
lblteks.FontStrikethru = False
End If
End Sub

Private Sub chkunderline_Click()
'membuat teks bergaris bawah
If chkunderline.Value = 1 Then
lblteks.FontUnderline = True
Else
lblteks.FontUnderline = False
End If
End Sub



Private Sub cmdexit_Click()
Unload Me
End Sub

Private Sub optblue_Click()
'Membuattexts berwarna biru
lblteks.ForeColor = vbBlue
End Sub

Private Sub optgreen_Click()
'Membuattexts berwarna hijau
lblteks.ForeColor = vbGreen
End Sub

Private Sub optred_Click()
'Membuattexts berwarna Merah
lblteks.ForeColor = vbRed
End Sub

Private Sub optyellow_Click()
'Membuattexts berwarna kuning
lblteks.ForeColor = vbYellow
End Sub

APLIKASI PERHITUNGAN GAJI MENGGUNAKAN KEYPRESS

TUGAS 2.4

Private Sub CmdKeluar_Click()
Unload Me
End Sub

Private Sub Cmdproses_Click()
txtgk = Val(txtgp) + Val(txttj) - Val(txtpt)
txtpj = Val(txtgk) * 0.1
txtgd = Val(txtgk) - Val(txtpj)
End Sub
Private Sub CmdUlang_Click()
txtgp = ""
txttj = ""
txtpt = ""
txtgk = ""
txtpj = ""
txtgd = ""
txtgp.SetFocus

End Sub


Private Sub txtgp_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txttj.SetFocus
End If
End Sub


Private Sub txtpt_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtgk = Val(txtgp) + Val(txttj) - Val(txtpt)
txtpj = Val(txtgk) * 0.1
txtgd = Val(txtgk) - Val(txtpj)
End If
End Sub

Private Sub txttj_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtpt.SetFocus
End If
End Sub

APLIKASI PERHITUNGAN GAJI TANPA KEYPREES

TUGAS 2.3

Private Sub CmdKeluar_Click()
Unload Me
End Sub

Private Sub Cmdproses_Click()
txtgk = Val(txtgp) + Val(txttj) - Val(txtpt)
txtpj = Val(txtgk) * 0.1
txtgd = Val(txtgk) - Val(txtpj)
End Sub
Private Sub CmdUlang_Click()
txtgp = ""
txttj = ""
txtpt = ""
txtgk = ""
txtpj = ""
txtgd = ""
txtgp.SetFocus

End Sub


Private Sub txtgp_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txttj.SetFocus
End If
End Sub

HARGA SETELAH DISKON 10% MENGUNAKAN KEYPRESS

TUGAS 2.2

Private Sub Command4_Click()

TxtDis = Val(Txtha) * 0.1
TxtHak = Val(Txtha) - Val(TxtDis)

End Sub
Private Sub Command5_Click()
Txtha = ""
TxtDis = ""
TxtHak = ""
Txtha.SetFocus
End Sub

Private Sub Command6_Click()
End
End Sub


Private Sub Txtha_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
TxtDis = Val(Txtha) * 0.1
TxtHak = Val(Txtha) - Val(TxtDis)
End If
End Sub

HARGA SETELAH DISKON 10% TANPA KEYPRESS

TUGAS 2.1 

 

 Private Sub Command4_Click()

TxtDis = Val(Txtha) * 0.1
TxtHak = Val(Txtha) - Val(TxtDis)

End Sub
Private Sub Command5_Click()
Txtha = ""
TxtDis = ""
TxtHak = ""
Txtha.SetFocus
End Sub

Private Sub Command6_Click()
End
End Sub

Kalkulator Menggunakan Keypress

Tugas 6

Private Sub Command1_Click()
If Val(Text2.Text) & Val(Text3.Text) Then
Text4.Text = Val(Text2.Text) + Val(Text3.Text)
End If

If Val(Text5.Text) & Val(Text6.Text) Then
Text7.Text = Val(Text5.Text) / Val(Text6.Text)
End If

If Val(Text8.Text) & Val(Text9.Text) Then
Text10.Text = Val(Text8.Text) - Val(Text9.Text)
End If

If Val(Text11.Text) & Val(Text12.Text) Then
Text13.Text = Val(Text11.Text) * Val(Text12.Text)
End If
End Sub

Private Sub Command2_Click()
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
Text13.Text = ""
End Sub

Private Sub Command3_Click()
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
Text13.Text = ""
End Sub

Private Sub Command4_Click()
End
End Sub
Private Sub Form_Load()
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
Text13.Text = ""
End Sub

Private Sub Text11_Change()
If KeyAscii = 13 Then
Text12.SetFocus
End If
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.SetFocus
End If

End Sub


Private Sub Text5_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text6.SetFocus
End If
End Sub

Private Sub Text8_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text9.SetFocus
End If
End Sub

Kalkulator Tidak Mengunakan Keypress

 Tugas 5

Private Sub Command1_Click()
If Val(Text1.Text) & Val(Text2.Text) Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End If

If Val(Text4.Text) & Val(Text5.Text) Then
Text6.Text = Val(Text4.Text) / Val(Text5.Text)
End If

If Val(Text7.Text) & Val(Text8.Text) Then
Text9.Text = Val(Text7.Text) - Val(Text8.Text)
End If

If Val(Text10.Text) & Val(Text11.Text) Then
Text12.Text = Val(Text10.Text) * Val(Text11.Text)
End If

End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""

End Sub

Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
End Sub

Private Sub Command4_Click()
End
End Sub

Penjumlahan Mengunakan Keypress

Tugas 4

Private Sub Command1_Click()
If Val(Text1.Text) & Val(Text2.Text) Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
Text1.SetFocus
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text1.SetFocus

End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
Text2.SetFocus
End If
End Sub
Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
Text3.SetFocus
End If
End Sub

Penjumlahan Tidak Menggunakan Keypress

Tugas 3

Private Sub Command1_Click()
If Val(Text1.Text) & Val(Text2.Text) Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End If

End Sub

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

End Sub

Private Sub Command3_Click()
End
End Sub

Data Mahasiswa menggunakan Keyprees

Tugas 2

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub


Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.SetFocus
End If
End Sub

Data Maha Siswa Tidak Mengunakan Keypress

Tugas 1

Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub

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

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub

Private Sub Label1_Click()

End Sub

Virtual Goggles

Virtual Goggles | Foto: wallpaper222(dot)com

Virtual Goggles atau Vitual Reality adalah salah satu teknologi terbaru dan tercanggih yang tengah menjadi perbincangan dunia. Bentuk dari teknologi adalah kacamata. Ya, kacamata yang dilengkapi dengan teknologi super canggih.

Alat-alat teknologi dengan kecanggihan yang wow pada film-film Hollywood seperti diwujudkan dalam bentuk asli. Kini kita bisa memiliki berbagai alat berteknologi canggih persis seperti yang ada di film-film. Mulai dari komputer hingga mobil yang ada di film kini ada dan nyata di kehidupan kita.

Virtual Goggles dahulu disebut Virtual Reality | Foto: fastcompany(dot)com

Istilah Virtual Reality ini pertama kali dipakai dan didengungkan pada awal tahun 1990 silam. Kemudian pada tahun 2010 lalu, nama Virtual Reality diubah menjadi Virtual Goggles.

Teknologi terbaru dan tercanggih ini merupakan teknologi yang membawa dunia secara virtual dengan menggunakan 3D komputer. Virtual Goggles ini menggunakan teknologi stereoscopic goggles alias kaca mata sebagai media gambar 3D.

Jadi dengan menggunakan teknologi canggih ini kita bisa melihat sekeliling kita seolah-olah hidup. Cara kerja Virtual Goggles ini sama dengan kaca mata 3D, namun lebih canggih karena ditunjang dengan teknologi super
sumber : http://warungkopi.okezone.com/thread/415142/super-wow-teknologi-terbaru-dan-tercanggih-ini-nyata-lho

NILAI BISNIS TEKNOLOGI TELEKOMUNIKASI

Perkembangan teknologi komunikasi telah membawa perubahan yang signifikan dalam penggunaan teknologi tersebut. Hadirnya teknologi tersebut dapat mengubah proses bisnis menjadi lebih efektif. Saat ini, jaringan telekomunikasi memainkan peranan penting dalam e-business, e-commerce, dan aplikasi lainnya yang dapat mendukung tujuan strategis manajemen perusahaan.

Penggunaan internet, intranet, ekstranet dan aplikasi bisnis lainnya mengurangi biaya, meningkatkan produktivitas, mempersingkat waktu proses bisnis sehingga perusahaan tersebut mampu menghadapi persaingan bisnis yang semakin ketat. Ditambah lagi dengan hadirnya e-commerce, transaksi bisnis akan menjadi lebih cepat, nyaman, dan dapat disesuaikan dengan keinginan pelanggan. Sebagai contoh, dengan adanya internet, perusahaan dapat menangkap informasi dari pelanggan secara cepat, kemudian memproses pesanan tersebut secara cepat pula, sehingga mampu mengurangi penundaan dalam pemenuhan kebutuhan bagi pelanggan. Contoh yang lain, dengan menggunakan jaringan POS online, perusahaan dapat melakukan otorisasi kredit penjualan barang. Permintaan kredit dapat dilakukan dan dijawab secara cepat.

Demikian artikel Nilai Bisnis Teknologi Telekomunikasi yang bisa kami sampaikan, semoga bermanfaat.

Sumber: https://tekno-hp.blogspot.co.id/2017/10/nilai-bisnis-teknologi-telekomunikasi.html
Buku Informasi Konsep & Aplikasi
Penulis: Agus Mulyanto

Daftar Teknologi Paling Ditunggu Di Akhir Tahun

 1  Holographic Life

Dalam perkembangan teknologi yang semakin pesat semua bersifat hologram. Tak heran kemampuan dalam membentuk dunia hologram ini menjadi teknologi yang ditunggu orang untuk masa depan. Sebuah video atau gambar tampil tak hanya dalam 3 dimensi tapi utuh sesuai aslinya.

 2  Eksoskeleton

Anda ingin menggunakan baju seperti super hero hal itu bukan sesuatu hal yang mustahil. Eksoskeleton adalah baju yang dirancang sesuai dengan tubuh anda dan anda akan memiliki kekuatan super. Tak salah maka eksosokeleton termasuk dalam 10 teknologi paling ditunggu di akhir tahun.

 3  BionicOpter

Apakah anda ingin memiliki robot mini? Bioinopter adalah jawabanya. Didesain berbentuk capung, robot ini merupakan salah satu pernagkat mesin yang sudah komplek. Diseluruh tubuhnya merupakan sensor.

 4  Little Dog Robot

Robot kecil berbentuk anjing ini dibuat oleh universitas California. Robot ini didesain untuk melintasi medan berat. Diharapkan dapat digunkaan saat bencana. Karena ukuran yang kecil dan teknologi yang dimilikinya tak heran litlle dog robot ini masuk dalam 10 teknologi paling ditunggu akhir tahun.

 5  Samsung Flexible Old Screen

Layar OLED oyang dibuat fleksibel ini didesain oleh vendor produk telekomunikasi terkemuka Samsung. Layar monitor ponsel pintar dimasa mendatang diharapkan dapat lentur dan bisa fleksibel. Layar lentur samsung ini merupakan salah satu teknologi komunikasi yang paling ditunggu akhir tahun.

 6  Iriscan Mouse

Tetikus yang bisa menyecan sebuah teks adalah harapan semua orang. hal ini memudahkan pekerjaan dalam melakukan copying. Tak heran Tetikus Iriscan ini menjadi salah satu 10 teknologi paling ditunggu akhir tahun. 

 7  Info Digital System Interface

Inilah Prototipe teknologi media digital yang paling ditunggu akhir tahun. Anda bisa memasukkan semua konten digital yang anda inginkan dalam tablet topuchscreen. Anda cukup memilih konten apa yang ingin anda buat. Anda cukup memindai apa yang ada dalam kehidupan nyata dan sediakan kertas anda juga dapat menyetaknya.

 8  Material

Model pencetakan 3D memang sedang hangat dibicarakan. Material adalah salah satu mesin yang bisa mencetak 3D dengan maksimal. Tak heran material merupakan salah satu 10 teknologi paling ditunggu akhir tahun.

 9  Anti Facial Recognition Visor

Teknologi pemindai wajah memang sedang terkenal. Saat ini menggunakan teknologi ini maka proses pemindaian atau pengenalan kode kunci cukup menggunakan wajah. Teknologi ini dibuat oleh oleh Japan National Institute of Informatika. Selain itu teknologi ini juga bisa menyamarkan wajah anda dari pemindaian. Visor masuk dalam 10 teknologi paling ditunggu akhir tahun.

 10  Word Lens

Jika menggunakan lensa ini anda tak perlu bingung bepergian keluar negeri. Di negara manapun anda akan menegerti bahasa yang digunakan dengan mudah menggunakan word lens.

sumber : http://www.daftarmenarik.com/2014/09/10-teknologi-paling-ditunggu-di-akhir-tahun.html

Flying Car

Mobil Terbang Sungguhan | Foto: dailymail(dot)co(dot)uk

Dalam berbagai film baik itu film action atau film animasi kita sering melihat mobil yang bisa terbang. Kini mobil terbang benar-benar ada di dunia nyata. Teknologi termutakhir ini diberi nama “The Highway in The Sky”.

Mobil terbang ini masih dalam tahap produksi dan uji coba. Selain digunakan di daratan mobil ini juga bisa digunakan di udara. Tujuan diciptakannya flying car ini adalah untuk mengurangi kemacetan yang melanda Negara-negar di dunia yang semakin kronis.

Mobil Terbang yang sedang uji coba | Foto: motherboard(dot)vice(dot)com

Teknologi terbaru dan tercanggih ini dapat digunakan oleh siapa saja. Jangan khawatir, bagi Anda yang memiliki bobot tubuh berlebih juga bisa menggunakan kendaraan canggih ini, lho. Ya, karena mobil ini dirancang tanpa pengecualian berat badan.

Anda juga tak perlu khawatir akan keamanannya, sebab mobil ini juga dilengkapi dengan fitur keselamatan dan kemanan nomor wahid. Mobil ini mampu menempuh perjalanan hingga 450 mil dan dapat mengudara hingga 100 mil perjam di udara dalam kecepatan tinggi.

Kehadiran mobil terbang ini memang sangat dinantikan. Selain itu, mobil ini diprediksi mampu mengatasi kemacetan. Diperkirakan mobil ini siap beroperasi jika sudah ada persetujuan dari Federal Aviation Administration.

sumber : http://warungkopi.okezone.com/thread/415142/super-wow-teknologi-terbaru-dan-tercanggih-ini-nyata-lho

Teknologi Terbaru dalam bidang komputer

Terbaru dan Paling Canggih

Berbicara tentang penemuan di bidang komputer, seiring berjalannya waktu penemuan-penemuan yang ada sangatlah unik dan tentunya akan sangat membantu manusia dalam mengerjakan berbagai pekerjaannya. Tak hanya membantu pekerjaan kamu, namun komputer juga membantu mengurangi waktu kerjamu. Jika biasanya kamu mengerjakan sesuatu sangat lama, maka dengan komputer kamu bisa mengerjakan sesuatu dengan lebih singkat. Berikut ini tercanggih dan terbaru yang wajib untuk kamu ketahui:

1. Biometric Sensor

Apakah kamu pernah mendengar tentang biometric sensor? Ini merupakan teknologi terbaru yang bisa diaplikasikan pada komputer. Teknologi canggih ini diciptakan oleh salah satu perusahaan komputer terbesar bernama Intel. Teknologi ini hampir sama dengan teknologi Apple yang digunakan untuk otorisasi kartu kredit saat melakukan pembayaran dengan Pay Apple. Biometric sensor membuat kamu lebih mudah untuk melakukan otorisasi pada berbagai situs. Jika biasanya kita harus menggunakan password atau username untuk mengakses sebuah situs, maka dengan biometric sensor kamu bisa masuk dengan lebih mudah, praktis dan juga aman.

2. Wireless Display

Wireless Display merupakan salah satu teknologi terbaru dan juga canggih yang sama-sama diprakarsai oleh perusahaan komputer terbesar bernama Intel. Dengan menggunakan Wireless Display, maka komputer dan laptop tidak perlu dihubungkan dengan sebuah kabel. Teknologi ini juga bisa membuat sebuah komputer atau laptop bisa terhubung dengan beberapa komputer atau laptop lainnya. Bagi kamu yang sering mempresentasikan sesuatu hal di depan publik, maka teknologi ini akan sangat membantu. Kamu tak perlu memasang kabel untuk mempresentasikan hasil kerja kamu. Cukup gunakan teknologi ini, maka kamu bisa mempresentasikan apa pun dengan mudah.

3. Wireless Charging

Sama-sama berasal dari Intel, teknologi wireless charging pun begitu canggih dan tentunya akan sangat membantu kamu. Jika biasanya kamu harus mengulur kabel untuk mengisi baterai laptopmu, maka hal itu tidak perlu dilakukan saat kamu memiliki wireless charging. Dengan wireless charging, tentunya kamu akan lebih mudah untuk mengisi baterai laptopmu tanpa harus repot menggunakan kabel.

4. Komputer Interaktif

Kompuer interaktif dari intel merupakan teknologi yang canggih dan juga baru. Komputer jenis ini akan sangat peka terhadap visual dan juga berbagai input yang dilakukan oleh penggunanya. Nantinya, teknologi ini pun akan dilengkapi dengan intel realsense 3D camera, dimana teknologi tersebut bisa sangat peka bahkan mampu mengatur jarak antara pengguna dengan sensor.

5. Creative Desktop dengan Touch Mat dari HP

Salah satu yang canggih dan terbaru adalah Creative Desktop dengan Touch Mat. Teknologi ini diciptakan oleh sebuah perusahaan komputer HP (Hewlett-Packard). Teknologi ini seperti kanvas yang sudah dikombinasikan dengan komputer berteknologi kamara 3D. Teknologi ini memungkinkan penggunanya untuk bisa memindai berbagai benda yang ada di depan komputer, lalu memanipulasinya dengan kanvas yang berada di atas meja. Misalnya saja ada sebuah cangkir yang terletak di depan komputer jenis ini. Komputer tersebut akan mampu memindai cangkir yang ada di depannya. Setelah gambarnya berada daam komputer, maka kamu bisa memanipulasi gambar tersebut sesuai keinginan dengan menggunakan kanvas yang berada di dekat komputer tersebut.

Jenis gambar yang nantinya akan masuk ke dalam komputer adalah jenis gambar 3D. Alat yang digunakan untuk memindai berbagai objek tersebut ke dalam Touch Mat adalah proyektor yang terletak di atas Sprout.

6. Virtual Keyboard
Teknologi canggih dan baru ini diciptakan oleh perusahaan Dell. Prinsip kerja teknologi ini adalah dengan menggabungkan sebuah PC all in one dan juga smart desk. Dengan teknologi ini, pengguna akan bisa mengetik langsung di atas meja. Nah, tentunya teknologi ini akan sangat membantu bukan? Jari-jari kamu tidak perlu memegang keyboard komputer dan tentunya lebih lincah bergerak saat mengetik apa pun. Teknologi jenis ini pastinya akan sangat berguna untuk kamu dalam mengerjakan berbagai jenis tugas.

Itulah beberapa terbaru dan juga tercanggih yang pastinya sangat sayang untuk kamu lewatkan. Seiring berjalannya waktu, tentunya penemuan di dunia komputer akan lebih banyak dan juga lebih canggih. Jadi, siapkah kamu untuk menyambut teknologi lain yang lebih canggih? Lalu adakah teknologi di atas yang menarik perhatian kamu sehingga kamu ingin memilikinya? Yang pasti, beberapa teknologi di atas dimaksudkan untuk membantu pekerjaan manusia, sehingga manusia bisa lebih mudah dalam mengerjakan pekerjaannya. Jika kamu berminat untuk memiliki teknologi di atas, jangan lupa untuk melihat-lihat terbaru dengan berkunjung ke berbagai website perusahaan komputer. Hal seperti itu bisa membuat wawasanmu bertambah, dan tentunya tak ketinggalan info tentang tercanggih dan terbaru saat ini.

 sumber : http://www.gudangilmukomputer.com/2016/05/6-teknologi-komputer-terbaru-dan-tercanggih-saat-ini.html

Teknologi Canggih di tahun 2017

Digital twin

Digital twin merupakan penemuan terbaru dibidang teknologi digital, dengan digital twin software akan terlihat lebih dinamis dalam hal fisik dan sistemnya. Sistem kerja teknologi terbaru digital twin ialah mengandalkan data yang disediakan sensor untuk merespon sebuah perubahan, memahami keadaan, dan meningkatkan kinerja. Sistem ini disinyalir bakalan menggantikan ketrampilan sumber daya manusia dan monitoring tradisional dalam hal perencanaan jasa, dan memperbaiki peralatan operasi pabrik.

amazonaws.com

 Intelligent things

Intelligent things merupakan teknologi terbaru yang akan membantu manusia dalam melakukan beberapa hal, khususnya dalam hal berkendara, sebab teknologi ini bisa memperpediksi jika jarak kendaranmu dengan benda di sekitarnya terlalu dekat. Intelligent things menggunakan AI dan Machine Learning dalam memprediksi terhadap objek lain, Intelligent things juga bisa dipasang di drone dan smart appliances.

forbes.com

 Teknologi VR dan AR

Teknologi yang bakalan mengalami pembaruan dan bakalan lebih populer ialah Virtual Reality dan Augmented Reality. Sebenarnya kedua teknologi ini sudah ada di beberapa tahun terakhir, namun sampai saat ini kedua teknologi ini masih dalam proses penggembangan, di tahun 2017 ini keduanya mengalami beberapa perbaikan. Menurut gartner, perkembangan dua teknologi ini akan terus mangalami perbaikan hingga sampai pada tahap penyempurnaan, yang diprediksi terjadi pada tahun 2021.

pinimg.com

Intelligent apps

Teknologi lain yang menggunakan AI dan akan hadir di tahun ini ialah Intelligent apps, salah satu contoh penggunaan intelligent pass ialah pada penggunaan virtual asissten yang akan membuat hidup manusia lebih mudah, nahkan teknologi ini mampu membantu pekerjaan sehari-hari manusia.

techstory.id

 Mobil terbang aeromobil

Teknologi canggih di tahun 2017 selanjutnya ialah mobil terbang atau aeromobil. Aeromobil merupakan perpaduan antara pesawat terbang dengan mobil, jadi kerjanya hampir sama dengan tank ampibi yang bisa di darat dan di laut. Namun untuk aeromobil bisa di darat dan di udara, perpaduan ini mobil dan pesawat ini melahirkan mobil dengan tampilan yang mewah dan fungsi yang bisa dibawa kemana saja tanpa harus takut terjebak macet.

thegaspol.com

Menurut CEO dari aeromobil, Juraj Vaculik, pihaknya mengatakan bergerak cepat dalam memproduksi dan memasarkan inovasinya tersebut. Dalam wawancara Jurac dengan wartawan CNBC, ia mengatakan jika pada tahun 2017 ini perusahaan aeromobilnya dipastikan sudah bisa mengudara dan siap dipasarkan.
Perpaduan antara mobil dan pesawat ini juga menghasilkan kombinasi yang menarik dengan teknologi canggih yang ada di mobil dan pesawat, dilengkapi dengan sistem aviasi dan auto pilot kendaraan masa depan ini bakalan menjadi primadona. Selain itu, aeromobil juga dilengkapi dengan peredam kejut untuk melakukan take off dan pendaratan di medan kasar.

Mobil otonom atau mobil tanpa pengemudi

Mobil tanpa supir sebelumnya sudah diproduksi pada tahun 2016, namun itu masih dalam tahap percobaan dan diproduksi dalam jumlah terbatas. Menurut Boston Consuling Group, teknologi mobil otonom atau tanpa pengemudi, akan mulai menjamur di tahun 2017 dan akan memenuhi perjalanan seluruh kota pada tahun 2040.

ruangselebriti.blogspot.co.id

Masa depan manusia terdengar semakin mudah bukan, jika kita masih hidup di 2040 maka tidak menutup kemungkinan kita naik mobil sendirian sambil ditinggal tidur, karena mobil sudah bisa berjalan sendiri secara otomatis. Selain itu masa depan kita juga tidak perlu lagi menggunakan SIM sebagai syarat mengemudi.
Itulah 7 teknologi canggih di tahun 2017 yang akan membuat pekerjaan manusia semakin terbantu dan semakin ringan. Karena hakikat dari ilmu pengetahuan dan teknologi ialah untuk mempermudah kehidupan manusia dan bermanfaat untuk manusia. Bukan untuk merusak tatanan dunia dan bukan juga dijadikan sebagai pembunuh manusia.
sumber : https://www.inovasee.com/teknologi-canggih-di-tahun-2017-17818/

Cara Cerdas Mencegah Penyebaran Hoax di Media Sosial

Sosialisasi Literasi Cerdas Bermedia Sosial di Lampung, Jumat (3/11/2017) / (Foto: Kementerian Komunikasi dan Informatika)

Jakarta - Media sosial semestinya dimanfaatkan untuk bersosialisasi dan berinteraksi dengan menyebarkan konten-konten positif. Sayangnya, beberapa pihak memanfaatkannya untuk menyebarkan informasi yang mengandung konten negatif. Jika hal tersebut dibiarkan, dikhawatirkan akan membahayakan generasi muda.

Menyadari hal tersebut, sudah banyak kelompok yang secara proaktif mengajak masyarakat agar lebih cerdas menggunakan media sosial. Pemerintah juga berupaya untuk mengurangi penyebaran hoax dengan cara menyusun undang-undang yang di dalamnya mengatur sanksi bagi pengguna internet yang turut menyebarkan konten negatif. Selain itu, Kementerian Komunikasi dan Informatika turut mengedukasi masyarakat untuk meningkatkan literasi digital, salah satunya melalui 'Mudamudigital'.

Mudamudigital merupakan wadah bagi para generasi muda untuk berbagi ilmu dengan para pakar literasi digital Indonesia. Para peserta juga dapat 'curhat' kepada para pakar tentang apa saja yang mereka hadapi di dunia digital pada 'zaman now'.

Tujuan utama dari Mudamudigital ialah membentuk generasi muda Indonesia agar mempunyai kecerdesaan literasi digital yang tinggi. Sehingga tidak mudah dipengaruhi oleh berita-berita hoax yang dapat melunturkan persatuan dan kesatuan bangsa.

Staf Ahli Menteri Kominfo Bidang Teknologi Herry Abdul Azis mengatakan internet telah membuat informasi berkembang lebih jauh. Dalam hitungan jam, satu topik bisa berkembang lebih luas.

"Misalnya saja berita yang berkembang soal registrasi SIM Card telah berkembang sangat jauh. Dalam hitungan jam, berapa hari, berita berkembang luas, bahkan ada yang menjadi hoax. Masuk ke ranah-ranah lain, seperti untuk penyadapan dan lain-lain,"kata Herry dalam acara Literasi Cerdas Bermedia Sosial yang digagas Mudamudigital di Kota Bandar Lampung, Jumat (3/11/2017).

"Hoax tersebut sangat viral, padahal tidak ada hubungannya. Baru hitungan hari saja sudah berubah. Padahal, hal tersebut tidak benar," ujarnya.

Lebih lanjut, Herry menjelaskan berita hoax soal registrasi SIM Card juga mempengaruhi masyarakat. "Diperkirakan sampai 41% orang terpengaruh," katanya.

Lalu, bagaimana meminimalisir berita hoax yang bertebaran saat ini?

"Muda mudi digital jangan mudah percaya dengan informasi yang berseliweran. Cek kebenarannya," kata Herry. Selain itu, dia mengimbau agar tidak membaca sesuatu hanya sepotong-sepotong.

Sosialisasi Literasi Cerdas Bermedia Sosial di Lampung, Jumat (3/11/2017) / (Foto: Kementerian Komunikasi dan Informatika)

Dalam kesempatan yang sama, Septiaji Eko Nugroho selaku Inisiator Masyarakat Anti-Fitnah Indonesia (MAFINDO) dan Ketua Masyarakat Indonesia anti-hoax menjelaskan bahwa orang Indonesia kerap percaya pada hoax kesehatan dan keuangan. Karena itu, tak mengherankan jika ribuan orang kerap jadi korban investasi bodong.

"Kejadian tersebut terjadi karena orang Indonesia kurang edukasi literasi digital. Kampanye publik dapat digalakkan untuk menangkal hoax," katanya.

Menurut Septiaji, keluarga adalah garda terdepan untuk mencegah hoax. Orangtua harus aktif saat anak mengakses media sosial. Di sisi lain, seluruh pihak juga terlibat aktif menangkal hoax, tak terkecuali para pemimpin agama.

"Seringlah menulis hal-hal positif tentang lingkungan sekitar. Jangan diam dan sibuk pada urusan hal-hal buruk. Tingkatkan level pemikiran kritis sebagai upaya memerangi informasi yang keliru," katanya.

Sementara itu, Kanit V Subdit III Direktorat Tindak Pidana Siber Bareskrim Polri AKBP Purnomo mengingatkan agar generasi muda tidak sembarangan membagikan sesuatu di internet, misalnya informasi menyinggung orang lain.

"Menyebarkan atau memberikan informasi buruk di internet bisa terancaman pidana pasal 310 dan 311 KUHP dan Undang-Undang ITE. Cek dulu informasi yang ingin disebarkan, apa dapat merugikan orang lain, jangan sampai bersinggungan dengan hukum," katanya.

Menyadari bahwa saat ini era e-Commerce sedang bertumbuh, Purnomo tak lupa memberikan tips agar anak muda terhindar dari penipuan. Dia menyarankan, sebelum membeli sesuatu dari internet, sebaiknya kita memilih online shop yang terverifikasi dan bisa dipercaya.

"Walaupun harganya mungkin sedikit lebih mahal. Kalau ada yang menawarkan harga lebih murah, tapi reputasi belum teruji, harus diwaspadai," katanya.

Untuk pengguna internet yang sudah terlanjut menjadi korban penipuan, Purnomo menyarankan agar mereka membuat laporan kepada Kepolisan. Berbekal bukti laporan dari kepolisian, korban bisa meminta agar bank membekukan sementara rekening pelaku penipuan.

"Rekening pelaku bisa ditahan, penundaan transaksi sebentar. Sesuai UU pencucian uang, bank dapat melakukan penundaan transaksi bila ada transaksi yang mencurigakan. Ini kan teman-teman transaksi melalui transfer, jadi bisa dilihat," katanya.

Perlu diketahui, data Asosiasi Penyelenggara Jasa Internet Indonesia (APJII) menunjukkan bahwa pengguna internet di Indonesia sudah mencapai 132,7 juta.

Meningkatnya perkembangan pengguna internet di Indonesia memiliki dampak positif antara lain semakin meningkatnya pertumbuhan e-Commerce di Indonesia. Namun, di saat yang bersamaan, pertumbuhan pengguna yang massif ini membuka ruang yang lebih luas untuk meningkatnya radikalisme digital, jejaring teroris online, berita palsu, ujaran kebencian dan cyberbullying.

Sosialisasi Literasi Cerdas Bermedia Sosial di Lampung, Jumat (3/11/2017) / (Foto: Kementerian Komunikasi dan Informatika)

Hal ini terlihat dengan begitu banyak informasi hoax. Berita-berita hoax yang menyesatkan beredar lewat berbagai jalur digital, termasuk situs media online, blog, website, media sosial, email, dan aplikasi pesan instan.

Menurut The Jakarta Post, sejak tahun 2008, 144 orang telah diproses hukum karena melanggar Undang Undang Informasi dan Transaksi Elektronik (ITE), terutama terkait dengan berita palsu dan ujaran kebencian di media sosial. Selain itu, hingga tahun 2016, terdapat sekitar 773.000 situs yang diblokir oleh Kementerian Kominfo dan mayoritas situs ini merupakan situs pornografi. Tindakan pemblokiran ini menunjukkan bahwa masih terdapat konten negatif di internet.

Menyebarnya hoax di internet ini sebenarnya bukan problem yang hanya terjadi di Indonesia. Bahkan, Amerika Serikat sekalipun mengalami masalah serius terkait penyebaran hoax di media sosial, terutama Facebook dan Twitter.

Tindakan sederhana apa yang bisa kita lakukan agar tidak ikutan menyebarkan hoax? Berikut tips dari Septiaji Eko Nugroho.

Hati-hati dengan judul provokatifBerita hoax seringkali menggunakan judul sensasional yang provokatif, misalnya dengan langsung menudingkan jari ke pihak tertentu. Isinya pun bisa diambil dari berita media resmi, hanya saja diubah-ubah agar menimbulkan persepsi sesuai yang dikehendaki sang pembuat hoax.

Cermati alamat situsUntuk informasi yang diperoleh dari website atau mencantumkan link, cermatilah alamat URL situs dimaksud. Berita yang berasal dari situs media yang sudah terverifikasi Dewan Pers akan lebih mudah diminta pertanggungjawabannya.

Menurut catatan Dewan Pers, di Indonesia terdapat sekitar 43.000 situs di Indonesia yang mengklaim sebagai portal berita. Dari jumlah tersebut, yang sudah terverifikasi sebagai situs berita resmi tak sampai 300. Artinya terdapat setidaknya puluhan ribu situs yang berpotensi menyebarkan berita palsu di internet yang mesti diwaspadai.

Periksa faktaPerhatikan dari mana berita berasal dan siapa sumbernya? Apakah dari institusi resmi seperti KPK atau Polri? Perhatikan keberimbangan sumber berita. Jika hanya ada satu sumber, pembaca tidak bisa mendapatkan gambaran yang utuh.

Hal lain yang perlu diamati adalah perbedaan antara berita yang dibuat berdasarkan fakta dan opini. Fakta adalah peristiwa yang terjadi dengan kesaksian dan bukti, sementara opini adalah pendapat dan kesan dari penulis berita, sehingga memiliki kecenderungan untuk bersifat subyektif.

Cek keaslian fotoDi era teknologi digital saat ini , bukan hanya konten berupa teks yang bisa dimanipulasi, melainkan juga konten lain berupa foto atau video. Ada kalanya pembuat berita palsu juga mengedit foto untuk memprovokasi pembaca.

Cara untuk mengecek keaslian foto bisa dengan memanfaatkan mesin pencari Google, yakni dengan melakukan drag-and-drop ke kolom pencarian Google Images. Hasil pencarian akan menyajikan gambar-gambar serupa yang terdapat di internet sehingga bisa dibandingkan.

Ikut serta grup diskusi anti-hoaxDi Facebook terdapat sejumlah fanpage dan grup diskusi anti-hoax, misalnya Forum Anti Fitnah, Hasut, dan Hoax (FAFHH), Fanpage & Group Indonesian Hoax Buster, Fanpage Indonesian Hoaxes, dan Grup Sekoci.

Di grup-grup diskusi ini, warganet bisa ikut bertanya apakah suatu informasi merupakan hoax atau bukan, sekaligus melihat klarifikasi yang sudah diberikan oleh orang lain. Semua anggota bisa ikut berkontribusi sehingga grup berfungsi layaknya crowdsourcing yang memanfaatkan tenaga banyak orang.

Apabila masih kurang? Tips dari The Washington Post di bawah ini bisa juga dijadikan sebagai pelajaran:

1. Banyak orang sebenarnya tidak membaca konten yang mereka bagikan. Mereka hanya membaca judulnya.Untuk mencegah Anda sendiri menjadi penyebar hoax, hilangkanlah kebiasaan membagikan konten tanpa membaca isinya secara menyeluruh.

2. Orang sering tidak mempertimbangkan legitimasi sumber beritaSitus berita hoax bisa muncul tiap saat, tetapi kita sebenarnya bisa menghindari jebakannya dengan bersikap lebih hati-hati melihat sebuah situs. Sikap hati-hati ini juga berlaku bagi narasumber yang mereka kutip, minimal dengan mencari referensi lanjutan di Google atau situs lain yang sudah terpercaya.

3. Orang cenderung mudah kena bias konfirmasiOrang punya kecenderungan untuk menyukai konten yang memperkuat kepercayaan atau ideologi diri atau kelompoknya. Hal ini membuat kita rentan membagikan konten yang sesuai dengan pandangan kita, sekalipun konten tersebut hoax.

Jika Anda membaca berita yang betul-betul secara sempurna mengukuhkan keyakinan Anda, Anda harus lebih berhati-hati dan tidak buru-buru memencet tombol share.

4. Orang mengukur legitimasi konten dari berita terkaitSebuah berita belum tentu bukan hoax hanya karena Anda melihat konten terkait di media sosial. Jangan buru-buru menyimpulkan lalu ikut membagikannya. Kadang-kadang, hoax memang diolah dari berita media terpercaya, hanya saja isinya sudah diplintir.

5. Makin sering orang melihat sebuah konten, makin mudah mereka mempercayainyaHanya karena banyak teman-teman Anda share berita tertentu, bukan berarti berita tersebut pasti benar. Alih-alih langsung mempercayai dan membagikannya, Anda bisa mencegah ikut ramai-ramai termakan hoax dengan melakukan pengecekan lebih lanj

sumber : https://news.detik.com/advertorial-news-block/3716300/cara-cerdas-mencegah-penyebaran-hoax-di-media-sosial