Kamis, 27 Oktober 2011

Lowongan Programmer VB dot Net

Lowongan Programmer


Kami, PT Meitan-X Technology adalah sebuah perusahaan yang bergerak dalam bidang Automation, Electronic, Telecomunication, Information Technology, saat ini sedang membuka peluang bagi para programmer yang ingin bergabung di perusahaan kami.

Dengan kriteria sebagai berikut :

.Pendidikan minimal D3 Infomation Technology (IT) atau yang terkait.
.Menguasai paling tidak satu diantara bahasa pemrogramman berikut (VB 6.0, VB.Net).
.Menguasai paling tidak satu diantara penggunaan database berikut (MySQL,MS-SQL Server, PostgreSQL).
.Bersedia bekerja berdasarkan schedule.
.Dapat bekerja sama dengan team.
.Bertanggung jawab.
.Tidak mudah putus asa atau memiliki motivasi yang tinggi.
.Berkelakuan baik.
.Fresh Graduate, welcome.





Kirimkan CV anda by e-mail ke rec_programmer@yahoo.com.


Thanks and Best Regards.

Kamis, 02 September 2010

Membuat ListView Berwarna di VB 6.0

Membuat sebuah program sama halnya dengan melukis, bagaimana membuat orang yang melihat program yang kita buat dapat tertarik secara visual kemudian tertarik secara fungsi.
Saya akan contohkan penggunaan ListView Berwarna. Sudah banyak yang memberi contoh di situs2 terkemuka baik di indonesia maupun milik orang "asing" , tetapi ilmu tetaplah ilmu, saya merasa kurang klo belum membagikannya pada rekan2 programmer.

Contoh ListView nanti :














Source Code :

'Buatlah form baru
'Klik Project-->components-->Microsoft Windows Commont control 6.0 (SP6)
'Perhatikan kotak Toolbox, pilih ListView
'Perhatikan kotak Toolbox, pilih Picture
'Buat Sub seperti dibawah ini,
'Klo ingin menggunakan tinggal memanggil sub tersebut.

Private Sub color(Color1 As OLE_COLOR, Color2 As OLE_COLOR)
    If ListView.ListItems.Count > 0 Then
        ListView.PictureAlignment = lvwTile
        Picture.Width = ListView.Width
        Picture.AutoRedraw = True
        Picture.Height = 2 * ListView.ListItems(1).Height + 30
        Picture.Line (0, 0)-(Picture.ScaleWidth, (Picture.Height)), Color1, BF
        Picture.Line (0, (Picture.Height - (Picture.Height / 2)))-(Picture.ScaleWidth, (Picture.Height)), Color2, BF
        Set ListView.Picture = Picture.Image
    end if
End Sub

Private Sub Form_Load()
    call color (&H00FFFFFF& , &H00C0E0FF&)
End Sub

Semoga Bermanfaat.

Rabu, 01 September 2010

Aplikasi Bel Sekolah

Mungkin klo jaman dulu di sekolah kita klo waktu jam masuk, istirahat ataupun jam pulang selalu menggunakan besi yang di pukul,,, tetapi klo sekarang kayaknya klo kita tetap menggunakan sistem seperti itu agak kuno... hehe,,
saya ada aplikasi yang saya buat mengenai bel sekolah ini... 

Tampilan form menu.















Tampilan form ketika kita klik menu pengguna.















Tampilan ketika kita klik menu pengaturan.















Tampilan form pengaturan khusus.















Tampilan form setting jam bel berbunyi.















Tampilan setting musik/ bunyi.















semoga bermanfaat..

Selasa, 31 Agustus 2010