Try the code below...


Private Sub CommandButton1_Click()
Dim x As PBObjLib.Dataset

Set x = Application.ActiveDisplay.Datasets.GetDataset("test1")
x.Expression = "'sinusoid' /" & TextBox1.Text

Application.ActiveDisplay.Datasets.SetDataset x

End Sub

In the above code you have a textbox on screen which has a value in it, and a command button. Whenever you click on the command button it will update the dataset to be ('sinusoid' / "value in the text box").

I would make sure that when you open the PI display that you assign a value to the text box otherwise you will get error messages if you accidentally click the command button!

If you want me to send you my test display just let me know.