text1 修改什么属性 使得显示为3号 字 居中
还有2个点击事件过程怎么编写
text1 修改什么属性 使得显示为3号 字 居中
还有2个点击事件过程怎么编写
Private Sub Command1_Click()
Text1.FontBold = Not (Text1.FontBold)
End Sub
Private Sub Command2_Click()
Text1.FontItalic = Not (Text1.FontItalic)
End Sub
Private Sub Form_Load()
Text1.Text = "程序设计"
Text1.Alignment = 2
Text1.FontSize = 15.75
End Sub
Private Sub Command1_Click()‘粗体
Text1.FontBold = True
End Sub
Private Sub Command2_Click()'斜体
Text1.FontItalic = True
End Sub
Private Sub Form_Load()
Text1.Alignment = 2
End Sub
Private Sub Form_Activate()
text1.text="程序设计"
End Sub
Private Sub Command1_Click() Text1.FontBold = True End Sub
Private Sub Command2_Click() Text1.FontItalic = True End Sub
Private Sub Form_Load() Text1.Alignment = 2 End Sub