精华内容
下载资源
问答
  • 程序使用说明 1.将程序拷贝到机器上,去掉所有文件的只读属性。 2.程序自动附加数据库,如果不成功,请按如下方法设置: (1)拷贝数据库 将目录database下的db_mydatabase_Data.MDF和db_mydatabase_Log.LDF...
  • VB中利用ListView控件来制作表格

    千次阅读 2019-11-09 20:49:53
    ListView控件是由ColumnHeader和ListItem对象所组成的,其中ColumnHeader对象的个数决定了控件的列数,而ListItem对象的个数则决定了控件的行数。 下面介绍一下ListView控件的两个对象及其add方法: ...

    ListView控件是由ColumnHeader和ListItem对象所组成的,其中ColumnHeader对象的个数决定了控件的列数,而ListItem对象的个数则决定了控件的行数。
    下面介绍一下ListView控件的两个对象及其add方法:
    ColumnHeader对象是ListView控件中包含标头文字的项目,ColumnHeader对象的数目决定每个ListItem对象可包含的子项目数目。
    利用ColumnHeader对象,用户可以:
        1、单击对象触发ColumnClick事件并根据数据项目将项目排序。
        2、拖动对象的右边框来调整列宽度。
        3 、在报表视图中隐藏ColumnHeader对象。

    ListItem对象是指控件中的一行(不包含标头行)的所有内容,它代表ListView控件中ListItem对象的数据。
    ListItem对象可包含任意多个的关联项目数据字符串(子项目),但每个ListItem对象子项目数目必须相同。每个子项目都对应于相关的列标头,无法直接向子项目数组添加元素,只有通过ColumnHeaders的Add方法添加列标头的方法 来添加子项目。

    以ListView1为例:
    增加列的Add方法:
    ListView1.ColumnHeaders.Add([index],[key],[text],[width],[alignment]) 
              index :唯一标识对象集合成员的整数。 
              key :唯一的字符串标识,可以用来访问集合的成员。 
              text :列标头中显示的文字。 
              width :列宽。是数值表达式,用来指定列的宽度。 
              alignment :决定 ColumnHeader对象中文本对齐方式的整数(lvwColumnLeft、lvwColumnRight、lvwColumnCenter)

    增加行的Add方法:
    ListView1.ListItems.Add([index],[key],[text],[icon],[smallicon])
              Index:指定在何处插入ListItem对象的整数。
              Key 插入列表项的关键字
              Text 插入列表项的文本
              Icon :当为图标视图时,要求显示的图标(从imagelist中选定要显示的图标)
              Smallicon:当为小图标视图时,要求显示的图标(从imagelist中选定要显示的图标)

     

    项目实例:

    1

    1

    1

     

     

     

    展开全文
  • vb表格控件

    2018-06-15 01:06:08
    vb表格控件, 很详细
  • vb 表格控件 可编辑

    2018-04-19 17:09:03
    vb 表格控件 可编辑 同excel类似 个很好的报表控件,用了很多年了,强大灵活
  • VB6美化MSHF表格控件

    2018-03-08 10:12:20
    VB6美化MSHFlexGrid表格控件,做出非常精美的显示表格。每行都有注释,新手必备。
  • VB利用表格录入数据

    2021-05-08 23:28:06
    摘要:VB源码,数据库应用,MSHFlexGrid VB利用表格录入数据的一个实例,添加下列例程以初始化文本框,并将焦点从 Hierarchical FlexGrid 传递到 TextBox 控件:  Sub MSHFlexGridEdit(MSHFlexGrid As Control, Edt ...
  • 内容索引:VB源码,报表打印,Grid,报表 这是一个使用VB编写的自定义Grid控件,是国外网站的一个作品,界面英文,使用方便简单,有兴趣的朋友可汉化一下,进一步扩展功能。
  • 表格控件总览: </B><BR><BR> 在VB开发环境中,表格控件在界面开发元素中占有重要的地位。它不仅有外观整洁、表达形式规范的优点,而且更重要的是它较高的信息表现率(就是相对于其他控件来说能够表达更多的信息)...
  • vb 可以编辑表格

    2013-05-23 18:11:59
    一个基于MSFlexGrid.Ocx控件网格编辑增强扩展的解决方案。 你可以选种某个网格按回车进行编辑内容 你可以使用 EditOnMouse 属性设置鼠标 控制进行编辑的行数....户联系表示例. 注意:在‘数据库字段信息’示例中的‘ ...
  • VB 6.0 在DataGrid表格中实现下拉列表框,大家可以看截图,在如演示效果所示的DataGrid表格中,单击“单位”一列任意行数据,会显示出一个下拉框,供输入者选择单位,扩展了DataGrid的功能,增加了易用性,提升了...
  • VB表格控件及实例-VB表格控件(celltext.ocx、mscroll.ocx),由于VB 内部表格控件有太多限制,不能直接编辑,不能直接进行数据的复制、粘贴,也不支持鼠标滚轮的滚动操作,非常不方便。该控件解决了这些问题,并增加...
  • vb表格框控件源码 vb表格框控件源码
  • VB 利用表格批量增加新记录,在操作时,ESC:隐藏焦点并将其返回 MSFlexGrid,同时使用PopupMenu方法创建了弹出菜单。  删除回车符,以消除嘟嘟声。这个功能可以再扩展,让用户通过表格快速导入数据到库中。  当...
  • VB制作报表一般来讲有三种方法: 1、直接使用VB6.0中自带的Data Report 来做,这种方法有很大的局限性,对于比较规则的报表,但对于比较复杂的报表,比如说一张报表,上部分是人员的工资,下部分是人员的各日的...

    在VB中制作报表一般来讲有三种方法:
    1、直接使用VB6.0中自带的Data Report 来做,这种方法有很大的局限性,对于比较规则的报表,但对于比较复杂的报表,比如说一张报表,上部分是人员的工资,下部分是人员的各日的考勤,使用这种方法就无能为力。
    2、使用直接的打印方法,即Printer.print ,这种方法直接向打印机打印,就象过去使用Foxpro似的,需要进行打印机定位,并且在Windows下,不同的字符数字所占的宽度也不相同,所以这种方法使用起来非常麻烦。
    3、使用微软的Excel。本文重点讨论用Excel来制作报表所涉及的问题。我们用Excel做报表时,不仅是将所要的内容填到Excel的工作表中,而且还需要填写公式、定义合适的格式(格线、字体、对齐)等。
    Excel的每张工作表是由若干行、若干列构成的,行列的交叉形成的小格称作单元格。我们正好可以用这些现成的单元格来做我们的报表的相应的格。为了程序简单,可以将报表的模板做好,如表头,相应的行高、列宽、字体、对齐调整好(事实上,这些也可以通过程序来实现,只是麻烦点。),然后利用VB程序来操纵Excel。
    这里我们以SQL SERVER 7.0为后台数据。首先定义好需要的变量,在VB6.0的菜单"工程\引用"中确保 Microsoft Excel 8.0 Object Library(在Excel2000中,此处为Excel 9.0)复选框选中。
    再向Excel工作表中填入数据:
    Dim VBExcel As Excel.Application
    Dim xlbook As Excel.Workbook 定义Excel工作簿对象
    Dim xlsheet As Excel.Worksheet 定义Excel工作表对象
    Dim rssalary As New ADODB.Recordset 定义记录集
    rssalary.Open SQLStrsalary, CNstring, adOpenStatic, adLockReadOnly
    rssalary 为已计算好的工资数据记录集。
    SQLStrsalary 是SQL语句(如select * FROM SALARY)。
    Cnstring 是连接字符串(如Provider=SQLOLEDB.1;Integrated
    Security=SSPI;Persist Security Info=False;
    Initial Catalog=DBname;Data Source=servername)。
    Set VBExcel = createObject("excel.application")
    VBExcel.Visible = True
    根据操作人员是否需要见到Excel此处可设为TRUE 或FALSE
    Set xlbook = VBExcel.Workbooks.Open(ExcelFile)
    ExcelFile为事先设计好的Excel模板文件(包括路径)
    Set xlsheet = xlbook.Worksheets("salary")
    Salary 为Excel模板工作表的名字
    xlsheet.Activate
    下面是向单元格中填写数据(以一个简单的工资打印为例):
    xh = 1
    Row = 6 从第6行开始是工资数据,1-5 行为工资单表头
    SumRow = Row SumRow用来存放合计的起始行
    Do While Not rssalary.EOF
    Col = 1
    xlsheet.Cells(Row, Col).Value = xh
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = rssalary("name")
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("jngz").Value)
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("jbdx").Value)
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("gwgz").Value)
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("zygz").Value)
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("jfgz").Value)
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = Str(rssalary("yfgz").Value)
    xh = xh + 1
    Row = Row + 1
    rssalary.MoveNext
    Loop
    以上可将各人的工资项打印出来,下面是合计(仅以一列的合计为例,填写公式):
    Col = 1
    xlsheet.Cells(Row, Col).Value = ""
    Col = Col + 1
    xlsheet.Cells(Row, Col).Value = "合计"
    Col = Col + 1
    HeJi = "=SUM(c" + Trim(Str(SumRow)) + ":c" + Trim(Str(Row - 1)) + ")"
    xlsheet.Cells(Row, Col).Value = HeJi
    填入公式,HeJi是一个字符串变量。
    如果用到的汇总是求平均、记数等,可用相应的Excel函数来替代上面的SUM,如COUNT、AVERAGE等。
    因为Excel中所见到的格线,其实并不是实际存在的线,只是为了分割各个单元格;而如果在Exce的选项中设置上有网格线的话,那么每一个格的四周都有线,并不一定能符合实际的需要。因此,如果只是某些地方需要画线,可用以下方法为某个单元格加上边框:
    xlsheet.Cells(Row, Col).Borders(xlTop).Weight = xlThin
    其中Borders 的参数可为:xlTop,xlBottom,xlRight,xlLeft 代表位置。
    它的Weight 的值可为:xlThin,xlMedium,xlThick.... 代表线粗。
    在Excel 中,如果某个单元格的宽度小于其中内容的长度,其中的内容将显示一串"#",真正的内容就看不到了,我们可用以下的方法来解决:
      xlsheet.Cells(Row, Col).ShrinkToFit = true
    这样Excel可以自动将单元格中内容的字体缩小来适合所在的单元格的宽度。也可以将模板中所有可能用到的单元格格式的对齐方式中的"缩小字体填充"项选中,然后将不需要缩小字体填充的单元格设为:
       xlsheet.Cells(Row, Col).ShrinkToFit =false
    由于Excel中对于对齐方式(即靠左、右,上、下等)有它自己默认的方式,如数字自动在单元格中靠右,文字自动靠左。如果需要中单元格的内容在某个单元格中的对齐方式可以这样来做:
    水平对齐:xlsheet.Cells(Row, Col).HorizontalAlignment = xlCenter
    其中xlCenter处可为xlLeft、xlRight。
    垂直对齐:xlsheet.Cells(Row, Col). VerticalAlignment = xlCenter
    其中xlCenter处可为xlTop、xlBottom。
    如果需要用到单元格的内容在多个单元格中居中(跨列居中),可以这样来实现(下例可实现第一行的A到H列居中):
    Dim Total As Range
    RangeCells = "a" + RTrim(LTrim(Str(1))) + ":" + "h" + RTrim(LTrim(Str(1)))
    Set Total = Range(RangeCells)
    Total.select
    Total.HorizontalAlignment = xlHAlignCenterAcrossselection
    然后在这几个单元格中的最前一个单元填入实际内容。
    xlsheet.Cells(1, 1).Value = "实际内容"
    有时我们可能会用到改变字体及尺寸,可以通过以下方法实现:
    Sheet1.Cells(Row,Col).Font.Name = "隶书"
    Sheet1.Cells(Row,Col).Font.Size = 20
    在单元格中输入数字性的文本,如05182381104,写到Excel的单元格中时,Excel会自动将其视为数字,从而变为5182381104。要解决这个问题,可这样做:
    xlsheet.Cells(Row, Col).Value=" "+"05182381104"
    上句中的两个双引号中间是一个单引号。
    另外,如果一张Excel工作表的长度超过了所设定的打印机的纸张的长度,Excel将自动分页,第二页就会没有表头。在出现这种情况下,如果表头是模板中固定好的,可在模板中设置好,方法是在Excel的菜单"文件\页面设置"中来设置。如果表头是在程序中形成的,可用下面的方法:
    xlsheet.PageSetup.PrintTitleRows = rows("1:6").Address
    这里"1:6"是根据表头所在的行来自行设定的。
    xlsheet.PageSetup.PrintTitleColumns = Columns("A:p").Address
    这里"A:P"是根据表头所在的列来设定的。
    通过上面这些方法来制做我们平常所见的报表,应该是不会有太大的问题。其实,我们在Excel软件中所能做到的,在VB中都可以通过调用来实现。

    展开全文
  • VB6操作MSHF表格

    2018-03-08 10:10:00
    非常实用的VB6操作MshflexGrid表格控件,带完整的注释
  • vb.net读取excel表格

    2018-12-03 15:38:26
    vb.net读取excel表格内容,vb2005引用excel2007读取表格内容。
  • Vb Excel表格制作

    2009-04-04 21:40:57
    VB Excel联合编程源代码,从网上找的,希望想用VB与Excel编程的朋友们喜欢!!
  • 该Excel表格是关于通信这块PON,路由器等产品的一些客户问题跟进表,便于管理统计,方便查找,有关于关键字,产品类型,客户信息等查询工作,注意:如果查询时只输了部分关键字:格式:*xxx*
  • VB FlexCell控件生成Excel表格效果,FlexCell表格制作系统,自学VB一年有余,深知编程之苦之乐,有时为某一功能的实现要花费许多时间,概因周围无可交流人员。为使后学者在某些方面少走弯路,特制作此软件,并公布源...
  • 解压密码:1 极少见的完全开源源码,可打印,支持打印预览的第三方表格控件。 由VB6开发的超漂亮表格控件ocx. 说见压缩包内说明
  • 好用的 表格控件,vb6.0

    热门讨论 2011-12-20 10:01:10
    好用的表格控件。在使用中有很好的稳定性,不用注册即可使用。功能很强大,很好用,有良好的操作界面。
  • ReoGrid .NET Spreadsheet Component C# 和 VB.net 开源免费的表格控件, 界面很漂亮, 功能很强大 其它的自己搜一下吧
  • vb生成EXCEL表格的样例

    2014-08-18 15:03:41
    一个很好地可以用做VB存放数据到EXCEL表格文件的样例
  • ReoGrid .NET Spreadsheet Component C# 和 VB.net 开源免费的表格控件, 界面很漂亮, 功能很强大
  • 对excel文件及表格进行合并、查分、汇总等操作
  • VB解决WORD中的表格问题

    热门讨论 2010-05-04 09:47:18
    本例使用VB向WORD中增加两个表格,并判断出整个文档中的表格个数,每个表格中的行数和列数,向表格中的一个单元格中增加内容。 通过对本例的学习,可以初步掌握使用VB处理WORD中的表格问题。 希望广大编程爱好者关注...
  • VB程序生成WORD并插入表格

    热门讨论 2012-11-03 16:20:27
    VB程序生成WORD并插入表格,能完美运行,VB,word,表格
  • VB 表格 I设计

    2013-11-15 08:35:16
    VB 表格控件
  • VB读取Excel内容写到表格
  • vb操作excel表格

    2018-09-26 14:07:24
    vb6对excel表格二次开发,先在工程里引用excel库,然后文档里包含了excel对象模型的大部分对象用法

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 20,663
精华内容 8,265
关键字:

vb如何制作表格