Menghitung Usia dengan DateTimePicker VB.NET

Kondisi sepertin ini sering kita jumpai dalam setiap pmemograman yang kita buat, yaitu menghitung umur/usia secara otomatis agar tidak terjadi kekeliruan. kasus seperti ini harus di tangani oleh sistem agar hasil pencarian usia didapatkan dengan akurat tanpa ada selisih.

Menghitung umur pada kasus ini kita akan menggunakan satu buah datetimepicker dan satu buah textbox, sedangkan kondisi yang digunakan diletakkan pada datetimepicker_valuechanged (doubel klik pada datetimepicker). 

Artinya ketika datetimepicker dirubah maka textbox akan menghasilkan usia pada saat ini. Dengan cara ini kita dapat dengan mudah mendapatkan nilai usia pada saat ini tanpa menghitung secara menual. Banyak kasus yang memungkinkan cara ini dapat digunakan dalam pemograman sobat, contohnya seperti.

• Menghitung usia secara otomatis
• Notifikasi ualng tahun otomatis
• Pengingat usia atau kegiatan
• Membuat kondisi pada usia
• dan masih banyak kegunaan lainnya

Mari kita praktekkan cara sederhana ini pada visual studio sobat, buka form visual studio sobat dan tambahkan satu buah textbox dan satu buah datatimepicker yang ada pada toolbox visual studio sobat. Pada kali ini saya menggunakan Visual Studio .Net 2008.

Untuk lebih detile sobat bisa lihat gamabar diatas, doubel klik gambar diatas agar sobat bisa memperbesar tampilan detile form tersebut. Saya menggunakan satu buah textbox dan satu buah datetimepicker sebagai variabel yang akan di proses.

Setelah sobat selesai membuat form diatas, sobat doubel klik pada datetimepicker,dan masukkan script berikut ini

Setelah selesai memasukkan code diatas, maka sobat telah selesai membuat latihan kita pada kali ini, sobat tinggal menjalankan program sobat saja. Silahkan jalankan dan masukkan tanggal lahir shobat untuk menghitungnya. 

Demikian artikel ini kami buat seputar Menghitung Umur Dengan datetimepicker vb.net semoga bermanfaat untuk kita semua. jangan lupa berikan masukkan pada artikel ini, dan silahkan tuliskan pertanyaan di kolom komentar dibawah ini.

Agar Comboox tidak bisa diubah

Terkadang kita menggunakan Combobox sebagai logika atau kondisi pada sebuah aksi pemoggramman, dan mengharuskan sebuah combobox tidak bisa dirubah agar tidak menggangu sistem.

Ternyata cara ini sangat mudah dan sederhana, kita tinggal mengganti propertis pada combobox pada bagian DropDownStyle manjadi DropDownList. Maka setelah diganti combobox sobat tidak bisa tulis atau di isi dengan text ketika run. untuk lebih jelas perhatikan gambar berikut ini.

Demikian artikel Cara Agar Combobox Tidak Bisa di Edit, semoga bermanfaat dan bisa diterapkan dalam bahasa pemograman sobat semua, Heppy Coding. Jika ada pertanyaan silahkan tulis dikolom komentar.

Menjalankan Program Lain Dengan Aplikasi vb.net

Untuk menjalakan program lain dengan aplikasi vb.net kita bisa menggunakan fungsi yang disebut dengan “Process” dan "start methode"/

Dalam pemanggilan sebuah aplikasi terdapat dua cara, yaitu :
1. Ditulis secara jelas dimana suatu file exe itu berada, contoh : “C:\Program Files\Secure Time Attendance\SecureAttendanceRetrieve.exe”, atau
2. Memanggil process /XYZ.exe tersebut yang sudah terdapat dalam applikasi windows seperti halnya notepad, contoh : “notepad.exe”

Memulai Process

Dibawah ini adalah contoh dari cara menjalankan file .exe / process menggunakan Vb.net:

Contoh Pertama Menjalankan Program Lain Dalam Aplikasi vb.net:

Dim myProcess As New Process()
myProcess.StartInfo.FileName = “C:\Program Files\Secure Time Attendance\SecureAttendanceRetrieve.exe”
myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
myProcess.Start()

