How to visible false in photoshop cs6 trial version using vb script?

Moving to Photoshop Scripting forum.

Hi,

Type the following script into a script or text editor.

NOTE: Entering comments is optional.

Dim appRef Set appRef = CreateObject( "Photoshop.Application" )

' Remember current unit settings and then set units to

' the value expected by this script Dim originalRulerUnits

originalRulerUnits = appRef.Preferences.RulerUnits

appRef.Preferences.RulerUnits = 2

' Create a new 2x4 inch document and assign it to a variable.

Dim docRef

Dim artLayerRef

Dim textItemRef

Set docRef = appRef.Documents.Add(2, 4)

' Create a new art layer containing text

Set artLayerRef = docRef.ArtLayers.Add

artLayerRef.Kind = 2

' Set the contents of the text layer.

Set textItemRef = artLayerRef.TextItem

textItemRef.Contents = "Hello, World!"

' Restore unit setting

appRef.Preferences.RulerUnits = originalRulerUnits

2.Save file as a text file with a .vbs file name extension.

3. Double-click the file in Windows Explorer to run the script. The script opens Photoshop.