This is default featured slide 1 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 2 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 3 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 4 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 5 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

Kamis, 04 Desember 2014

10 Programmer Termuda di Dunia

 1. Nick D'Aloisio



Di usianya yang baru 15 tahun, Nick D’Aloisio menciptakanTRIMIT yaitu sebuah aplikasi iOS yang dapat meringkas konten web agar lebih singkat untuk digunakan di berbagai media sosial seperti Twitter, Facebook, dan Tumblr.

Fast Company menarik D’Aloisio selama satu bulan untuk mengembangkan penelitian mengenai aplikasi alogaritma. Biasanya jenis penelitian yang memakan jutaan dolar ini dilakukan untuk program Magister (S2) dan Doktoral (S3).

2. Thomas Suarez

Thomas Suerez, ilmuwan berusia 12 tahun ini mengaku, saatini banyak anak-anak yang tidak hanya senang bermain game, tetapi mereka juga senang menciptakan gam untuk mereka sendiri.

Itulah, yang selama ini kerap dilakukan Suerez. Bukan hanyaitu, ia juga mendirikan perusahaannya sendiri, Carrot Corp dan sudah menciptakan beberapa aplikasi iOS. Salah satu diantaranya adalah Earth Fortune, yang hanya menampilkan warna yang berbeda dari planet berdasarkan keberuntunganpemain.

Aplikasi ciptaannya yang paling sukses yaitu game yang menampilkan artis Justin Bieber di pertandingan Whac-a-Mole. Berkat kreativitasnya, ia memenangkan Tribeca Disruptive Innovation Award pada 2012 lalu.


3. Aaron Sonson, Satwant Singh, dan Gregory Paczkowski

Ketiga remaja ini menciptakan aplikasi “Stop & Go” yaitu aplikasi yang memungkinkan remaja untuk menceritakan pengalamannya yang pernah ditilang oleh polisi, menemukan informasi yang diperlukan tentang hak-hak merekam dan memungkinkan pengguna untuk memetakan pencarian yang mereka butuhkan.

Ide aplikasi ini berawal dari masing-masing remaja asal London ini yang pernah ditilang berkali-kali dan digeledah polisi. Mereka mengatakan di situsnya bahwa mereka menciptakan “Stop & Go” dengan harapan membawa transparansi dan keadilan dalam prosedur tersebut.

4. Steven Gonzalez Jr.

Ketika berusia 12 tahun Steven Gonzalez Jr. didiagnosis terkena penyakit Leukimia Myelogenous akut, yaitu salah satu penyakit kanker yang jarang mematikan. Dokter mengatakan bahwa ia hanya memiliki kesempatan hidup sebesar 2 persen. Tetapi, ia bisa mematahkan diagnosa dokter dan selamat, meskipun sistem kekebalan tubuhnya saat itu lemah. Sehingga memaksanya masuk ke dalam ruang isolasi selama 100 hari.

Setelah Gonzalez sembuh, ia ingin membantu pasien kanker lain seusianya, sehingga ia menciptakan game “Play Against Cancer”. Dalam game tersebut, pemain menghancurkan sel kanker yang digambarkan dengan hantuberwarna hijau. Selain itu, ia juga mengembangkan “The Survivor Games”, yaitu jaringan sosial dan komunitas online pasien kanker remaja.


5. Team 2 (Res-Q)

Aplikasi “Stop & Go” bukan hanya menjadi ide inovatif, tetapi juga menginspirasi Tim 2-the-Res-Q yang terdiri dari empat gadis remaja berusia 14 tahun. Mereka mengembangan “CyberMentors” yaitu aplikasi anti kekerasan yang berfokus kepada anak-anak muda untuk membangun harga diri dan meningkatkan keselamatan mereka yang menjadi korban kekerasan.

CyberMentors mencakup fitur pesan pribadi yang memungkinkan pengguna dapat berbicara dengan CyberMentor langsung mengenai pengalaman tentang kekerasan yang dialaminya.

