Thank you for your answers.
Take this code for example. How should it be converted, I have tried but the values are not assigned if i use FormState(".."). I am using InfoPath 2007
Private Sub InternalStartup(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Startup
AddHandler DirectCast(EventManager.ControlEvents("btnSave"), ButtonEvent).Clicked, AddressOf btnSaveBuilding_Clicked
Dim xnFormName As XPathNavigator
Dim xnDoc As XPathNavigator
Dim Info As String
Dim currentIdentity As WindowsIdentity
strInfo = ""
'create navigators
xnFormName = Me.MainDataSource.CreateNavigator()
xnDoc = Me.MainDataSource.CreateNavigator()
'citesc domeniul si userul din windows
currentIdentity = WindowsIdentity.GetCurrent()
strInfo = currentIdentity.Name
'adaugare user in campul de pe form
xnFormName.SelectSingleNode("/my:View1/my:txtInfo", Me.NamespaceManager).SetValue(strInfo)
End Sub
Thank you!