"TEKNIK INFORMATIKA-09"

.
Diberdayakan oleh Blogger.

Cara Melacak Teman yang Memutus Hubungan di Facebook

Selama ini pengguna Facebook tidak pernah tahu, siapa teman Facebook yang menghapus akun Facebok-nya dari daftar teman.
Mark Zuckerberg sebagai pendiri Facebook memang tidak membangun aplikasi untuk mengetahui hal ini. Tapi, kini pengguna Facebook bisa mengetahui siapa yang menghapusnya dari daftar teman, dengan menggunakan aplikasi.

Nama aplikasi tersebut adalah "Unfriends Finder". Aplikasi ini tidak dibangun secara resmi oleh teknisi Facebook, sehingga Anda harus men-download terlebih dahulu.
Setelah Anda men-download aplikasi ini, maka akan muncul tulisan "Unfriends" di kanan atas. Dalam tampilan normal, kanan atas Facebook hanya terdiri dari tulisan nama akun Anda dan Home. Nantinya setelah men-download aplikasi ini, akan ada tiga kolom, yakni nama akun Anda, tulisan Home, dan tulisan "Unfriends".

6 Cara Mengatasi Komputer Hang


Cara Mengatasi Komputer Hang . bagaimana Cara Mengatasi Komputer Hang dengan mudah dan cepat, tips trik dan solusi untuk mengatasi komputer yang sering hang.

1. OS yang Rusak Langkah yang efektif untuk OS rusak atau bermasalah adalah reinstall OS tapi alangkah baiknya bila kita tahu pasti masalah pada OS kita selesaikan permaslah tersebut, entah itu masalah crash dengan software atau terinfeksi virus.

2. RAM yang bermasalah
permaslaahan ram sering kali ada pada kaki / soket tembaga yang kotor, bersihkan kaki tembaga dengan cara di gosok menggunakan penghapus pensil supaya kotoran yang menempel bisa hilang.

3. Hardisk yang tua atau cacat
untuk hardisk yang tua atau yang bermasalah sebaiknya partisi ulang atau Format FULL, tapi untuk hardisk cacat (baru) sebaiknya segera di tukarkan sebelum masa garansi habis.

Cara Melacak Lokasi NO Hp

Untuk Trik Melacak Lokasi Nomor HP orang lain atau temen kita inilah caranya gak sulit kok sobat, ini cara khusus buat sobat yang mau tinggal ikuti aja caranya untuk mendapatkan no hp target.

Tugas UAS VB.Net Koneksi SQL Server


Aplikasi Cuti Mahasiswa

1.Form Login

Public Class Form_Login
    Public database As New OleDb.OleDbConnection
    Public a As New OleDb.OleDbCommand
    Public b As OleDb.OleDbDataReader
    Sub Kosong()
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox1.Focus()
    End Sub
    Sub netral()
        Button1.Text = "LOGIN"
        Button2.Text = "BATAL"
        Button1.Enabled = True
        Button2.Enabled = True
        TextBox1.Enabled = True
    End Sub

Tugas UTS VB.Net


 Aplikasi Cuti Mahasiswa

1.Form Aplikasi


Public Class Form_Aplikasi

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Form_Cuti_Mahasiswa.Show()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Form_Jurusan.Show()
    End Sub

VB.Net Pertemuan ke-6

Cara Penggunaan ListView
Buatlah Form seperti gambar dibawah ini:
Setelah itu masukan Source code dibawah ini:
Public Class Form1
    Dim isitext(4) As String
    Dim mListItem As ListViewItem

    Private Sub Form1_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        Call bersih()
        Call isiCombo()
        Call setTampilan()

    End Sub

VB.net Pertemuan ke-5

Penggunaan Module


Module Module1
    'variabel public
    Public nama As String, hasil, h, b As Integer
    Sub tampilnama()
        nama = "Teknik Informatika"
    End Sub
    Sub hitung()
        hasil = Val(h) * Val(b)

    End Sub

End Module

Cara Setting DNS Server pada linux opensuse (Tugas Jarkom 2)

Buka Yast Control Center

> Kemudian pilih Network Services / DNS Server
> Kemudian Pilih Tab Forwarders lalu pilih “Set Forwarders Manually”
> Pada Kolom IP Address ketikkan alamat DNS Forwarders
> Kemudian Klik Tombol Add
Contoh Seperti gambar dibawah ini:

Tugas VB.Net

Cara membuat fuzzle sederhana menggunakan VB.Net 

Buatlah form seperti dibawah ini.


Setelah selesai membuat form diatas,lalu masukanlah soure code seperti yang dibawah ini : 

Tugas VB.net Pertemuan ke-4



Public Class Form1

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged


End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As Integer
For x = 2 To Val(TextBox1.Text)
ListBox1.Items.Add(x)
ListBox1.Items.Add(" * " & x)

If x Mod 4 = 0 Then
Else
ListBox2.Items.Add(x)
End If

If x Mod 3 <> 2 Then
Else
ListBox3.Items.Add(x)
End If
Next

End Sub
End Class