Tim ini bekerja sama dengan Fuerte International yang merupakan sebuah lembaga produksi ponsel berbasis di London, untuk dapat mengembangkan aplikasi ini. CyberMentors tersedia di Google Play dan platform berbasis web sosial.

6. Daniel Chao

Tahun lalu, saat Daniel Chao duduk di kelas lima SD dan berusia 10 tahun, ia menemukan aplikasi yang dapat mencatat berapa banyak bacaan yang sudah dilakukan dalam satu bulan terakhir.

Oleh karena itu aplikasinya dinamakan iRead Monthly yang memungkinkan siswa dengan meng-klik tanggal tertentu dan masukkan berapa menit yang ia gunakan untuk membaca hari itu. Pada akhir bulan, siswa dapat mengirimkan laporan tersebut melalui e-mail ke guru mereka.

Chao mengemukakan kepada CBS Denver bahwa ia bangga dan senang aplikasinya tersebut diterima oleh Apple meskipun usiany masih sangat muda.


7. Zora Ball

Di usianya yang baru tujuh tahun, Zora Ball termasuk orang termuda untuk mengembangkan aplikasi mobile game. Saatitu ia ikut berpartisipasi sebagai salah satu peserta bahasa pemrograman di University of Pennsylvania's FATE BootstrapExpo pada Desember 2012 untuk kategori usia 12 sampai 16 tahun.

Menurut Tribune Philadelphia, programmer kelas pertama akan mampu mengkonfigurasi ulang aplikasi yang telah dibuatnya dan Zora berhasil sehingga membuktikan bahwa ia melakukan semua pekerjaan itu sendiri.

8. Lim Ding Wen

Pada 2009, ketika programmer asal Singapura berusia Sembilan tahun, Lim Ding Wen membuat aplikasi lukisan virtual untuk dinikmati oleh adik-adiknya. Aplikasi ini dinamakan Doodle Kids dan telah mendapat persetujuan dariApple. Doodle Kids menggunakan gerakan sederhana yaitu meniru gambar yang sudah ada.

Lim yang sudah fasih dalam enam bahasa pemrograman telah menyelesaikan puluhan proyek. Pada Agustus 2012, ia mengerjakan dua proyek baru, termasuk pertandingan 3D pertamanya.


9. Zach Marks

Ketika Zach Marks masih berusia 11 tahun, meminta didaftarkan Facebook dengan menggunakan umur orangtuanya. Karena Facebook memiliki batasan usia minimal 13 tahun. Setelah orangtuanya memarahinya, ia pun memutuskan untuk menciptakan jejaring sosial sendiri yang aman bagi anak seusianya disebut Grom Social.

Pada Desember 2012, USA Today melaporkan, situs Marks tersebut dilihat oleh 2000 pengunjung dengan sekitar 6000 halaman tampilan setiap harinya. Ini cukup mengesankan, mengingat Groom Social awalnya hanya dikenal dari mulut ke mulut saja.

Groom Social memiliki fitur yang berbeda, seperti “Gaming”, “Entertainment”, dan “Health & Fitness” serta memiliki forum yang berisikan anti terhadap kekerasan, penyalah gunaan obat-obatan, dan rokok.

10. Santiago Gonzalez

Di usianya yang saat itu baru 14 tahun, Santiago Gonzalez sudah menciptakan 15 aplikasi iOS yang menarik, termasuk game edukatif. Puzzle Slide Super, misalnya, yang memungkinkan pengguna mengatur ulang potongan foto pilihannya yang tercecer.

Selain itu, memungkinkan pengguna dapat bermain dengan teman dengan menggunakan “built-in voice chat”. Ada juga Space - Solar System, yang memungkinkan pengguna belajar lebih banyak lagi tentang tata surya.

Kejeniusan Gonzalez tidak hanya pada aplikasi yang ia ciptakan itu saja, tetapi juga pada bidang akademik. Di usianya yang baru menginjak 16 tahun ia sudah lulus kuliah. Bahkan ketika usia 17 tahun, ia mendapat gelar Master

Kamis, 27 November 2014

