如何在VB中,实现选中的字体才出现下划线呢!
或者选中的字体才能变化大小``虚心求教中``比如做一个点击按钮,把括好的字一按按钮就出现下划线!...
或者选中的字体才能变化大小``虚心求教中``
比如做一个点击按钮,把括好的字一按按钮就出现下划线! 展开
比如做一个点击按钮,把括好的字一按按钮就出现下划线! 展开
2个回答
展开全部
在VB的控件中TEXT控件做不到这个。
但是RichTextBox控件就可以了!按ctrl+t 选中Microsoft Rich Textbox ...选项
新建工程,添加按钮和超级文本(RichTextBox控件)代码如下:
Private Sub Command1_Click()
RichTextBox1.SelColor = vbRed '设置颜色
RichTextBox1.SelFontName = 黑体 '设置字体
RichTextBox1.SelBold = True '加粗
RichTextBox1.SelFontSize = 14 '字体大小
RichTextBox1.SelUnderline = True '下划线
End Sub
但是RichTextBox控件就可以了!按ctrl+t 选中Microsoft Rich Textbox ...选项
新建工程,添加按钮和超级文本(RichTextBox控件)代码如下:
Private Sub Command1_Click()
RichTextBox1.SelColor = vbRed '设置颜色
RichTextBox1.SelFontName = 黑体 '设置字体
RichTextBox1.SelBold = True '加粗
RichTextBox1.SelFontSize = 14 '字体大小
RichTextBox1.SelUnderline = True '下划线
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询