vb6中表格的使用
从手机里导出了电话本，里面有各种数据，电话、姓名什么的。我想用vb读取数据，然后在一个表格里显出来，但是不想用listview，因为他的表头那种按钮阴影的样子不好看，另外它的表头能拖动，我不想拖动。请问：
1、搜了一下，vb好几种表格，那种最适合我？
2、我试了一下datagrid，但不知道怎么添加行和列。
3、我的需求很简单，就是可以把我提取的数据，分类放进表格里，表头禁止拖动，另外可以单击某个表格，触发相应的事件。
MSFlexGrid 和 MSHFlexGrid等很多都可以， 只要设置固定行、固定列就行了。支持鼠标点击事件。
设置FormatString="|^列表头1|^列表头2;|行表头1|行表头2|行表头3"，就可以生成一个4行3列的表，第一行和第一列是固定的。
简单的事件程序演示：
首先添加控件 MSHFlexGrid，窗体添加一个MSHFlexGrid1，代码和效果如下：
vb6.0如何操作excel
p = "c:\\book1.xls" '这里改你文件的路径 Set objexcel = CreateObject("Excel.Application") '创建excel工程 Set xlBook = objexcel.Workbooks.Open(p) '打开d盘abc.xls Set xlsheet = xlBook.Worksheets("sheet1") '打开表sheet1 objexcel.Visible = True '设置excel可见或不可见...
vb6中ole excel如何设定行数和列数,怎样用语句删除ole中全部数据呢
首先你建立一个excel对象 Dim excelApp As Object Set excelApp = CreateObject("Excel.APPLICATION")然后你可以象操作在vba一样操作excel，只是在所有对象前加定义的excelapp；比如：新增一个工作表命令是 excelapp.workbooks.add 打开一个工作表命令是 excelapp.workbooks.open filename:= xxx 获得excel...
vb 关于生成excel表格
1、首先，我们需要点击文件菜单栏按钮。2、然后，我们点击生成EXE按钮。3、接下来，我们点击保存路径。4、然后，我们输入我们想要保存的文件名。5、最后，我们点击确定按钮。6、然后，我们便可以看到，在桌面生成了Excel表格了。
vb 6 ,如何控制不重复打开已有的excel电子表格
Set VBExcel = CreateObject("Excel.Application")放在 Cmdok_Click()里：这样每次点按钮都会重新创建一个Excel.Application对象的实例 这句可以考虑移动到Form_Load()里面去，这样你每次点按钮都调用同一个Excel.Application对象，他自己会检查是不是重复打开的 ...
VB6.0程序调用Excel后,Excel进程无法关闭
'===打开远程表格（计划1）开始=== Set ExcelApp = CreateObject("Excel.Application") '创建EXCEL对象 Set ExcelBook = ExcelApp.Workbooks.Open("y:\\计划1.xls")Set ExcelSheet = ExcelBook.Worksheets("计划1")'===打开远程表格（计划1）结束=== '===保存并关闭远程表格（计划1）开始===...
vb6.0将adodc和spreadsheet连接,实现通过vb对电子表格进行各项操作...
If j <> 1 Then Ssheet1.Cells(j, 6) = "=sum(c" & j & ":e" & j & ")"rs.MoveNext Next End If Ssheet1.Cells(j + 2, 2) = "合计"Ssheet1.Cells(j + 2, 3) = "=sum(c" & 2 & ":c" & j & ")"Ssheet1.Cells(j + 2, 4) = "=sum(d" & 2 & ":...
VB6中,如何判断excel工作簿中是否存在一个工作表,不存在就建立一个...
xlApp.Sheets.Add after:=Sheets(Sheets.Count) '在工作表后加入一个工作表 这句错了，等于号后面的没指定对象所以报错 修改为 xlApp.Sheets.Add after:=xlApp.Sheets(xlApp.Sheets.Count) '在工作表后加入一个工作表
VB6中如何用MouseMove确定当前位置就是MSHFlexGrid表格的某列?
Private Sub MSFlexGrid1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)Dim i As Integer Dim j As Long For i = 1 To MSFlexGrid1.Cols - 1 If x < MSFlexGrid1.ColPos(i) Then Debug.Print "鼠标在第" & i & "列"Exit Sub End If Next i Debug....
请问各位高手 VB6.0里面如何打印报表?最好可以把那段代码送我ia!小弟跪...
关键词 VB6.0,编程,报表一、 前言 Visual Basic开发数据库系统中,报表打印是其中最重要也是最常用的功能之一。按照报表实现的方法可大体上分为3类:第1类是较原始的方法,直接控制打印机对象Printer进行画线和打印;第2类是使用控件,如Data Report、Crystal Report、Active Report等;第3类是将需要打印的报表保存成...
vb如何在form中显示表格
用 FlexGrid 网格控件好了。我给你个例子；方法，在VB6里，使用菜单，[工程] -- [部件]，勾选 Microsoft FlexGrid Control 6.0 (SP6)该控件图标出现在工具箱里，添加1个到你的窗体上，再添加一个按钮；界面如下：编写代码如下：Option Explicit Private Sub Command1_Click()Dim d(5, 5) As ...
