permisi gan, numpang konsultasi... ane kan punya usaha penjualan bunga, mau buat sistem informasi inventori... Rencana pake VB + MYSql. Aplikasi akan diakses oleh komputer (client) di toko dan servernya dirumah ?? Kira-kira VB + mysql nya mendukung apa tidak gan ??? Atau ada alternatif lain mu
Option Explicit Sub test() Dim d As Variant Dim i As Integer Dim s As String Set d = CreateObject("Scripting.Dictionary") d.Add "a", "a" Debug.Print d.Count ' Prints '1' as expected For i = 1 To d.Count s = d.Item(i) Debug
wah makasih gan nanti di coba di rumah, tapi kayaknya a() di declare sebagai array aja bukan object. bingungnya bikin object dgn jumlah dinamis itu declare nya ga bisa dimasukan ke dalam loop ya harus di luar. kalo kayak gini,gimana ? Dim a() Dim d() As Object i = 0 For i = 0 To 5 ReDim a(i) a(i)
menggo eh maho.. eh mongoDB itu kan JSON-like yah kalau gak salah, VB6, kayaknya bisa deh.... ane yakin bisa kok, masih ada penggemar VB6 ya, sama kayak ane juga masih agak penggemar VB6, walaupun bukan fans berat tapi terkadang masih suka pakai bukan penggemar hehe :ngakaks ,cuma tuntutan pekerj...
halo gan nubi numpang nanya, kalau bikin loop buat create object ("Scripting.Dictionary") gimana ya gan? saya udah coba: Private Sub CommandButton1_Click() Range(Me.RefEdit1).Name = "RD" Range(Me.RefEdit2).Name = "OT" Dim d As Object Dim JK As Long JK = Range("R...
JUNIOR PROGRAMMER Kualifikasi : 1. Laki-laki/Perempuan 2. Memiliki programming logic yang baik 3. Menguasai dasar visual basic 6 programming 4. Menguasai dasar MySQL database dan query 5. Minimal Sedang kuliah semester 4 Jurusan Informatika Jika memenuhi kriteria ini silahkan pm saya, gan?salaryn
yg vb.net 2013 community edition gratis gan :). mending move on aja gan ke vb.net ane jg sblumnya pake vb6 :D iya iya.tapi bisa di compile untuk file instalasi gak yah ? :bingungs
bisa,untuk table mysql field berjenis "LONGBOB",untuk coding kurang lebih seperti dibawah ini :http://s.kaskus.id/images/2015/07/22/3112961_20150722080337.JPG DIM FotoStream As New ADODB.Stream Set RsData1 = Nothing Set RsData1 = New ADODB.Recordset RsData1.Open LCase("S
