以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字符串连接问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=129674)

--  作者:花开的声音
--  发布时间:2019/1/3 16:36:00
--  字符串连接问题
想定义43个panel
For i As Integer =1 To 43
  Dim "b" & i As WinForm.Panel = e.Form.Controls("panel" & i)
  “\'b\' & i".baseControl.Gettype().GetProperty("DoubleBuffered",  Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic).SetValue(s1.baseControl,True,Nothing)
Next 

出错。


--  作者:有点甜
--  发布时间:2019/1/3 17:13:00
--  
For i As Integer =1 To 43
  Dim pp As WinForm.Panel = e.Form.Controls("panel" & i)
  pp.baseControl.Gettype().GetProperty("DoubleBuffered",  Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic).SetValue(pp.baseControl,True,Nothing)
Next