先定义一个byte数组

dim bytI() as byte

bytI=chrW(20520)

这样就把　20520　这个数值 换算成 byte 了，

用 for i=lboung(bytI) to ubound(bytI)

debug.print bytI(i)

next

就可以查看出换算后的值了

同理　用 AscW(bytI) 就可以把　byte 换算成　Integer

(责任编辑：admin)

• ·解决没有保存属性在关闭窗体时
• ·Access加快窗体显示【技巧】
• ·access vba代码太长，换行的方法解释
• ·Access2010错误＂该表是“一对多”关系
• ·vba设置子窗体字体格式的方法
• ·Access如何提高程序的显示速度
• ·两种计价方式集成实例
• ·[源码]用代码添加和删除主键
• ·[示例]到期天数计算
• ·一个简单的透视图实例
• ·Access不编程生成菜单，自定义菜单如何
• ·让命令按钮全变为不可用
• ·VBA编程自动导出生成Excel表
• ·如何统计某一行某几个字段的个数？
• ·如何替换Access启动时的背景图片
• ·如何禁止Access自动保存