窗体文字颜色和字体如何修改
以下是一个窗体文字字体和颜色修改的代码,包含2个按钮和1个通用对话框
Private Sub Command1_Click()CommonDialog1.Flags = &H3 Or &H100CommonDialog1.ShowFontForm1.FontSize = CommonDialog1.FontSizeForm1.FontBold = CommonDialog1.FontBoldForm1.FontItalic = CommonDialog1.FontItalicForm1.FontStrikethru = CommonDialog1.FontStrikethruForm1.FontUnderline = CommonDialog1.FontUnderlineForm1.ForeColor = CommonDialog1.ColorEnd SubPrivate Sub Command2_Click()CommonDialog1.ShowColorForm1.ForeColor = CommonDialog1.ColorEnd SubPrivate Sub Form_Click()Print "这是一个VB字体和颜色测试框"End Sub