Ingat Catatan
Ingat Catatan adalah: catatan tentang apa saja yang dapat mengingatkan kembali. Ingat yang telah di pelajari dan yang telah dibaca. Dengan Catatan ini Semoga bisa membantu untuk ingat kembali catatan yang telah dibuat.
CEK ONGKOS KIRIM
Friday, November 14, 2014
Cara mudah download video youtube
Thursday, October 23, 2014
Ukuran sepatu
Kembali ke sepatu, bila kita belanja online, untuk ukuran harus kita tahu untuk ukuran kita, sebab kita tidak bisa mencobanya dahulu :D
Ini ada data ukuran sepatu. Mudah-mudahan bisa membantu bagi yang suka belanja online.
SEPATU UNTUK PRIA
Size 38 panjang 24 cm lingkar kaki 23 cm
Size 39 panjang 24,5 cm lingkar kaki 23,5 cm
Size 40 panjang 25 cm lingkar kaki 24 cm
Size 41 panjang 25,5 cm lingkar kaki 24,5 cm
Size 42 panjang 26 cm lingkar kaki 25 cm
Size 43 panjang 26,5 cm lingkar kaki 25,5 cm
SEPATU UNTUK WANITA
Size 36 panjang 22,5 cm lingkar kaki 21 cm
Size 37 panjang 23 cm lingkar kaki 21,5 cm
Size 38 panjang 23,5 cm lingkar kaki 22 cm
Size 39 panjang 24 cm lingkar kaki 22,5 cm
Size 40 panjang 24,5 cm lingkar kaki 23 cm
Jangan lupa kunjungi toko kang kun di tokopedia
Saturday, December 11, 2010
Memahami Class
Apa yang di maksud dengan class? Class adalah blueprint dari object, dengan kata lain object akan tercipta mengikuti class yang dibuat. Jadi sebelum object ada tentunya harus ada class dahulu. tidak akan ada object apabila class tidak ada. Mengapa memakai class? sebab dengan membuat class program akan lebih mudah maintenancenya disamping itu class bisa dipakai kembali, sehingga mempersingkat penulisan code.
Contoh class dalam kehidupan sehari-hari: cetakan kue adalah class, sementara objectnya adalah kue dan kue tersebut akan mengikuti bentuk dari cetakan.
contoh sederhana, class customer. Misalnya class tersebut dibuat dengan memiliki property Nama Customer, Alamat Customer, dan Telp Customer. Jadi setiap kali membuat object dari class tersebut maka object tersebut pasti memiliki property Nama, Alamat dan telp.
Bagi yang baru memahami class mungkin akan sulit, tapi seiring berjalannya waktu akan banyak sekali manfaatnya bila sudah benar-benar paham akan class
Selengkapnya...
Saturday, December 4, 2010
Tombol banyak menggunakan index
Membangun software yang banyak menggunakan tombol. Pemakaian property index pada CommandButton tentunya akan sangat membantu sekali.
Artikel ini ditulis untuk catatan dan bisa mengingatkan kembali, lebih bersyukur lagi bila ada manfaatnya bagi pemula yang sedang mencari artikel visual basic 6 atau sedang belajar VB6.
property index dalam CommandButton bisa dimanfaatkan untuk meringkas penulisan code, tentu saja ini sangat membantu karena penulisan kode akan menjadi singkat. Ini ada pengaruhnya bila program di compile, setidaknya walaupun tidak banyak, akan memperkecil ukuran file exe yang dihasilkan nantinya.
untuk memanfaatkan property index pada CommandButton :
1. Buka VB6 klik StandardExe, pilih open
2. dobel klik label pada toolbox yang berada sebelah kiri
3. dobel klik commandbutton, copy command1, paste command1, Do you want to create a control array?, Click Yes
4. paste kembali sebanyak yang disukai
5. klik kanan pada form1, pilih view code
6. copykan, kode dibawah ini
'---code
Private Sub Command1_Click(Index As Integer)
'Tulis kode disini dengan mengunakan
'Pencabangan select case atau elseif untuk setiap index yang terpilih
With Label1
.Caption = "Anda memilih index : " & Index
.FontSize = 14
.Width = Me.Width
End With
End Sub
'--- end code
Selengkapnya...
Thursday, December 2, 2010
Caption Tombol otomatis berubah tiap di klik
Dalam mendevelop software, kadang kala perlu untuk merubah caption commandbutton, sehingga bisa dipakai untuk dua perintah. misal user akan tekan tombol edit data dan pada saat selesai edit data tentunya user akan mencari tombol simpan untuk untuk menyimpan perubahan data.
Itu semua bisa dilakukan dalam satu commandbutton dimana pada saat user klik pada commandbutton tersebut, commandbutton akan segera mengganti caption dan bila di klik kembali commandbutton akan segera mengganti ke semula
Untuk prosesnya sangat sederhana, disini digunakan variabel tipe data boolean dimana nilainya kalau bukan true pasti false. jadi pada Saat setiap tombol diklik variabel tersebut akan segera di rubah
1. Buka visual basic 6 atau VB6, pilih StandardEXE lalu klik tombol open
2. pada toolbox dobel klik command button
3. klik kanan pada form1, pilih view code, lalu copykan code di bawah ini
'--- kode
Dim pilih As Boolean
Private Sub Command1_Click()
pilih = Not pilih
If pilih Then
Command1.Caption = " Edit data"
Else
Command1.Caption = "Simpan"
End If
End Sub
'--- end code
untuk menjalankannya
1. tekan tombol F5, lalu klik tombol command1 lihat apa yang terjadi bila di klik kembali
Selengkapnya...
Tuesday, November 30, 2010
Membuat Kotak daftar atau listbox
Pada saat buat blgroll tentunya data akan bertambah banyak dengan seiring berjalannya waktu. Untuk itu bisa memakai kotak daftar, sehingga bisa mengemat tempat dan bagus dilihat. Bisa dibayangkan bila tidak memakai Kotak Daftar tentu akan sangat panjang berderet kebawah.
Kotak daftar atau listbox bisa dipakai untuk blogroll. kode dibawah adalah untuk membuat kotak daftar atau listbox langkahnya :
<div style = "border: 1px solid rgb(153, 153, 153);
overflow: auto;
width: 225px;
height: 225px;
text-align: left; ">
<a href = "http://ingat-catatan.blogspot.com/" target = blank> Ingat Catatan</a><br />
</div>
untuk width, height dan text-align disesuaikan dengan letak isi dan ukuran listbox. link http://ingat-catatan.blogspot.com hanya sekedar contoh
Selengkapnya...
Monday, November 29, 2010
Pemakaian Koleksi pada VB6
ingat Langkahnya adalah :
1. Buka VB6. Pada New File pilih StandardExe lalu klik OK
2. tambahkan textBox pada form1
3. tambahkan commandButton pada form1
4. klik kanan pada form1 pilih View code
Copykan Kode catatan dibawah ini:
'---code
Dim Kol As New Collection
Dim a
Private Sub Command1_Click()
On Error GoTo Euweuh
a = Kol.Item(Text1.Text)
MsgBox Text1.Text & " adalah kunci sedang " & a & " adalah Data yang dipanggil "
Text1.Text = ""
Exit Sub
Euweuh:
Text1.Text = ""
MsgBox "Data tidak ditemukan, silahkan tambah data"
End Sub
Private Sub Form_Load()
'Pengisian data pada Koleksi
Text1.Text = ""
With Kol
.Add "Merah Putih", "MP" ' "Merah Putih" adalah data, "MP" adalah key
.Add "Siang Malam", "SM"
.Add "Tanam Pohon", "TP"
End With
End Sub
'--- end code
untuk menjalankannya:
1. tekan tombol F5
2. pada textbox masukan MP atau SM atau TP atau apa saja
3. tekan tombol Command1 Selengkapnya...