7493
社区成员
这段代码为什么结果和实现不一样
Private Type BITMAPFILEHEADER
bfType(0 To 1) As Byte
bfSize As Long
bfReserved1 As Integer
bfReserved2 As Integer
bfOffBits As Long
End Type
Private Sub Command1_Click()
Dim bi As BITMAPFILEHEADER
Open "c:\a.bmp" For Random As #1 Len = Len(bi)
Get #1, , bi
Debug.Print bi.bfType
Debug.Print bi.bfSize
Debug.Print bi.bfOffBits
Close
bfType(0 To 1) As Byte
bfSize As Long
bfReserved1 As Integer
bfReserved2 As Integer
bfOffBits As Long
End Type
Private Sub Command1_Click()
Dim bi As BITMAPFILEHEADER
Open "c:\a.bmp" For Random As #1 Len = Len(bi)
Get #1, , bi
Debug.Print bi.bfType
Debug.Print bi.bfSize
Debug.Print bi.bfOffBits
Close
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
还没有回复，快来抢沙发～
基于java的企业人事管理系统设计--软件工程课程设计（含源码与论文设计）.rar 1 引言 4
1.1 课程设计目标 4
1.2 编程工具（编程环境）介绍 4
1.3 实施时间及主要实施步骤 4
2 需求分析 5
3 系统总体设计 6
4 数据库设计 6
5 主要功能模块的设计与实现 10
5.1 功能模块1详细设计（综合查询员工信息）..........................................................10
5.1.1 详细设计.......................................................................................................10
5.1.2 算法流程........................................................................................................15
5.1.3 界面设计及测试结果.....................................................................................15
6 调试分析 15
7 用户手册 16
8 测试结果 17
8.1 员工信息的添加...................................................................................................17
8.2 员工信息的修改...................................................................................................17
8.3 员工信息的删除...................................................................................................18
8.4 员工信息的综合查询...........................................................................................18
8.5 员工信息按性别统计的结果................................................................................19
8.6 员工信息按状态统计的结果...............................................................................19
8.7 员工信息按职称统计的结果................................................................................20
9 结论 20
10 参考文献 20
