主题：还是字体的问题，谢谢

dim str as string = e.form.control("textbox1").value dim fnt as new font ("宋体"，15) 如何设置str的字体？谢谢

 dim fnt as new font ("宋体"，15)

我是想在messagebox中显示的str的字体改变，这个可以实现吗？

什么意思?  显示原本的字体吗?

dim fnt as new font ("宋体"，15) e.form..controls("textbox1").Font=fnt messagebox.show("找到" & str) 我想把str的字体和messagebox里的其他字体区分开来。谢谢

这个没有办法做到.

 回复5楼，不能。你加一个括号区分呗。比如 找到【xxxxx】

你可以自己设计一个模式窗口,上面用分别用3个Label控件,中间的设置不同的字体 用来显示STR即可

谢谢二位老师的提点，就找此办理了，谢谢