dim max as integer = 0 For i as integer = 0 to listview1.items.count-1 If max < val(listview1.items(i).text) then max = val(listview1.items(i).text) End if Next Msgbox("nilai max : " & max) Klo mau di bikin fungsi nya juga bisa Private function NilaiMax(byval LV as listview, byv
Thanks gan udah bisa :malus Cara bikin data tidak boleh sama di database gmna yaa ?? nyoba bikin pke Procedure Keypress masih bingung :bingungs ya jadikan primery master aja salah satu databasemu, enter pake text1 jadikan keypres if keyasci=13 then <kondisi> end if
Gan mastah ada yang tau schema Return barang gak gan..? Please Info nya :bingungs:malus di google numpuk gan. :D
Udah bisa gan, setelah otak atik setengah jam :capedes Ada masalah baru nih, gua kan pgen cari data di database cuman masukin NPM aja, terus semua data yang berhubungan sama NPM itu muncul di Frame Keterangan Data, kira" codenya apa ya ?? http://s.kaskus.id/images/2014/05/03/3413750_2014
misi gan mau nanya, kenapa ya gan ane mau buka program vb temen, tapi pas di buka muncul pesen error terus AMClabel.ocx could not be loaded. abis itu banyak notif notif errors occurred during loaded. trus dilanjutit notif error could not be loaded log log nya gan. apa emang programnya bermasalah ...
Malam Agan Agan semuaa. Numpang tanya nih, gua kan mau running program database di VB6 cuman pas di F5 muncul error kek gini. :sorry http://s.kaskus.id/images/2014/05/03/3413750_20140503072246.png kira" masalahnya dimana yaa ?? maklum baru 1 bulan belajar VB di kampuss :malus Makasih Sebe
gan ane mau nanya niii bisa gak vb 6 bikin query object di ms access?? kalo bisa gimana gan??? maksutnya query gmn ? pake ini coba Dim con As New ADODB.Connection con.Provider = "Microsoft.Jet.OLEDB.4.0" con.Open App.Path + "\db.mdb" Dim query As String query = "delet...
mau nanya agan agan, gimana caranya kalau mau muncul gambar di CR dengan kondisi option di form ? misalkan di CR ada logo tapi pada kondisi tertentu logo itu ngga muncul... semoga ada yang bisa bantu.... pake kondisi aja udah itu jadikan visible.true / false
iya gan tak lebih blajar soalnya biasa pake datagrid . Kalo boleh tanya lagi cara eksekusi perintah seperti ini gmn gan , ketika saya klik tombol hapus perintah sqlnya seperti ini "TRUNCATE TABLEcombine" kalo boleh tau di vb6 caranya gmn gan ? :iloveindonesias
bilangan yg ada komanya kyk 0,3; 0,4 itu harusnya muncul di bagian yg mana di listviewnya ? di kolom id_pasien/id_penyakit/cf_final/cf_pengguna/combine ? di cf pengguna,cf final gan.
kodenya mana ? :cd: ini gan Private Rs As New ADODB.Recordset Private Con As New ADODB.Connection Private iList As ListItem Private Sub Form_Load() koneksi Con.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=cf" Set Rs = New ADODB.Recordset Rs.Open "select *from
http://s.kaskus.id/images/2014/04/22/6167864_20140422101225.jpgkok pada bermasalah sama x64 ya? perasaan ane uda 2 taun ini ngoding di win 7 x64 lancar2 aja tuh :bingungs qn tinggal diambil valuenya dari database trus ditampilin gitu aja qn... punya agan nggak tampil ? show ur code... tampilan
:fuck: lu ngelanggar rules... bata send :shakehand: ow gt iya gan maaf masalahnya sudah coba gagal terus iya sudah minta ajarin saja tanpa donasi :D
ada tugas nieh disuruh melakukan perulangan dalam database pake apa enaknya ya list apa data grid no --data --hasil 1 -- 3 -- 0 2 -- 3 --=hasil no 1+data no 2 = hasil no 2 (0+3=3) 3 --5 --=hasil no 2+data no 3 = hasil no 3 (3++5=8) 4 --6 --=hasil no 3+data no 4 = hasil no 4 (8+6=14) 5 --7 --= dst...
kasusnya saya harus mengkalikan antar field dalam 1 table field1 * field 2 = field3 terus menerus sampai row terakhir tolong bantuannya gan
kasusnya saya harus mengkalikan antar field dalam 1 table field1 * field 2 = field3 terus menerus sampai row terakhir tolong bantuannya gan