vb如何让字体变粗

我做了个弹出式菜单,鼠标右键显示粗体,斜体,下划线,如何让文本框中的文字因为我右键点了粗体,下划线,斜体二让文本框中文字变成那样,粗体,斜体,下划线的代码是什么

VB6.0可设置FontBold属性 = True,使显示字体变粗。

FontBold、FontItalic、FontStrikethru、FontUnderline
属性

按下述格式返回或设置字体样式:Bold、Italic、Strikethru 和 Underline。

下面例子中,每单击一次鼠标,就将窗体中的文本置成两种样式组合之一。

Private Sub Form_Click()
    FontBold = Not FontBold   '转换字体粗细
    FontItalic = Not FontItalic   ' 转换字体样式。
    Print "Now is the time!"   ' 输出文本。
End Sub

Private Sub Form_Load()
    FontSize = 24
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  2015-10-11

    控件 font 属性打开就有 字体 字体大小  粗体 斜体。。。。。。。。。

    给你图片你看看便知!!!!

第2个回答  推荐于2017-09-08
text1.Font.Bold = True
text1.Font.Italic = True
text1.Font.Underline = True
就是设置上面的属性本回答被提问者采纳
第4个回答  2009-01-07
2楼font后的点应该都不要

EXCEL中如何在这段VBA代码中添加字体加粗的命令
在Excel VBA代码中,若需添加字体加粗的命令,可将原有代码 这段改一下If i0 > 0 Then c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)修改为:c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)紧接着添加以下语句实现加粗效果:c.Characters...

...简单 如何通过命令按钮 把文本框中的文字变成粗体?
1、打开VB软件,在窗体上面,添加两个文本框,如下图所示。2、单击文本框,在属性窗口分别设置文本框的属性,清空文本的内容,如下图所示。3、在窗体上面,添加一个命令按钮,如下图所示。4、单击命令按钮,在属性窗口中,设置命令按钮的属性,如下图所示。5、双击命令按钮,编写其代码,如下图所示。...

VBText怎样设置加粗
VBText控件中使字体加粗和倾斜的代码是:加粗 Label1.FontBold = True 斜体 Label1.FontItalic = true

vb如何让字体变粗
VB6.0可设置FontBold属性 = True,使显示字体变粗。FontBold、FontItalic、FontStrikethru、FontUnderline 属性 按下述格式返回或设置字体样式:Bold、Italic、Strikethru 和 Underline。下面例子中,每单击一次鼠标,就将窗体中的文本置成两种样式组合之一。Private Sub Form_Click() FontBold = Not Font...

vb将选中文字加粗怎么弄
其实纯粹的文本框是不支持选中文本标粗的,你应该使用richtextbox控件。

怎么把vb6.0上button.caption的字体变粗?说详细点!
开发模式下选中按钮,然后在属性栏位选字体(font),点开后选'隶书',粗体',字体就变粗了,VB6的按钮控件不支持彩色的,需要自己制作控件才可以。

vb2003中怎么设置字体加粗
就是在左边的属性框中有Font,直接点击修改就可以了

VB里如何通过列表(ListBox)设置字体的粗体、斜体、粗斜体?
添加一个text 添加一个list 编写以下代码:Private Sub Form_Load()List1.AddItem ("粗体")List1.AddItem ("倾斜")List1.AddItem ("下划线")List1.AddItem ("删除线")End SubPrivate Sub List1_Click()Select Case List1.Text Case "粗体"Text1.FontBold = True Text1.FontItalic = False...

vb中字体对话框粗体的代码是label1.fontbold=ture 那常规的代码是什么啊...
label1.fontbold=ture ,应该是label1.fontbold=true,单词写错了 fontbold赋值为true就是加粗,赋值为false就是不加粗 你也可以写成 label1.fontbold= not label1.fontbold,这样第一次执行这句就是加粗,第二次执行就是不加粗,这样更灵活

我是一名vb初学者,vb中字体变化变粗体和斜体怎么写编码?
text1.fontbold=true check控件被选中其value是1,否则是0 如果要让Check控件被选中,字体变粗用以下语句 text1.fontbold = ( check粗体.value = 1)

相似回答