Contoh Kedua Menjalankan Program Lain Dalam Aplikasi vb.net:

Dim myProcess As New Process()
myProcess.StartInfo.FileName = “Notepad.exe”
myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Maximized
myProcess.Start()

Contoh Ketiga Menjalankan Program Lain Dalam Aplikasi vb.net:

dalam contoh ketiga ini adalah pemanggilan windows explorer dan default dari folder yang tertuju adalah sesuai dengan kriteria kita dan tampilan dari windows explorer sesuai dengan keinginan kita juga.

Dim myProcess As New Process()
myProcess.Start(“explorer.exe”, “/n, e/,  C:\Documents and Settings\sysghaisan\My Documents\”)

keterangan : “e/,”  adalah agar ketika windows dibuka tampilan menjadi “tampilan folder”, coba saja hilangkan “e/,” maka tampilan windows explorer adalah “tampilan open file”

Stop Process Program Lain Dalam Aplikasi vb.net:

Untuk membunuh atau mematikan program .EXE yang telah kita buat sebelumya  adalah dengan scource  berikut ini :

myProcess.Kill()

Demikian penjelasan seputar menjalankan program lain dengan aplikasi Vb.Net, semoga bermanfaat, dan jangan lupa berikan komentar untuk meninggalkan jejak pengunjung. :) selanjutnya jika ada yang ingin ditanyakan silahkan tulis komentar dibawah

Membuat Premery Key Otomatis pada VB.Net Banyak Jenis

Sebagaimana artikel sebelumyam Membuat Key Otomatis 1 Jenis Saja. Kali ini kita akan menambahkan variasi, misalkan nama-nama buah. Sebagai mana gambar diatas. Jika anda belum faham dengan artikel sebelumnya silakhan dibuka terlebih dahulu :

Baca : Membuat Premery Key Otomatis

Fungsi ini digunakan untuk memvariasikan jenis-jenis yang tersedia, misalkan 

• Buah dengan Kode "B"
• Daging dengan Kode "D"
• Sayur Dengan Kode "S"
• Ikan Dengan Kode "I"
• Lain-Lain Dengan Kode "L"

Form  Combo Jenis :

Source Code project Premery Key Otomatis pada VB.Net Banyak Jenis

Dim DR As DataRow
Dim Kode, s As String

Select Case cmbJenis.Text 'menentukan kode
   Case "Buah" : Kode = "B"
   Case "Daging" : Kode = "D"
   Case "Sayur" : Kode = "S"
   Case "Ikan" : Kode = "I"
   Case "Lain-lain" : Kode = "L"
End Select

'mengambil 4 karakter dari kanan (yg merupakan nomer) dari field ID, kemudian dicari nilai yg paling besar (max)

'kemudian hasilnya d tampung d field buatan dgn nama Nomor

DR = SQLTable("select max(right(ID,4)) as Nomor from tblPenjualan2 where Jenis='" & cmbJenis.Text & "'").Rows(0)

'jika berisi null atau tdk ditemukan

If DR.IsNull("Nomor") Then
  s = Kode & "-0001" 'member nilai awal
Else
  s = Kode & "-" & Format(DR("Nomor") + 1, "0000")
End If

txtID.Text = s

Button Tambah :

If ExecSQL("insert into tblPenjualan2 (ID, Pelanggan, Jenis) values ('" & txtID.Text & "', '" & txtPelanggan.Text & "', '" & cmbJenis.Text & "')") = True 

Then
     MsgBox("Sukses !!!")
     Close()
End If

Langsung saja silahkan download Scoure Code untuk dikembangkan. dan Jangan lupa kalo hubungi kami jika ada proyek dan link download rusak. :) he he . . .

Download project Premery Key Otomatis pada VB.Net Banyak Jenis

Download : Membuat Key Otomatis 2 Via Google Drive
Password : vbeducation

Membuat Premery Key Otomatis pada VB.Net

