今天装修百科网给各位分享在vb中怎么设置斜体的知识，其中也会对如何在VB中控制粗体 斜体(如何在vb中控制粗体 斜体转换)进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在我们开始吧！

如何在VB中控制粗体 斜体

VB可对以下属性设置真或假来控制字体的粗 斜 连划线 下划线等。

FontBold、FontItalic、FontStrikethru、FontUnderline 属性

Private Sub Form_Click() Static i As Long If i = 0 Then Text1.FontBold = True '加粗体 ElseIf i = 1 Then Text1.FontItalic = True '加斜体 ElseIf i = 2 Then Text1.FontStrikethru = True '加连划线 ElseIf i = 3 Then Text1.FontUnderline = True '加下划线 i = 0 End If i = i + 1End SubPrivate Sub Form_Load() Text1.FontSize = 24End Sub

在PPTBOSS中怎么设置PPT的文字的粗体/斜体 ？

文字的粗体/斜体 设置

文本的视觉感受可以给人传达信息，除了颜色和字号大小之外，你还可以通过加粗文字或者添加下划线来达到重点标记的效果，操作如下：

1、选择想要重点标记的文字

2、点击"B"或者“U”按钮

vb中如何切换字体的斜体与非斜体

VB使用FontItalic属性，返回或设置字体样式：斜体（Italic）或者使用Italic属性来返回或设置 Font 对象的字形为斜体或非斜体。

FontBold、FontItalic、FontStrikethru、FontUnderline 属性

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

语法

代码示例：

Private Sub Command1_Click()

Static i As Integer

i = i + 1

If i = 1 Then

Text1.FontItalic = True ‘为斜体

ElseIf i = 2 Then

Text1.FontItalic = False '非斜体

i = 0

End If

End Sub

Italic 属性，返回或设置 Font 对象的字形为斜体或非斜体。

代码实例：

Private Sub Command2_Click()

Text1.Font.Italic = Not Text1.Font.Italic

End Sub

在VB中如何用ComboBox来设置文本框中字体的属性？代码大致怎样？

写个代码，参考一下吧：
Private Sub Combo1_Click()
Select Case Combo1.Text
Case "红色"
Text1.ForeColor = vbRed
Case "蓝色"
Text1.ForeColor = vbBlue
Case "绿色"
Text1.ForeColor = vbGreen
End Select
End Sub

Private Sub Form_Load()
Combo1.AddItem ("红色")
Combo1.AddItem ("蓝色")
Combo1.AddItem ("绿色")
End Sub

VB里什么代码可以把文本框中的字改成斜体

Text1．FontItalic＝True

字体相关设置代码：

1．设置特定字体大小：

Text1．ps：双引号内的大小可以随意改变；Text1。字形大小＝text1。字形大小＋1

2．设置特定字体

Text1．ps：双引号中的字体可以改为其他内容

3．设置特定的颜色

Text1．前驱色＝vred：可以将后一种红色改为另一种颜色；或text1。ps：＝number是颜色代码，在预测色中

4．将字体设置为粗体

Text1．FontBold＝True

扩展资料：

一、字体放大示例：

Dima％

PrivateSubCommand1＿Click（）＇加大键

a＝a＋10

If a >= 70 Then a = 70: Exit Sub '加大到70就停止

Label1．Font．Size＝a＇设定Label1的字体大小

EndSub

二、字体缩小的例子：

私人潜艇Command2＿Click（）的缩小

A等于A－10

如果a <= 2，则a = 2: Exit Sub '缩小为2，然后停止

Label1．font。size＝a＇设置Label1的字体大小

终止子

如何在VB中控制粗体 斜体

VB可对以下属性设置真或假来控制字体的粗 斜 连划线 下划线等。

FontBold、FontItalic、FontStrikethru、FontUnderline 属性

Private Sub Form_Click() Static i As Long If i = 0 Then Text1.FontBold = True '加粗体 ElseIf i = 1 Then Text1.FontItalic = True '加斜体 ElseIf i = 2 Then Text1.FontStrikethru = True '加连划线 ElseIf i = 3 Then Text1.FontUnderline = True '加下划线 i = 0 End If i = i + 1End SubPrivate Sub Form_Load() Text1.FontSize = 24End Sub

VB 如何将粗体和斜体和下划线一起出现

font属性里面字形选择粗斜体，效果选择下划线

代码如下：
Form1.FontItalic = True
Form1.FontBold = True
Form1.FontUnderline = True

VB中关于给文字添加下划线和删除线

Private Sub Check1_Click()
Label1.Font.Underline = IIf(Check1.Value = vbChecked, True, False)
End Sub
Private Sub Check2_Click()
Label1.Font.Strikethrough = IIf(Check2.Value = vbChecked, True, False)
End Sub