Saturday, April 23, 2011

Dialog Data Finder

To search for data, such as searching customers, suppliers and others, you do not need to create a form again, you only need to use this dialogue, of course saves you time and code:

Using DC As New SEMICO_Dialog.DialogCariData() With {.TITLE = "Pencarian OTA", .Field1 = "OTAID", _
   .Field2 = "NmOTA", .StringConection = konstr, _
   .Table = "otamas", .DisplayField1 = "ID", .DisplayField2 = "name"}
DC.ShowDialog()
If DC.HasValue Then
   result = DC.value
Else
  Result = ""
End If
End Using
 
Screenshot :
SNAGHTML7d1160