以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何设置动态增加控件的字体大小  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91840)
--  作者：lihe60
--  发布时间：2016/10/20 9:49:00
--  如何设置动态增加控件的字体大小
 

如何设置动态增加控件的字体大小

dim c as string="ss"

        Dim txt As WinForm.textbox
        txt = e.Form.CreateControl(c, ControlTypeEnum.textbox)
        \' lbl.Text = c.caption
        txt.Left = 100

        txt.Top = 50

        
        Dim fnt As New Font(" & c & ", 20)
        " & c & ".Font = fnt
        e.Form.AddControl(txt)
--  作者：有点蓝
--  发布时间：2016/10/20 10:00:00
--  
Dim c As String="ss"
Dim txt As WinForm.textbox
txt = e.Form.CreateControl(c, ControlTypeEnum.textbox)
\' lbl.Text = c.caption
txt.Left = 100
txt.Top = 50

txt.Font = New Font("宋体", 20)

e.Form.AddControl(txt)


http://www.foxtable.com/webhelp/scr/0494.htm