49、Visual Basic 中的图形、音频与图表创建

Visual Basic 中的图形、音频与图表创建

1. 图形与文本设置

在 Visual Basic 里，存在一个处理文本添加设置的事件 tlsShapesText_Click ，其代码如下：

Private Sub tlsShapesText_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tlsShapesText.Click
    'Settings for adding text
    ChangeButtons()
    If mblnWriteText Then
        tlsShapesText.BackColor = Color.LightBlue
        mblnWriteText = False
        mblnDrawShape = False
    Else
        tlsShapesText.BackColor = Color.DarkGray
        mblnWriteText = True
        mblnCanPaint = False
    End If
    'Displays prompt for TextBox
    lblTextDirections.Visible = True
End Sub

此代码实现了文本添加设置的切换，同时会显示文本框的提示信息。

2. 声音处理

Visual Basic 有三种播放声音的方式：
-