展开全部
dim printtext as string
private sub button1_click()
dim vtext as string
vtext = "欢迎"
picture1.print vtext
printtext = printtext & vtext
end sub
private sub button2_click()
Open "C:\lnfo.txt" For Output As #1
Print #1, printtext
Close #1
shell "%windir%\system32\notepad.exe " & "C:\Info.txt"
end sub
private sub button1_click()
dim vtext as string
vtext = "欢迎"
picture1.print vtext
printtext = printtext & vtext
end sub
private sub button2_click()
Open "C:\lnfo.txt" For Output As #1
Print #1, printtext
Close #1
shell "%windir%\system32\notepad.exe " & "C:\Info.txt"
end sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
picture 控件中输出的文字是图片 只能保存成图像了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你不能添加段代码,直接把文字保存到记事本?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询