Dalam beberapa kasus kita sering harus menggunakan teknik ini seagai jalan penyelesaiannya, yaitu dengan membuat Premery Key Otomatis menggunakan VB.Net 2008. Penggunaan fungsi ini dimungkinkan kita tidak perlu lagi membuat Kode Unik atau Premery Key. Kode Unik yang dibuat telah otomatis diambil dari nilai lanjutan dari nilai sebelumnya.

Misalkan Nilai yang ada didatabase saat ini adalah :

S-0002 Dan Kita menginginkan nilai seterusnya adalah S-0003, maka kita akan menggunakan fungsi berikut ini :

Source code Membuat Premery Key Otomatis pada VB.Net

Form Load :

Dim DR As DataRow
Dim s As String

'mengambil 4 karakter dari kanan (yg merupakan nomer) dari field ID, kemudian dicari nilai yg paling besar (max)
'kemudian hasilnya d tampung d field buatan dgn nama Nomor

DR = SQLTable("select max(right(ID,4)) as Nomor from tblPenjualan").Rows(0)

'jika berisi null atau tdk ditemukan
If DR.IsNull("Nomor") Then
   s = "S-0001" 'member nilai awal
Else
   s = "S-" & Format(DR("Nomor") + 1, "0000")
End If
txtID.Text = s

Button Tambah :

If ExecSQL("insert into tblPenjualan (ID, Pelanggan) values ('" & txtID.Text & "', '" & txtPelanggan.Text & "')") = True Then
 MsgBox("Sukses !!!")
 Me.Dispose()
End If

Download Premery Key Otomatis pada VB.Net

Download : Membuat Premery Key Otomatis Via Google Drive
Password : keyoto

Membuat listview berwarna pada vb.net (visual basic .net)

Membuat listview berwarna pada vb.net,  tentu kita ingin membuat tampilan jadi lebih menarik dan lebih baik dari pada hanya satu warna saja. Pengalaman saya setiap  membuat project, saya  selalu mengutamakan tampilan agar menarik juga, listview termasuk sararan utama yang harus dipercantik.

Kali ini yang akan kita bahas yaitu membuat list view pada vb.net memiliki warna sesuai dengan yang kita inginkan, project pada tutorial ini saya menggunakan vb.net 2008.

Langkah pertama membuat listview berwarna pada vb.net

Buatlah satu buah listview, misalkan namanya adalah “LV1”, kemudian isi dengan data sesuai dengan cara anda masing-masing. Jika belum bisa mengisi data pada listview, silahkan baca artikel saya sebelumnya:

Baca : CRUD VB.NET (Create,Read,Update,Delete) Dengan Database SQL

Setelah anda selesai membuat  listview yang berisi data, langkah selanjutnya adalah menambahkan source code pada project anda

Langkah pertama membuat listview berwarna pada vb.net

Tambahkan source code berikut ini kedalam form anda, dengan membuat sub baru, perhatikan source code berikut ini :

Yang perlu diperhatikan dalam membuat listview berwarna pada vb.net 

Color.Thistle : merupakan warna kombinasi pertama yang kita gunakan, anda dapat menggantinya dengan warna kesukaan anda

Color.White : merupakan warna kombinasi kedua yang bisa diterapkan pada listview

Terakhir kita jalankan program listview berwarna pada vb.net 

tahap akhir adalah, Masukkan source berikut ini pada form load. ingat, pastikan anda meletakkannya pada form load (atau doubel click pada form project anda)

Perhatikan tulisan dalam kurung (LV1) diatas, LV1 merupakan nama dari listview yang kita buat sebelumnya, jika berbeda maka dapat dipastikan, fungsi warna yang kita buat tidak akan berfungsi.

tunggu apa lagi, silahkan jalankan project anada. Bagaimana hasilnya...? mudah bukan membuat listview berwarna pada VB.Net, jika ada pertanyaan silahkan tulis dikolom komentar. Heppy coding…

Untuk Kombinasi warna pada listview, bisa banyak sekali metode dan kondisi yang bisa diterapkan, cara diatas hanya digunakan untuk membuat kombinasi 2 warna saja, jika sobat punya usulan silahkan tulis dikolom komentar.

Terimakasih telah membaca tutorial cara Membuat listview berwarna pada vb.net (visual basic .net) semoga bermanfaat.

berikut ini video singkatnya :