大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
控件不一定有界面,类也不一定有界面。
成都创新互联专业为企业提供永善网站建设、永善做网站、永善网站设计、永善网站制作等企业网站建设、网页设计与制作、永善企业网站模板建站服务,十载永善做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
以Visual Studio 2012为例
把你的控件封装到类里面,生成exe或dll,在要调用的项目中,进入工具箱,右键任意项,选择项,在.Net Framework组件中浏览到生成的exe或dll,在上面列表中相应的内容,勾选,确定
我想了两种思路,winform没有findControl,只有个this.Controls.Contains("textBox1"),因此除了遍历没办法了。。。
思路1:遍历Controls,具体你自己完善下,
if(this.Controls.Count0)
{
foreach(Control c in this.Controls)
if(c.GetTepy==Tepyof(TextBox))
string str += ((TextBox)c).Text;
}
你这种做法应该是仿照vba的代码,vb.net里面不是这样做的。
你要做的是打开网页、自动填写然后提交表单吧?
应该用webbrowser来加载页面。
需要引用:Microsoft HTML Object Library
在webbrowser的状态为ready的时候,执行:
'取得要填写的表单名称,并定义为一个html元素变量text
Dim text As HtmlElement = WebBrowser1.Document.GetElementById("表单字段名id")
'给表单元素text赋值
text.InnerHtml = “张三”
'找到提交按钮
Dim btnSubmit As HtmlElement = WebBrowser1.Document.GetElementById("提交按钮id")
'执行点击动作
btnSubmit.InvokeMember("click")
点击重新生成,应该会在工具栏顶部出现的,也可以用代码定义,但运行前不会在界面出现
public withevent a as new rowmergeview
VB 只能做 ActiveX 控件或者 ActiveX DLL,普通的 COM 组件不行。
你只要在建立工程的时候选择建立 ActiveX 控件或者 ActiveX DLL 就可以了,然后自己写一个函数编译即可。
Dim Str(20) As String '20数据元素
Dim Text(20) As TextBox
Dim n As Integer = 0
For Each i In Text
i = New TextBox '实例化
i.Location = New Point(50, n * 20)
Me.Controls.Add(i) '添加窗体
Dim Index As Integer = i.TabIndex '没index属性
Str(n) = Index
i.Text = Str(n) 'str数组值赋值给文本框
n += 1
Next