1. vb输出excel表格
最简单的方法:先用 Excel做报表,然后导入access(最好设置密码),利用access中的转换工具将报表转换成97版(我用的是access2003版本,没转换的话涉及到vb6.0sp6)。
然后在vb中添加一个data和一个dbgrid以及数个command和text,利用data添加报表,利用dbgrid显示报表,利用text的DataSource 属性来添加和更改报表,最后是调用excel来作报表预览和打印(唉......知识有限,我就知道这么多了)2. vb显示excel表格内容
是不是输出时候被损坏
3. vba获取excel单元格内容
a=activecell.Row-3b=activecell.Column-2i=activecell.Row-3里面的数值2、3是根据B3指定的i跟a的含义应该是一样的吧
4. vb生成word表格
首先引用Microsoft Word 12.0 Object,具体版本根据你组的哪个office版本Dim wApp As Word.ApplicationDim wDoc As Word.DocumentSet wApp = New Word.ApplicationSet wDoc = wApp.Documents.Open(cDocName)上面是定义和打开Word文件赋值:wDoc.Shapes(i).TextFrame.TextRange.Text = Trim(Text5.Text)在那个打开的word文档中,预先加入多个文本框,上面是给其中某个文本框赋值wDoc.SaveAs tmpNamewDoc.ClosewApp.QuitSet wApp = Nothing这个是另存为和退出
5. vb格式输出
vb format函数
格式输出Format函数
Format函数用于制定字符串或数字的输出格式。
语法:x = Format (expression, fmt )
expression是所输出的内容。fmt是指输出的格式,这是一个字符串型的变量,这一项若省略的话,那么Format函数将和Str函数的功能差不多。如:
语句
输出
Format (2, “0.00”)
2.00
Format (.7, “0%”)
70%
Format (1140, “$#,##0”)
$1,140
fmt字符的意义
字符
意义
字符
意义
0
显示一数字,若此位置没有数字则补0
.
小数点
#
显示一数字,若此位置没有数字则不显示
,
千位的分隔符
%
数字乘以100并在右边加上”%”号
- + $ ( )
这些字出现在fmt里将原样打出
Format函数对时间进行输出时的意义
fmt
输出
fmt
输出
m/d/yy
8/16/96
h:mm:ss a/p
10:41:29 p
d-mmmm-yy
16-August-96
h:mm
22:41
d-mmmm
16-August
h:mm:ss
22:41:29
mmmm-yy
august-96
m/d/yy h:mm
8/16/96 22:41
hh:mm AM/PM
10:41 PM
VB Format函数使用方法
返回 Variant (String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。
语法
Format(expression[ format[ firstdayofweek[ firstweekofyear]]])
Format 函数的语法具有下面几个部分:
部分
说明
expression
必要参数。任何有效的表达式。
format
可选参数。有效的命名表达式或用户自定义格式表达式。
firstdayofweek
可选参数。常数,表示一星期的第一天。
firstweekofyear
可选参数。常数,表示一年的第一周。
设置值
firstdayofweek 参数有下面设置:
常数
值
说明
vbUseSystem
0
使用 NLS API 设置。
VbSunday
1
星期日(缺省)
vbMonday
2
星期一
vbTuesday
3
星期二
vbWednesday
4
星期三
vbThursday
5
星期四
vbFriday
6
星期五
vbSaturday
7
星期六
firstweekofyear 参数有下面设置:
常数
值
说明
vbUseSystem
0
使用 NLS API 设置。
vbFirstJan1
1
从包含一月一日的那一周开始(缺省)。
vbFirstFourDays
2
从本年第一周开始,而此周至少有四天在本年中。
VbFirstFullWeek
3
从本年第一周开始,而此周完全在本年中。
说明
格式化
作法
数字
使用预先定义的命名数值格式或创建用户自定义数值格式。
日期和时间
使用预先定义的命名日期/时间格式或创建用户自定义日期/时间格式。
日期和时间序数
使用日期和时间格式或数值格式。
字符串
创建自定义的字符串格式。
6. vb 获取excel单元格数据
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If TypeName(Target.Value) = "String" Then
MsgBox "该单元格的值是字符串类型"
ElseIf IsNumeric(Target.Value) Then
MsgBox "该单元格的值为数字类型"
ElseIf IsDate(Target.Value) Then
MsgBox "该单元格的值为日期类型"
Else
MsgBox "该单元格的值为未知类型"
End If
End Sub
7. vb调用excel数据后,怎么使用
电脑上新建Excel文件,例如命名为“Excel 工作表”~!!!
双击“Excel 工作表”,打开excel文件~!!!
键盘上按下Alt+F11,即可弹出VB的编程界面
VB编程界面的上方就是工具栏,和一般工具栏分布一样
VB编程界面的左上方就是所有Sheet的列表
VB编程界面的左下方就是某一Sheet的详细信息
VB编程界面的正中间就是编程的主要区域
8. vb生成excel表格
测试成功,原码:DimxlappAsExcel.Application'Excel对象DimxlbookAsExcel.Workbook'工作簿DimxlsheetAsExcel.Worksheet'工作表DimxlrangeAsExcel.rangePrivateSubCommand1_Click()Setxlapp=CreateObject("excel.application")'第一层Setxlbook=xlapp.Workbooks.Addxlapp.Visible=Truexlbook.sheets(1).range("a1")="新建成功"xlbook.SaveAsApp.Path&"/测试.xls"xlbook.CloseEndSub
9. vb调用excel打印
、在工程中引用Microsoft Excel类型库:从"工程"菜单中选择"引用"栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择"确定"。表示在工程中要引用EXCEL类型库。
2、在通用对象的声明过程中定义EXCEL对象:Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkBookDim xlSheet As Excel.Worksheet3、在程序中操作EXCEL表常用命令:
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件xlApp.Visible = True '设置EXCEL对象可见(或不可见)
Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表xlSheet.Cells(row, col) =值 '给单元格(row,col)赋值xlSheet.PrintOut '打印工作表xlBook.Close (True) '关闭工作簿xlApp.Quit '结束EXCEL对象Set xlApp = Nothing '释放xlApp对象这是我收藏的,你试一下
10. vb表格录入数据
你的vb没vb5db.dll这个东西,你只要去网上搜索这个,然后把它下载下来复制到vb的文件夹目录里就ok了
11. vb操作excel文件
excle中的vb编程入门,其实就是VB语言,并无差别。您只需要学习VB即可,买一本"VB由入门到精通"的书籍,跟着书上一章一章的学习,就可以实现VB的入门了。
- 相关评论
- 我要评论
-