Mengubah Background Dan Font dengan Visual Basic 6.0





contoh diatas adalah output yang sudah di eksekusi, sangat sederhana bukan??( maaf sedikit ada coret-coretan D: ) nah berikutnya saya akan mulai mengajarkan pada kalian langkah-langkah yang harus dilakukan untuk membuat program seperti di atas.
  • untuk proses yang ke 1 seperti yang dapat kalian lihat saya memberikan beberapa urutan angka dari 1 s/d 4 , untuk langkah yg pertama buatlah sebuah textbox (ukuran dapat di sesuaikan dengan selera masing-masing).
  • untuk proses yg ke-2 adalah mengubah warna background menjadi dengan warna yg kita inginkan. buatlah sebuah frame terlebih dahulu untuk menempatkan beberapa optionButton. buatlah 2 buah Optionbutton di dalam frame tersebut. untuk pemberian sebuah judul yang tertera seperti gambar di atas kalian tinggal membuka properties dari setiap objek yg ada, kemudian akan tampil di sebelah kanan layar sebuah list properties , pilihlah bagian caption lalu ubahlah dengan nama yang anda inginkan.apabila sudah anda selesaikan pilihlah salah satu optionButton yang anda inginkan. pada contoh di atas saya memilih warna biru sehingga background yg ada pada form berubah menjadi warna biru, berikut adalah coding yang di butuhkan untuk mengubah warna background tersebut menjadi warna biru :
                       Form1.BackColor = vbBlue
                   
                      kata vbBlue tersebut adalah sebuah key untuk mengubah warna dari background tersebut, apabila anda menggantinya dengan nama vbYellow,green atau red maka secara otomatis background anda akan berubah sesuai dengan coding yang anda masukan tadi.
  •   untuk proses yang ke 3 sama halnya dengan proses yang ke 2 anda hanya perlu merubah isi dari objek yang ingin anda isi dengan coding tertentu. untuk merubah warna text yang ada pada textbox pada nomer 1 tersebut anda hanya perlu memberikan intruksi coding berikut ini.

                      Text1.ForeColor = vbGreen

seperti yang anda lihat diatas text yg berisi "nama saya david" berubah menjadi warna biru apabila anda memilih green dan itu akan berubah menjadi warna kuning apabila anda mengganti vbgreen  menjadi vbyellow.
  •  untuk proses yang ke 4 memang sedikit lebih sulit di bandingkan dengan proses yang sebelumnya, terutama untuk pengkodingan nya itu sendiri. pada contoh di atas saya tidak menggunakan optionButton melainkan menggunakan checkBox . sama halnya dengan proses yang kedua dan ketiga anda hanya perlu menambahkan sebuah frame untuk meletakan checkBox di dalamnya dan perbedaan nya hanya terletak pada coding yang akan menghasilkan output seperti gambar di atas. pada textbox diatas tampilan huruf berubah menjadi italic/miring serta memiliki underline di bawanya. berikut adalah coding untuk membentuk tulisan yang ada pada textbox menjadi miring/italic dan memiliki underline :
Italic :
Else
If Check2.Value = 0 Then
Text1.FontItalic = False
End If
End If


underline :
If Check2.Value = 1 Then
Text1.FontUnderline = True
Else
If Check1.Value = 0 Then
Text1.FontUnderline = False
End If
End If

If Check1.Value = 1 Then
Text1.FontItalic = True

Cara membuat animasi text seperti diketik di visual basic 6.0




Berikut adalah tutorial membuat label atau text dalam vb 6 menjadi seolah diketik
      Pertama buka visual basic 6.0
      Pilih standar.exe
      Masukan 3 buah komponen berikut
      Label
    Timer dgn property è enabled = false, interval = 300
    Command buton dgn property è caption = mainkan
     Masukkan listing berikut
Private Sub Command1_Click()
If Command1.Caption = "mainkan" Then
    Timer1.Enabled = True
    Command1.Caption = "Stop"
Else
    Timer1.Enabled = False
    Command1.Caption = "mainkan"
