It worked with code below
Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
HydraulicCylinder1.Visible = True
End Sub
Private Sub TabPage2_Click(sender As Object, e As EventArgs) Handles TabPage2.Click
HydraulicCylinder1.Visible = True
End Sub
Thanks for your help