以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口如何添加一条线段  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15672)

--  作者:sgs
--  发布时间:2012/1/5 17:49:00
--  窗口如何添加一条线段

Dim nl As WinForm.Line
nl = e.form.CreateControl("line1",ControlTypeEnum.Line)
nl.Ditection = LineDirectionEnum.Vertical
nl.ForeColor = color.black
nl.LineColor= color.red
nl.ThickNess = 5
nl.DashStyle = DashStyleEnum.Dot
nl.Left = 100
nl.Top = 100
e.form.AddControl(nl)

 

咋不起作用呢


--  作者:狐狸爸爸
--  发布时间:2012/1/5 18:09:00
--  

没有提供此功能。


--  作者:sgs
--  发布时间:2012/1/5 18:41:00
--  

看来帮助要改下,明明写着呢的

CreateControl

用于创建控件,并返回所创建的控件。

语法为:

CreateControl(Name,ControlType)

Name:       控件名称
ControlType:控件类型,ControTypeEnum型枚举,包括以下可选值:

Button
Chart
CheckBox
CheckedComboBox
CheckedListBox
ColorLabel
ComboBox
DateTimePicker
GroupBox
Label
Line
ListBox
NavBar
NumericComboBox
Panel
PictureBox
ProgressBar
RadioButton
SplitContainer
TabControl
TextBox
WebBrowser
Painter
BarCode
FileManager
PictureViewer


--  作者:狐狸爸爸
--  发布时间:2012/1/6 8:36:00
--  

收到,不改帮助,改程序。