在vb程序中,怎么设计一个设置字符格式的程序

例如;在文本框中输入“什么都是浮云"单击命令字符按钮,则将文本的字符格式设置为对应的格式... 例如;在文本框中输入“什么都是浮云"单击命令字符按钮,则将文本的字符格式设置为对应的格式 展开
 我来答
forich
2011-09-21
知道答主
回答量:15
采纳率:0%
帮助的人:16.2万
展开全部
Private Sub CommandButton1_Click()
If Text1.Font.Name = "宋体" Then
Text1.Font.Name = "黑体"
Else
Text1.Font.Name = "宋体"
End If
End Sub

修改字体(点击按钮,将Text1文本框中的字体样式在"黑体"和"宋体"间切换)
(如果是修改其他属性,以此类推)
只要查查相关属性值,修改还是很轻松的。
更多追问追答
追问
可以说的更具体一点儿吗,初学者,请见谅
追答
代码都给出来了,还不够具体?
应该主要有以下几种属性
字符型
Name(字体名称)(楷体、黑体、宋体、Arial等)
数值型
Size(字体大小)
逻辑型(True & False)
Blot(是否粗体)
Itatic(是否斜体)
Strikethrough(是否删除线)
Underline(是否下划线)
科技程序迷
推荐于2016-06-04 · TA获得超过2822个赞
知道大有可为答主
回答量:2240
采纳率:0%
帮助的人:1838万
展开全部
我怕我写出来你都现在都难以理解。思路也不复杂,把一段字体格式、样式 写在文本框里面,然后通过代码分析文本框的内容得出要对字体的设置信息。
如这样写文本框的内容:华文楷体,20,粗体1,&hff0000
然后通过代码就得到文本框里面的每一个信息:
dim f() as String
f=split(text1.text,",") '这里用到数组
这样子就可以得到里面的详细的每一个设置信息
下一步设置:
Text1.FontName=f(0) ‘字体名称
Text1.FontSize=Val(f(1)) '字体大小
Text1.FontBold=iif(f(2)="粗体1",True,False) ' ”粗体1“表示设置粗体,否则取消设置粗体
Text1.ForeColor=Val(f(3)) '设置字体颜色(前景色);&Hff0000是表示红色;Val()是一个转换为数值型的函数
由于你刚学,不说那么复杂的,就比如说随便乱序输入文本框字体设置:20,华文中宋,&hffff00,斜体1,
反正你只要理解这么几个文本框字体设置的属性的每个属性的作用和使用方法就行了。
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
纳梅赏雪
2019-05-16 · TA获得超过3.7万个赞
知道大有可为答主
回答量:1.4万
采纳率:34%
帮助的人:725万
展开全部
1、00,002
前面的零不省略
2、2.4495
用#号表示是,为零的两端数字不显示
3、00,000+02
用0表示时零不省略
4、 -2.4495
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式