使用下面的代码，你就可以判断WORD内容是否使用了粗体的字形Dim doc As Document Dim objWD As WordApplication Set objWD = CreateObjectquotWordApplicationquotSet doc = quotCMyWorddocquotIf。

代码输入完成后，在下方输入要设置为粗体的文字4 第四步，内容输入完成后，在后方输入代码b即可5第五步，内容输入完成后，点击右下角的保存更改按钮6 第六步，回到个人资料页面，就可以看到粗体文本了。

active，abc就是你自己定的名字，四个都要这样改，设置属性时你想哪个变粗体就把哪个设置成粗体，其余正常 分别设置好以后选中链接的字在属性面板里面样式下拉菜单里面就会出现abc，选中效果就出来了 应该说的很详细了，你去。

vbnet和vb6的写法不一样 可以用以下代码来设置字体样式和颜色 TextBox1Font = New FontquotArialquot， 16， FontStyleBold #39Arial字体，大小16，粗体#39TextBox1Font = New FontquotArialquot， 16， FontStyleItalic #39。

举2个例子TextBox1Font = New quot隶书quot， 40， FontStyleBoldTextBox1Font = New quot宋体quot， 25， FontStyleItalic。

2第二步， 执行完上面的操作之后， borderbottom属性用于设置底部边框样式，见下图，转到下面的步骤3第三步， 执行完上面的操作之后，borderbottom #FF0000 2px solid 将边框大小设置为2PX红色边框，见下图。

“” 是逻辑或 “” 是逻辑与 “~”是把后面的值转换为bool实际是bit0或1然后再反过来一下在枚举enum中常用，一般enum的index是从0开始的整数，EnumTypeSomething转换为bool后默认都是1，然后反一下就是1。