不确定这是否可行: 我想创建一个带有2个输入的子
Public sub testsub(byval x as string,byval y as string)
dim z as class specialdevicelcass
z.y = x
end sub
这是偶数,y变量将始终是特殊设备类的成员
答案 0 :(得分:1)
您可以使用反射:
Public Sub testsub(ByVal x As String, ByVal y As String)
Dim z As New specialdevicelcass
Dim prop = z.GetType.GetProperty(y)
prop.SetValue(z, x)
End Sub