Group: Forum Members
Posts: 28,
Visits: 70
|
Hi Ivan,
Your solution still can't work when i test it. I did it with my own solution and please advice
Private Sub ComboBox1_Validated(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.Validated If isnew = True Then Textbox1.Text = modEmployee.careerhis_sequence_increment(BO_hretCareerHis1.iChsEmployee_FK) End If
'If MicroFour.StrataFrame.Business.BusinessEditingState.Adding Then ' Textbox1.Text = modEmployee.careerhis_sequence_increment(BO_hretCareerHis1.iChsEmployee_FK) 'End If End Sub
Public Property isnew() As Boolean Get Return x End Get Set(ByVal Value As Boolean) x = Value End Set End Property
Private Sub MaintenanceFormToolStrip1_ItemClicked(ByVal sender As Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MaintenanceFormToolStrip1.ItemClicked If e.ClickedItem.Text = "New" Then isnew = True Else isnew = False End If End Sub
Thanks
|