Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Me.Font.Bold = True
        Me.TextBox4.Text = Me.Font.Bold = True
    End Sub
F5后出现错误 error BC30526: 属性“Bold”为“ReadOnly”。
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Me.MousePosition = Me.TextBox3.Text
    End Sub还有改变鼠标的这个也是这个错误
 error BC30526: 属性“MousePosition”为“ReadOnly”。