Matrik for VB + .NET

Beberapa hari menghayalkan bagaimana memanipulasi matrik di pemrograman VB. Kebingungan karna data matrik buanyak dan stiap elemen sangat penting. Saya mulai dari VB6 , saat itu saya coba manfaatkan componen Listview, komponen ini cukup membantu sampe berhasil. Kemampuan listview seperti tabel saya perumpamakan seperti matrik yang sama2 memiliki kolom dan baris. horeeeeee....

Belum puas dengan itu saya coba buat pada VB.NET, kali ini saya buka-buka buku. hasilnya wah, di .NET sangat memudahkan untuk operasi matrik. Disini sudah support untuk manipulas maupun sorting matrik. wah semakin seneng...

Berikut saya posting contoh pembuatan matrik di vb.NET (Pocket PC). Sebelumnya harus diingat bahwa pada bahasa pemrograman matrik diimplementasikan dengan array .

• Pendeklarasian array satu dimensi

Dim namaarray(10) as tipedata

• Pendeklarasian array multidimensi. Pembuatan array ini dengan komponen baris dan kolom.

Dim namaarray(10,5 ) as tipedata -> berarti membuat array dengan 10 baris dan 5 kolom.

• Pemberian nilai pada array multidimensi
  

Pada kolom 1:
namaarray(0, 0) = "163"
namaarray(1, 0) = "170"
namaarray(2, 0) = "172"
namaarray(3, 0) = "166"
namaarray(4, 0) = "167"
namaarray(5, 0) = "168"
namaarray(6, 0) = "173"
namaarray(7, 0) = "168"

Pada Kolom 2
namaarray(0, 1) = "163"
namaarray(1, 1) = "170"
namaarray(2, 1) = "172"
namaarray(3, 1) = "166"
namaarray(4, 1) = "167"
namaarray(5, 1) = "168"
namaarray(6, 1) = "173"
namaarray(7, 1) = "168"

Begitu seterusnya untuk kolom2 selanjutnya dan jumlah baris sesuai deklarasi awal.Perlu diingat diketahui perbedaan array pada VB6 dan .Net adalah kalau di VB 6 kita bisa mengatur nilai awal array misalnya namaarray(1 to 10), sedangkan pada .NET selalu diawali dengan 0 (Nol).

Terimakasih, Semoga bisa jadi bahan inspirasi

[ ... ]

combo Trik

setelah beberapa saat buka2 direktori kerja, saya menemukan file ini. File yang saya buat waktu membantu menyelesaikan permasalah seorang temen dengan combo. Dari pada lumutan di dalam direktori saya posting disini aja ya...
Ini contoh trik combo, tinggal di edit sedikit dan bisa digunakan sesuai keinginan anda.

"sebelumnya sediakan 2 combobox di form anda. copy paste deh..

Private Sub Form_Load()
Dim i As Integer
For i = 1 To Screen.FontCount
Me.Combo1.AddItem Screen.Fonts(i)
Me.Combo2.AddItem Screen.Fonts(i)
Next i
End Sub


'+++++++++++ Coding combo2

Private Sub Combo1_Change()
Dim item As Integer, count As Integer

'deteksi jumlah item di combo
count = Me.Combo1.ListCount - 1

For item = 0 To count
'jika huruf awal = huruf awal item
If LCase$(Me.Combo1.Text) = Left$(LCase(Me.Combo1.List(item)), Len(LCase(Combo1.Text))) Then
'menetapkan isi terpilih
Me.Combo1.ListIndex = item
Exit For
End If
Next item

SendKeys "{F4}"

End Sub


Private Sub Combo1_GotFocus()
SendKeys "{F4}"
End Sub


'+++++++++++ Coding combo2
Private Sub Combo2_GotFocus()
SendKeys "{F4}"
End Sub

[ ... ]

shutdown timer {vb.6}

Sebenarnya script ini sudah banyak tersebar dimana-mana, baik buku ataupun di forum. Bagi saudara yang belum sempat menemukannya, ini code untuk membuat komputer shutdown. Dengan sedikit sentuhan componen timer anda sudah bisa membuat aplikasi shutdown timer sendiri. Semoga bisa menjadi sumber inspirasi untuk project selanjutnya.

Sebelumnya anda cukup menyediakan 1 textbox, 1 command dan 1 timer pada form anda lalu copy paste code berikut. Selamat mencoba

'code textbox

Private Sub Text1_KeyPress(KeyAscii As Integer)
On Error GoTo pesan

If KeyAscii = 13 Then

If Text1.Text = "0" Or Text1.Text < interval =" 60000" enabled =" False">

'code timer
Private Sub Timer1_Timer()
If Text1.Text = 0 Then
Shell ("shutdown -s -f -t 0")
Else
Text1.Text = Text1.Text - 1
End If
End Sub
'code command
Private Sub Command1_Click()
Timer1.Interval = 0
Text1.Enabled = True
Text1.Text = "min"
End Sub

