老师,我动态增加控件,如果是在下方,或者右方,是要锚定的,我想写一个锚定的内部函数
比如Args(1)的值是“left|Bottom",我写下面的内部函数不行,应该怎么写?
Dim sz() As Object = Args(1).Split("|")
Dim e = Args(0)
If sz.Length = 2 Then
Args(0).Form.Controls("").Anchor = CType(System.Windows.Forms.AnchorStyles.sz(0) Or System.Windows.Forms.AnchorStyles.sz(1), System.Windows.Forms.AnchorStyles)
ElseIf sz.Length = 3 Then
Args(0).Form.Controls("").Anchor = CType(System.Windows.Forms.AnchorStyles.sz(0) Or System.Windows.Forms.AnchorStyles.sz(1) Or System.Windows.Forms.AnchorStyles.sz(2), System.Windows.Forms.AnchorStyles)
ElseIf sz.Length = 4 Then
Args(0).Form.Controls("").Anchor = CType(System.Windows.Forms.AnchorStyles.sz(0) Or System.Windows.Forms.AnchorStyles.sz(1) Or System.Windows.Forms.AnchorStyles.sz(2) Or System.Windows.Forms.AnchorStyles.sz(3), System.Windows.Forms.AnchorStyles)
End if