188页习题：Public Class Form1 Dim b As Integer Dim c As Integer Dim a As String Private Sub VScrollBar1_Scroll(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ScrollEventArgs) End Sub Private Sub 复制ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 复制ToolStripMenuItem.Click a = RichTextBox1.SelectedText b = 1 End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e
