near 发表于 2010-3-22 15:15:37

QC中字体颜色设置

新增Bug时,在描述部分用固定的格式描述Bug,分别是步骤、期望结果、实际结果。想问一下在工作流中写什么代码可以实现把步骤、期望结果、实际结果变成红色,并且加粗。高手解答啊!

near 发表于 2010-3-22 17:02:56

凄凉中

near 发表于 2010-3-23 11:27:50

没人回继续凄凉

near 发表于 2010-3-23 13:58:12

顶啊不能沉

孤独无心 发表于 2010-3-24 22:08:47

这想法不错,顶

near 发表于 2010-3-25 09:57:07

我天天顶一下

archonwang 发表于 2010-3-25 15:18:54

把我的代码共享给你吧。
参考下。一样的。

On Error Resume Next

'Start:缺陷内容模板配置
'[问题描述]:
' 1.
' 2.
' 3.
'[实际结果]:
'[预期结果/解决方法]:
   Bug_Fields("BG_DESCRIPTION").Value="<html><body>" + Bug_Fields("BG_DESCRIPTION").Value+"<font color=""#000080""><b>[问题描述]</b><br>" '+chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" <font color=""#000080"">-1.<font color=""#000000"">&nbsp;<br>" '+chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" <font color=""#000080"">-2.<font color=""#000000"">&nbsp;<br>" '+chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+" <font color=""#000080"">-3.<font color=""#000000"">&nbsp;<br>" '+chr(13)+chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+"<font color=""#000080""><b>[实际结果]</b><font color=""#000000""><br><font color=""#000000"">&nbsp;<br>" '+chr(13)+chr(13) +chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+"<font color=""#000080""><b>[预期结果/解决方法]</b><font color=""#000000""><br><font color=""#000000"">&nbsp;<br>" '+chr(13)+chr(13)
   Bug_Fields("BG_DESCRIPTION").Value=Bug_Fields("BG_DESCRIPTION").Value+ "</html></body>"
'End:缺陷内容模板配置

'初始化数据【缺陷状态】(NEW)
   Bug_Fields("BG_STATUS").Value = "New"

'初始化数据【预计完成日期】不可见
   Bug_Fields("BG_USER_01").IsVisible = False

'初始化数据【严重程度】必填
   Bug_Fields("BG_SEVERITY").IsRequired = True

'初始化数据【BG_SUBJECT(测试用例)】必填
   Bug_Fields("BG_SUBJECT").IsRequired = True

On Error GoTo 0


使用颜色要注意是用html标签来定义的。

near 发表于 2010-3-25 17:20:12

回复 7# 的帖子

不知道你这个行不行,前天我试了一下,我也是通过html给他赋值“颜色”和“加粗”,语法都通不过。明天试试你的。谢啦!膜拜啊!:lol

[ 本帖最后由 near 于 2010-3-25 17:21 编辑 ]
页: [1]
查看完整版本: QC中字体颜色设置