时间：2009-02-13 10:37 来源：网络 作者：UMVsoft整… 阅读：次

股价图盘高-盘低-收盘图 xlStockHLC
成交量-盘高-盘低-收盘图 xlStockVHLC
开盘-盘高-盘低-收盘图 xlStockOHLC
成交量-开盘-盘高-盘低-收盘图 xlStockVOHLC
圆柱图簇状柱形圆柱图 xlCylinderColClustered
簇状条形圆柱图 xlCylinderBarClustered
堆积柱形圆柱图 xlCylinderColStacked
堆积条形圆柱图 xlCylinderBarStacked
百分比堆积柱形圆柱图 xlCylinderColStacked100
百分比堆积条形圆柱图 xlCylinderBarStacked100
三维柱形圆柱图 xlCylinderCol
圆锥图簇状柱形圆锥图 xlConeColClustered
簇状条形圆锥图 xlConeBarClustered
堆积柱形圆锥图 xlConeColStacked
堆积条形圆锥图 xlConeBarStacked
百分比堆积柱形圆锥图 xlConeColStacked100
百分比堆积条形圆锥图 xlConeBarStacked100
三维柱形圆锥图 xlConeCol
棱锥图簇状柱形棱锥图 xlPyramidColClustered
簇状条形棱锥图 xlPyramidBarClustered
堆积柱形棱锥图 xlPyramidColStacked
堆积条形棱锥图 xlPyramidBarStacked
百分比堆积柱形棱锥图 xlPyramidColStacked100
百分比堆积条形棱锥图 xlPyramidBarStacked100
三维堆积柱形棱锥图 Color 属性
移动无边框窗体例子
模块：
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Declare Function ReleaseCapture Lib "user32" () As Long
Public Const WM_NCLBUTTONDOWN = &HA1
Public Const HTCAPTION = 2
应用：
Private Sub Form_Close()
DoCmd.RunCommand acCmdAppMaximize
End Sub
Private Sub Form_Load()
DoCmd.RunCommand acCmdAppMinimize
End Sub
Private Sub XPForm_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
ReleaseCapture
SendMessage Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&
End If
End Sub
Private Sub 命令20_Click()
DoCmd.Close
End Sub

(责任编辑：admin)

上一篇：[分享]OLE字段存储图片的比较
下一篇：用按钮实现记录的跳转显示

• ·Access窗体居中显示技巧
• ·Access中Tab键的使用说明【技巧】
• ·Access粘贴对象到Tab选卡上的技巧
• ·Access在窗体上显示当前记录和总记录数
• ·Access隐藏组合框的小箭头
• ·Access窗体属性表
• ·【技巧】Access选项组边框变为圆角边框
• ·Access函数me.sfmsub.form 提示子窗体
• ·Access中使用缩放对话框显示文本框文字
• ·access技巧-中文显示星期几的简单方法
• ·Access控件是否可见,可编辑,锁定的技巧
• ·根据查找窗体设定的条件筛选主窗体的数
• ·父子窗体的语法介绍
• ·access实现组合框联动详细教程
• ·Web Service在Access中的应用技巧
• ·Access窗体最大化，最小化等操作