AddDataDim xdatax() As Byte   xdatax() = StrConv(Text1(1).Text, vbFromUnicode)   JRStegano1.Adddata xdatax() |
JR-Stegano Activex Example |
AddDataDim xdatax() As Byte   xdatax() = StrConv(Text1(1).Text, vbFromUnicode)   JRStegano1.Adddata xdatax() |