[Vb6] Mengetahui Serial ID Cpu

Private Function CpuId() As String Dim computer As String Dim wmi As Variant Dim processors As Variant Dim cpu As Variant Dim cpu_ids As String     computer = "."     Set wmi = GetObject("winmgmts:" & _         "{impersonationLevel=impersonate}!\\" &...

Read More

[Vb6] Menghitung Jumlah Click Pada Button

Untuk mengetahui Jumlah Klik pada Tombol Masukan Kode Ini.. Private sub Command1_Click() dim klik as integer klik= klik+1 if klik = 3 then msgbox "Tombol Telah Di Klik 3 kali" end if Download Proj...

Read More

[Vb6] Filter Adodc dan Datagrid

Masukan kode ini di bawah ini fungsinya untuk menampilkan text yang di masukan di text box dan hanya itu saja yang keluar ... If Adodc1.Recordset.RecordCount <> 0 Then Adodc1.Recordset.Filter = "Fieldnya '*" & txtcari.Text & "*'" Else MsgBox "Data tidak Ada!!", vbExclamation End...

Read More

[VB6] Menghitung jumlah item pada listview

  Buat 1 buah command button dan masukan kode di bawah untuk menghitung jumlah item yang ada pada listview Private Sub Command1_Click() Dim i As Integer Dim Jumlah as string For i = 1 To ListView1.ListItems.Count '- 1 Jumlah = (ListView1.ListItems(i).Index) ...

Read More

3ds Max Membuat Objeck Bercahaya/Glow

Sudah Lama ngk update postingan 3ds max kali ini saya akan memberikan tutorial 3ds max secara gratis ,tutorial kali ini adalah membuat objeck bercahaya atau glow oke langsung aja ke tutorialnya >>Cekidot>> Klik Pada tab Create>>Geometry>>Standart...

Read More

Mengatasi masalah Komputer tetapi layar tidak tampil

Langkah pertama cek Memory. Memory mempunyai pengaruh yang besar terhadap kinerja suatu komputer, dari awal komputer hidup sudah membutuhkan memory. Sesuai pengalaman saya memperbaiki komputer, ini disebabkan oleh memory yang rusak. Setelah ganti...

Read More

Cara membuat tv jadi lcd Komputer

Nama Alatnya adalah VGA TO RCAAlat ini berguna Meng-convert dari port VGA komputer/laptop ke port RCA ...

Read More