1楼：匿名用户
先添加bai一个叫
dumicrosoft ***mon dialog control 6.0的控件zhi，然dao后**如
版下：权
***mondialog1.cancelerror = true
on error goto errhandler
***mondialog1.flags = cdlcfboth + cdlcfprinterfonts
***mondialog1.showfont
text1.fontbold = ***mondialog1.fontbold
text1.fontitalic = ***mondialog1.fontitalic
text1.fontname = ***mondialog1.fontname
text1.fontsize = ***mondialog1.fontsize
errhandler:
exit sub
2楼：淡蓝银狐
双引号要用英文的双引号。
引号中的名称要对应你电脑中安装的字体类型，比如有的电脑上是"楷体"，有的电脑上则是"楷体_gb2312"
3楼：伊人尤在
从文本框的属性窗口中的 font项中修改，或用**，比如：
text1.fontname = "黑体"
4楼：兢兢猫
text1.font 这是文本框的字体属性， 给它赋值或者直接修改就可以了
怎么改变vb中文本框字体颜色
5楼：匿名用户
text1.forecolor=vbred '红色vbwhite '白色
vbbule '蓝色
...依次类推
vb+颜色(english)
vbyellow
vbblack...
6楼：匿名用户
***mondialog 先要把这个控件加到vb程序里
**：text1.color=***mondialog1.forecolor
就可以了
7楼：匿名用户
text1.forecolor = 颜色十六进制
比如:text1.forecolor = rgb(244, 222, 212)
或text1.forecolor = &hee0033
8楼：匿名用户
color选定的颜色。为使用此属性，必须先将flags属性设置为cdlcfeffects。
fontbold 是否选定“粗体”。
fontitalic 是否选定“斜体”。
fontstrikethru 是否选定删除线。
fontunderline 是否选定下划线。
fontname 选定的字体名称。
fontsize 选定的字体大小。
直接采用语句：text.font=***mondialog.fontnnametop
9楼：匿名用户
用listview 吧，那个item 是有backcolor 和 forecolor 属性的
用listbox 自己搞，估计的**
请教一个vb文本框中改变字体颜色的**！
10楼：匿名用户
richtextbox1.selcolor = vbred富文本框要用上面这行**，不过这行**只能改变当前选中的文本的颜色和以后输入的文本的颜色。如果想要改变所有文本的颜色，可以手动选中所有文本，再执行这上面的**，或者用以下的**代替。
dim i as long
i = richtextbox1.selstartrichtextbox1.selstart = 0richtextbox1.
sellength = len(richtextbox1.text)
richtextbox1.selcolor = vbbluerichtextbox1.selstart = i
11楼：匿名用户
''这样做吧 希望你能满意 声明2个api函数
private declare function settextcolor lib "gdi32" (byval hdc as long, byval crcolor as long) as long
private declare function getdc lib "user32" (byval hwnd as long) as long
'''然后把这条语句richtextbox1.forecolor = vbred换成如下语句:
settextcolor getdc(richtextbox1.hwnd), vbred
''你试试吧 有问题+q
12楼：匿名用户
vb导出excel怎样设置字体颜色 如题！ 第1个回答例子：
xsheet.cells(row, col).font.colorindex = 3
指定excel**的某单元格字体颜色。
excel使用的是颜色索引，3就是红色
13楼：匿名用户
有问题呀 不好意思 忘记写语句啦 网速太慢我这~`
14楼：彭饮通梓莹
richtextbox1这个控件是不存在forecolor属性的
vb中怎么让按钮改变文本框里的文字的字体呢？求**？
15楼：网海1书生
private sub ***mand1_click()text1.fontname = "隶书"
text1.fontsize = 25
end sub
注意，你的电脑必须
装有这种字体，否则会出错；其次，字体名称必须准确，比如方正隶书简体，就要写“方正隶书简体”，而不能简称“隶书”
16楼：听不清啊
text1.font="隶书"
在vb中如何用frame来改变文本框中字体的大小和类型
17楼：匿名用户
改变文本框中字体的大小和类型用：
text1.fontname = "黑体"
text1.fontsize = 12
和frame没有任何关系。
vb如何通过列表框中的选项单击改变文本框的字体，如宋体
18楼：匿名用户
private sub list1_click()
text1.font = list1.text
end sub
如何在vb中编写选择字体颜色的组合框
1楼 网海1书生 private sub form load bo1 clear bo1 additem 红色 bo1 additem 绿色 bo1 additem 蓝色 end sub private sub bo1 click select case bo1 listindexcase 0 te...
coreldraw中如何将文本框改成圆形
1楼 陈佳琳 用那么麻烦吗，你画个圆，然后在圆形里面输入文字，那个圆形就变成文本框了 2楼 匿名用户 你好，先画一个圆形，然后再点击文字工具，把鼠标移到圆形待鼠标变成可以编辑状态即可输入文字。希望能够帮到你。 3楼 匿名用户 先绘制一个椭圆，然后再用文本工具在椭圆里面单击就可以了。 4楼 匿名用户 ...
vb程序设计中，改标签框中的字体时只能改吗？有没有简
1楼 匿名用户 你可以先改好一个，然后复制这个标签，然后再粘贴到 表单上，这样 这个标签的样式也自动复制过来了 ，当然他会提示你是否创建这个标签的数组，你可以确定也可以不用数组 2楼 欧联科技 字体可以一起改啊，你可以按住ctrl 键 ，把所有需要修改字体的标签控件全部选择好，然后在右边的属性框里修...