Teman-teman, saya ada kesulitan,bgmana memindahkan isi (=KodeGroup)
yang ada di List ke TextBox yang ada di Form Lain..? Nama
ListBoxtnya,yaitu : ListDataGroup yang berada di Form :
FrmListBoxGroup terus nantinya kalau di klik isi akan mengisi textbox
-> txtkdgrp.text yang berada di Form lain,yaitu : FrmListDataGroup.

Untuk scriptnya sbb :

Private Sub ListDataGroup_Click()
 If DataGroup.Recordset.EOF Then
   If FrmActive = 0 Then
     FrmMasterGroupBrg.txtkdgrp = DataGroup.Recordset!kdgroup
     Call FrmMasterGroupBrg.CariDataGroup
     FrmMDI.Enabled = True
   ElseIf FrmActive = 1 Then
     FrmInputPenjualan.txtkdbrg = DataGroup.Recordset!kdgroup
     Call FrmInputPenjualan.CariDataBrg
   End If
   Unload Me
 End If
 DataGroup.Recordset.Edit
End Sub


Kirim email ke