如何将CanPropertyChange（“Text”）从VB6迁移到VB.NET？

Question

我想将ActiveX控件从VB6升级到VB.NET。我在升级此代码时遇到问题：

If CanPropertyChange("Text") Then
    Text1.Text = Value
    RaiseEvent TextChange()
End If

我收到错误：“名称'CanPropertyChange'未声明。”

Answer 1

VB.Net不支持类似于CanPropertyChange（“Text”）方法的任何内容。最简单的方法是在Try ... Catch块中进行分配。

Try
  Text1.Text = Value
  RaiseEvent TextChange()
Catch ex As Exception

End Try

如果无法将属性写入异常，则会抛出您可以在Catch块中访问的异常。