How to do this same thing in VB6 ?

In java this:
byte st[]=new byte[256];
st[0]=1;
st[1]=0x11;
st[2]=0x00;
st[3]=0x09;
System.out.println(st);

[Edited by jonybd on 10-06-2008 at 08:49 PM GMT]

anyway fixed

Private Sub Form_Load()
    'byte st[]=new byte[256];
    Dim bytB(256) As Byte
    
    'st[0]=1;
    bytB(0) = 1
    
    'st[1]=0x11;
    bytB(1) = &H11
    
    'st[2]=0x00;
    bytB(2) = &H0
    
    'st[3]=0x09;
    bytB(3) = &H9
    
    'System.out.println(st);
    Debug.Print StrConv(bytB, vbUnicode)
End Sub