End If
End Sub
Private Sub Form_Load()
Label1.Caption = "S"
End Sub
Private Sub Timer1_Timer()
Select Case Label1
    Case "S"
    Label1.Caption = "UP"
    Case "UP"
    Label1.Caption = "RI"
    Case "RI"
    Label1.Caption = "AN"
    Case "AN"
    Label1.Caption = "TO"
    Case "TO"
    Label1.Caption = "SUPRIANT"
    Case "SUPRIANT"
    Label1.Caption = "SUPRIANTO"
    Case "SUPRIANTO"
    Label1.Caption = "S"
   
End Select
End Sub
 


Rabu, 26 November 2014

Cara Membuat Form Login Password Dengan VB 6.0



Sebelum ke pokok pembahasan saya akan menjelaskan sedikit tentang Visual Basic 6.0, Visual Basic adalah salah satu bahasa pemrograman komputer. Bahasa pemrograman Visual Basic, dikembangkan oleh Microsoft sejak 1991, yang kemudian terus dirilis sesuai dengan tuntutan perkembanganya yang hingga kini muncullah Visual Basic versi 6.0 merupakan produk rilis di akhir tahun 1998.
Langsung saja kita ke cara membuat Form Login Password Dengan VB 6.0

Langkah - Langkah :
1. Buat project baru dengan  memilih Standart EXE pada New Project.
2. Isikan pada objek form tersebut beberapa objek seperti yang terlihat pada gambar dibawah ini :








3. Atur properti dari masing - masing objek diatas seperti tabel dibawah ini :
Nama Objek
Properti
Nilai
Label1
Name
Caption
Font
Label1
User Name
Font : Comic Sans MS
Font Style : Bold
Size : 12
Label2
Name
Caption
Font
Label1
Password
Font : Comic Sans MS
Font Style : Bold
Size : 12
Text1
Name
Text
Text1
Tulisan Text 1 di hapus
Text2
Name
Text
PasswordChar
Text2
Tulisan Text2 di hapus
*
Command1
Name
Command1

4. jika mau tambahkan kode untuk mentransparantkan form biar lebih keren lagi.
5.  Jika isi username adalah LABKOM dan password adalah siswa, lalu tombol ok ditekan maka akan menampilkan kotak pesan (MsgBox) "Selamat Datang di Lab Komputer"
6. Jika username / passwordnya salah, lalu tombol ok ditekan maka akan menampilkan kotak pesan (MsgBox) " Password Anda Salah, Silahkan Coba Lagi.!"
7. Setelah memasukan username lalu ingin memasukan lagi di password, biasanya kita menekan mouse/ tombol tab, sekarang buatlah dengan menggunakan tombol enter.


Saatnya ngoprek - ngoprek Codingan:

Option Explicit

Private Const WS_EX_LAYERED = &H80000
Private Const GWL_EXSTYLE = (-20)
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2

Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crColor As Long, ByVal nAlpha As Byte, ByVal dwFlags As Long) As Long


Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function GetMenuItemCount Lib "user32" (ByVal hMenu As Long) As Long
Private Declare Function DrawMenuBar Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Const MF_BYPOSITION = &H400&
Private Const MF_REMOVE = &H1000&

Private Sub Command1_Click()
If Me.Text1.Text = "LABKOM" And Me.Text2.Text = "siswa" Then
MsgBox ("Selamat datang di Lab Komputer"), , "Benar "
Else
MsgBox ("Password Anda Salah, Silahkan Coba Lagi !"), , "Salah"
Exit Sub
End If
End Sub

Private Sub Form_Load()
Call SetWindowLong(Me.hwnd, GWL_EXSTYLE, GetWindowLong(Me.hwnd, GWL_EXSTYLE) Or WS_EX_LAYERED)
Call SetLayeredWindowAttributes(Me.hwnd, RGB(255, 0, 255), 128, LWA_ALPHA Or LWA_COLORKEY)
Me.Text1.Text = ""
Me.Text2.Text = ""
End Sub

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


Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
Command1.SetFocus
End If
End Sub