I am trying to use VBA code to save inkpicture contents, can only use vb.net or C#
Posted
by zaphod23
on Stack Overflow
See other posts from Stack Overflow
or by zaphod23
Published on 2010-01-15T20:02:24Z
Indexed on
2010/06/03
9:44 UTC
Read the original article
Hit count: 616
vba
I found this code that is missing the funtion call in thelast line, any ideas on what the save to file command would be?, I'll just kludge it in.
'CODE to SAVE InkPicture to FILE
Dim objInk As MSINKAUTLib.InkPicture
Dim bytArr() As Byte
Dim File1 As String
File1 = "C:\" & TrainerSig & ".gif"
Set objInk = Me.InkPicture2.Object
If objInk.Ink.Strokes.Count > 0 Then
bytArr = objInk.Ink.Save(2)
fSaveFile bytArr, File1
End If
© Stack Overflow or respective owner