permisi agan2 sekalian
nubi mau nanya.
agan2 pernah pakek vsflexgrid dalam pembuatan software g ?
kalo pernah, ada yang mau ane tanya gimana panggil data dengan recordset dan tampilaja
di vsflexgrid yang kita buat tadi. sebagai bahan , w kasih source code grid ane yang ketika di load
Sub list_awal()
With list_barang
.FormatString = " No. | Kode Barang | Nama Barang | On Hand|Harga Jual |Qty | Diskon |Total "
.Rows = 1
.Cols = 8
End With
End Sub

ketika di load ane coba pakek kek gini
Dim i As Integer
Set cari = New ADODB.Recordset
cari.Open "SELECT * FROM beli,barang WHERE no_faktur = '" & no_faktur.Text & "' and batal = 'TIDAK BATAL'", con, adOpenDynamic, adLockOptimistic
If cari.EOF Or cari.BOF Then
id.Text = cari.Fields("beli.id_supply").Value
nama.Text = cari.Fields("nama").Value
alamat.Text = cari.Fields("alamat").Value
txt_type.Text = cari.Fields("type").Value
For i = 1 To cari.RecordCount - 1
With list_barang
' .TextMatrix(i, 0) = i
.TextMatrix(i, 1) = cari.Fields("jual.id_barang").Value
.TextMatrix(i, 2) = cari.Fields("nama").Value
.TextMatrix(i, 3) = cari.Fields("qty").Value
.TextMatrix(i, 4) = cari.Fields("barang.harga_jual").Value
.TextMatrix(i, 5) = cari.Fields("disc").Value
.TextMatrix(i, 6) = cari.Fields("total").Value
End With
cmb_bayar.Enabled = True
faktur_bayar.Enabled = True
Next
Else
MsgBox "Data Faktur tidak ditermukan. Silahkan periksa kembali data faktur anda "
End If
tapi g bisa keluar gan. errornya invalid properties of array
ada yang bisa kasih tahu g gan?
tq ya gan
sory ane buat trid agak berselemak