vb.net 类的分享--数据库写入列表框

操作方法

  • 01

    Sub 列表框写入(ByVal data As Object, ByVal lis As ListBox, ByVal sql As String) Dim arr conn = CreateObject("ADODB.Connection") rst = CreateObject("ADODB.recordset") conn.Open(data) rst = conn.Execute(sql) If rst.EOF And rst.BOF Then MsgBox("未设置内容") Else arr = rst.Getrows conn.Close() conn = Nothing lis.Items.Clear() For x = 0 To UBound(arr, 2) lis.Items.Item(x) = arr(0, x) Next x End If End Sub 外部调用 Dim data1 As New 数据库, data2 As New 控件写入 sql = "Select 姓名 from 登录信息 "data2.组合框写入(data1.信息数据库, 姓名, sql) 来解释一下 数据库                :是我连接数据库的类在这里不解释; 控件写入             :‘列表框写入’就在‘控件写入’里面要调用先声明; data1.信息数据库:就是一个数据库的连接字符串存放在里面,使用时直接调用,不需要在写那么长的东西了; 名字                    :是我把combobox控件的“name”属性改成的‘姓名’; sql                      :就是sql语句,上面一行 其实这个过程并不复杂,只是在调用过程当中又调用了一个别的过程 这样就可以将括号内的三个参数穿入到类过程中并执行,其实我也是初学者,以前自学了VB,刚接触VB.net 3天吧,把之前的vb代码,改成VB.net能识别的代码,但是过程真的很艰辛,因为发现网站的东西不是很多,虽说我本人也是菜鸟,英语也不懂(很多控件的name属性都打中文),这是第一次,把好的东西分享给大家,也算是抛砖引玉,希望能有更多的高手,把一些更高端的东西传上来,供大家学习交流

(0)

相关推荐

  • vb入门教程 经验分享

    VB教程:序文-不再游戏咱们需求啥 咱们需求啥?当咱们在一个精彩的游戏国际中游历了一番之后,或是惊叹于某一东西软件的细巧精美之余,多少总会发作少许编程的激动.编程吗,在曾经若是你对电脑仍是一个外行人, ...

  • Access窗体怎么创建组合框及列表框控件?

    Access处理数据的时候,想要添加组合框及列表框控件,该怎么添加呢?下面我们就来看看详细的教程. 1.打开要操作的数据库,右击要添加控件的窗体选择“设计视图”,或者单击“创建”选项卡窗体组中的“空白 ...

  • 在Access窗体中添加组合框及列表框控件

    组合框控件像下拉式菜单一样在屏幕上显示一列数据.把光标移动到所要的选项上,然后单击鼠标可完成选择.列表框和组合框类似,不过在组合框可以输入值而列表框不能. 操作方法 01 打开要操作的数据库,右击要添 ...

  • 易语言excel表格怎样导入到超级列表框

    易语言在操作excel时,常用自带组件表格或者高级表格来进行互换操作,把excel作为一个数据库类型,那么excel能不能用超级表框来互换操作,现在来看看怎样将excel表格的数据导入到超级列表框吧! ...

  • WPS表格怎么使用列表框控件?

    wps表格中想要制作一个列表框,该怎么制作呢?需要使用列表框空间,该怎么制作呢?下面我们就来看看详细的教程. 1.打开WPS软件,在表格中创建一个简单的表格,在单元格中的输入数据,比如分类表,如下图所 ...

  • Axure RP控制列表框怎么设置默认显示选中值?

    今天我们就来看那看Axure RP一个实例说明列表框选中的值,输入框显示对应的值,下面我们就来看看详细的教程. 1.双击打开Axure RP设计工具,在“表单元件”找到“列表框”,拖动一个到主页面上, ...

  • Axure RP 8怎么给网页添加多选列表框?

    今天我们来看看Axure RP 8设计多选列表框的方法,很简单,下面我们就来看看详细的教程. 1.双击打开Axure RP 8工具,在元件库找到矩形,在图表中找到向下的图标,拖入到画布中,如图: 2. ...

  • axure怎么给下拉框/列表框和元件文本添加内容?

    今天我们就来看看axure元件的使用方法,今天主要讲解下拉框/列表框和元件文本的使用方法. 1.分别拖动一个列表框一个下拉框和一个矩形元件到页面编辑区,随后拖动三个文本元件到页面编辑区. 2.所有元件 ...

  • 怎么用word2016的列表框制作下拉列表?

    Word也可以制作下拉菜单,规范输入,下面小编就介绍一下word2016制作下拉菜单的方法.具体如下:1. 第一步,点击进入word2016,软件自动新建一个空白文档,点击顶部的插入,然后点击表格,在 ...