Public Sub SetBound( _ Optional ByVal Bound As Boolean = False, _ Optional ByVal TableName As String = "", _ Optional ByVal Alias As String = "" _ )
Indicates whether to bind or unbind the item:
The name of a database table. For user data sources, leave this field empty.
Public Sub BimdingDataSourceToItem() Dim oForm As SAPbouiCOM.Form Dim oEditText As SAPbouiCOM.EditText '// Add a form Set oForm = SBO_Application.Forms.Add("SimpleForm") '// Add a UserDataSource to the form oForm.DataSources.UserDataSources.Add "EditSource", dt_SHORT_TEXT, 20 '//************************* '// Adding a TextEdit item '//************************* Set oEditText = oForm.Items.Add("EditText1", it_EDIT).Specific '// Bind the text box to the UsedDataSource oEditText.DataBind.SetBound True, "", "EditSource" End Sub
DataBind Object