http://newscomputers.co.nr/

Code:

Private Sub cmdcari_Click()
If txtcari3.Text = "" Then
MsgBox "NRP Tidak boleh kosong", vbCritical, salah
txtcari3.SetFocus
Else
Set rs = New ADODB.Recordset
   
rs.Open "SELECT * FROM Mahasiswa WHERE NRP ='" + txtcari3.Text + "'", con
 ...

[ Full reading ]

Aplikasi ini sebuah program untuk merandom pemain putsal
mau tau lebih lengkap download programnya

Code:


Function RandomChar() As String
    Dim Char As Integer
    Char = Int((5) * Rnd + 1)
    If Char = 1 Then RandomChar = Form2.Text1: Exit Function
    If C...

[ Full reading ]

Code:

#include <conio.h>
#include <stdio.h>
#include <iostream.h>
#include <string.h>


void insertDepan (int databaru);
void hapusDepan();
void tampil();
void clear();



struct List
{
 int data;
 List *next;
 List *prev;
};
...

[ Full reading ]

Code:

Private Sub Form_Load()

x = App.Path & "\buku.txt"
Open x For Input As #2
While Not EOF(2)

Input #2, kode
Input #2, buku
Input #2, stock

cmbkode.AddItem kode
Wend

Close #2
End Sub

Private Sub txtnrp_keypress(keyascii As Integer)

If keyascii = 13 Th...

[ Full reading ]

Code:

Function RandomChar() As String
    Dim Char As Integer
    If Char = 1 Then RandomChar = Form2.Text1: Exit Function
    If Char = 2 Then RandomChar = Form2.Text2: Exit Function
    If Char = 3 Then RandomChar = Form2.Text3: Exit Function
    If Char = 4 Then RandomChar = For...

[ Full reading ]

Code:

/* Nama  : Hanafi Sukawa Ginting
  Kelas : 1 TI - 8
  NRP  : 6309249
*/


#include <iostream.h>
#include <conio.h>
#include <string.h>

class linklist
{
    private:

        struct node
        {
          int data;
          char nama[30 ...

[ Full reading ]

Aplikasi ini adalah sebuah program pengolah data penjualan pulsa yang hasilnya di simpan langsung ke database acces adapun aplikasi pendukung anda harus instal vb6 dan MS office 2007



Gunakan Register
User : Admin
Passowd : 12345

setelah anda login anda bisa buat User baru

ing...

[ Full reading ]