[ ... ]

Sekuriti FORM VB 6.0

Dilihat dari judul mungkin akan sangat aneh, tapi cobalah baca dengan seksama agar memahami :
Perlu diketahui dengan Visual Basic kita bisa melakukan hal yang baik, atau sangat merugikan. Form pada VB bisa kita buat agar tidak tertutup ketika form dijalankan. Proteksi Form VB bisa dilakukan dengan memanfaatkan event unload Form. Berdasarkan siklus hidupnya event ini dijalankan sebelum alokasi memori dibersihkan. Artinya masih ada kesempatan kita untuk mencegah hal tersebut terjadi yaitu dengan cara memberikan nilai 1 pada argumen cancel. Berikut lebih jelasnya.

Private blnStatus As Boolean

Private Sub cmdOK_Click()

If (Me.Text1.Text = "cookie") Then

blnStatus = True

Unload Me

Else

blnStatus = False

MsgBox "Untuk menutup form ini silakan isikan nama cookie", vbCritical, "cookie"

End If

End Sub

--

Private Sub Form_Unload(Cancel As Integer)

If Not blnStatus Then

Cancel = 1

Call cmdOK_Click

End If

End Sub

Dengan code diatas sudah dipastikan penutupan form dengan (kontrol X) ataupun dengan kombinasi Alt-F4 tidak akan berhasil!! Tetapi sangat mudah bagi TaskManager dengan “Hak Istimewanya” untuk membunuh/ menutup form anda. Perlu diketahui di Visual Basic ada tersimpan trik bagi anda untuk menghidari “hak istimewa” tersebut.

Nah, sudah mengerti dengan judul diatas??? Jangan-jangan belum neh??
Jadi code ini bisa dipakai untuk mambuat program untuk kebaikan sekuriti atau bisa anda gunakan untuk berbuat hal yang merugikan,…begitu lho…. Capekk dech…

[ ... ]

Clear CMD di JAVA

Di dunia pemrograman tentulah banyak yang mengenal java. Bahasa ini cukup di minati untuk dipelajari. Karna sifatnya yang open source dan multiplatform bahasa ini menjadi sangat besar. Sampai-sampai di kembangkan untuk banyak aplikasi, example : JSP, Applet dsb..
Saya orang yang sedang ingin tau bagaimana sebenarnya bahasa java itu, walau saya hanya belajar bagian program command atau klo boleh di bilang itu paling sederhana di J2SE, tapi saya menemukan beberapa yang menjadi pertanyaan..

Simple sekali sebenernya, bagi programer java tentulah tau bahwa program java di compile dan di jalan kan di CMD. Sekali lagi ini hanya program yang berjalan di Command promt ato sebut saja program paling sederhana dan tanpa GUI. Pertanyaan yg timbul bagaimana cara atau perintah untuk membersihkan layar commandPromt (tampilan) program itu sendiri??? Seperti kita ketahui bahwa perintah untuk membersihkan di cmd windows adalah cls dan cmd di Linux adalah clear.

Sebelumnya kita review tentang sejarah adanya bahasa java. Bahwa bahasa ini dikembangkan dari bahasa C . nah di bahasa C sendiri memiliki perintah untuk membersihkan layar yaitu clrscr. Kenapa di java sendiri setelah yang dikembangkan dari C malah saya belum menemukan perintahnya, padahal hal ini merupakan bagian kecil dari bahasa java yang sudah sangat besar.

nah gimana ini??????
hmmm... ini entah saya yang belum nemu, atau saya belum berusaha mencari atau apa ya..

[ ... ]

shutdown timer {vb.6}

Sebenarnya script ini sudah banyak tersebar dimana-mana, baik buku ataupun di forum. Bagi saudara yang belum sempat menemukannya, ini code untuk membuat komputer shutdown. Dengan sedikit sentuhan componen timer anda sudah bisa membuat aplikasi shutdown timer sendiri. Semoga bisa menjadi sumber inspirasi untuk project selanjutnya.

Sebelumnya anda cukup menyediakan 1 textbox, 1 command dan 1 timer pada form anda lalu copy paste code berikut. Selamat mencoba

'code textbox

Private Sub Text1_KeyPress(KeyAscii As Integer)
On Error GoTo pesan

If KeyAscii = 13 Then

If Text1.Text = "0" Or Text1.Text < interval =" 60000" enabled =" False">

'code timer
Private Sub Timer1_Timer()
If Text1.Text = 0 Then
Shell ("shutdown -s -f -t 0")
Else
Text1.Text = Text1.Text - 1
End If
End Sub
'code command
Private Sub Command1_Click()
Timer1.Interval = 0
Text1.Enabled = True
Text1.Text = "min"
End Sub

[ ... ]