Question

VB中如何将字体的格式也复制到另一个文本框

Answer 1

有一个通用对话框。方法如下：
1、执行“工程”菜单的“部件”命令，打开“部件”对话框。
2、在部件对话框，选择“控件”选项卡，在列表中找到“microsoft
common
dialog
control
6.0”
3、单击确定。通用对话框就会被加到工具箱中。
然后，添加通用对话框，将它的action属性设为4，就是这个字体选择对话框了。
然后，你可以用下面的代码测试：
private
sub
command1_click()
commondialog1.flags
=
1
or
6
commondialog1.action
=
4
form1.font
=
commondialog1.fontname
print
"字体！"
end
sub
关于通用对话框的更多用法，建议你百度一下

Answer 2

Text1.FontBold=Text2.FontBold这样就行可以把text2的粗体格式复制到text1中
类似的还有

Text1.FontItalic斜体
Text1.FontName字体
Text1.FontSize字体大小
Text1.FontUnderline下划线
Text1.ForeColor字体颜色

Answer 3

先把第一个文本框设计好，然后复制这个文本框，再粘贴得到的文本框中的字体便和第一个当中的一样了。