参数表-----------------------------------------------------
Angle 光照倾角取值0到90的间以角度为单位
WidthOfArea 光照区宽度取值大于1整数以像素为单位
Speed 光照区运动速度取值大于1整数
EnhanceRatio 光照强度参数取值大于1整数
-----------------------------------------------------
好原理就这么多现在我们开始动手实现吧!打开VB6.0选择新建标准EXE工程在主窗口form1 [阅读全文] [PDF]
JPEG压缩格式是目前图像处理领域里面用得最广泛种图像压缩方式它实现主要分成 4个步骤:
1.颜色模式转换及采样;
2.DCT变换(离散余弦变换);
3.量化;
4.编码(有算术编码和霍夫曼编码两种这里采用霍夫曼编码)用VB语言编程实现以上 4个步骤即完成了JPEG压缩过程这里假设给定源图像是幅24位真彩色BMP图像
、颜色转换及采样
1.颜色转换:对BMP图像中颜色数据进行由RGBYCbCr转换Y表示亮度CbCr分别表示蓝色度和红色度
转换公式:
Y=0.2990R+0.5870G+0.1140B
C [阅读全文] [PDF]
大家都知道屏幕保护密码最多为16个微软内置了16字节密钥:48 EE 76 1D 67 69 A1 1B 7A 8C 47 F8 54 95 97 5FWindows便用上述密钥加密你输入密码其加密过程为:首先将你输入密码逐位转换为其16进制ASCⅡ码值(小写字母先转为大写字母)再依次和对应密钥逐位进行异或运算把所得16进制值每位当作转换为其16进制ASCII码并在其尾加上00作为结束标志存入注册表HKEY_CURRENT_USER\Control Panel\desktop下 2进制键ScreenSave_Data中
懂得其加密原理后便不难编程破 [阅读全文] [PDF]
综述
应用MapXControl控件实现查询功能并不太难MapX为我们提供了Find、FindFeature等对象可以用来实现我们需要功能
1、本实现从下列表中选择个节点并以此节点为中心进行进行定位功能(例子以第层RTUName属性值进行查询)
Private Sub Command1_Click
Dim FindObj As MapXLib.Find
Dim FoundFeature As FindFeature
'从要查询RTU图层生成Find对象并为这个对象设置要查询FindDataSet、FindField属性
Set [阅读全文] [PDF]
设计时应用动态存储分配技术可以减少应用数据存储开销VB在编程中提供了动态功能可以根据数据多少随时调整大小达到提高内存使用效率目但是动态有个缺陷那就是当调整大小时中原有所有数据都被清除当使用关键字Preserve要求保留中原有数据时只能调整多维中最后维下标上界另外当用存储大量数据时在上数据操作效率较低那末是否可以在VB中实现VC编程中动态存储功能呢?答案是肯定本文将讨论如何在VB编程中实现链式存储技术
、VB中指针
VB中提供对象类型变量以及对象类型变量对于对象引用功能这种功能使得个对象变量可以引用和的属于同类对象例如:
Dim fp A [阅读全文] [PDF]
VB是个功能强大开发工具它给我们个高效、迅速开发环境让我们能轻松编写出想要但它也有不足大量隐式操作后台操作给我们带来方便同时也带来了不少隐患不过我们可以自己改进来避免隐式操作带来麻烦
1.保证任何新模块都有Option Explicit
这点非常重要它能避免我们去创建变量例如你创建了个StrUserName变量但由于粗心错写成StrUserName若没有Option ExplicitVB会自做主张地创建StrUserName变量导致得不到正确结果出了这种错般难以查出来所以最好能在每个模块都加上Option Explicit以确保变量合法性
[阅读全文] [PDF]
在VB里MDI(Multiple Document Interface多窗口)窗体是这样定义:“MDI窗体作为个后台窗口包含着MDIChild属性为True窗体”在个VB中至多只能存在个MDI父窗体可以有多个MDI子窗体;建立个MDI父窗体思路方法是在VBFile菜单里选择“New MDI Form” 在MDI运行时如果子窗口具有菜单那么当子窗口被激活时子窗口菜单就会自动替换父窗口菜单;当子窗口被最小化时在MDI父窗口里就会出现子窗口图标
Windows通用图形界面出现使计算机用户不必通过专门学习就 [阅读全文] [PDF]
Visual Basic(以下简称VB)是Windows下个面向对象可视 化开发环境,功能非常强大下面笔者就自己在实际软件Software开发过程中 获得些经验和大家作以交流
提示钮实现
如果自己留心点儿,定注意到了Microsoft公司系列产品 (如Word、Excel甚至B 本身),都为其应用命令按钮提供了信息 如用户不清楚软件Software中所列图标按钮功能, 可将鼠标移至该图标按 钮上,过会儿在其下方就会显示信息,介绍说明它作用,而鼠标移开 后,提示即消失
图1
这里我们利用mousemove这事件来实现先将Label1 [阅读全文] [PDF]
概述:COM+ 和 Windows 2000 Server 为开发分布式应用软件Software提供了个复杂基础组织构造这篇文章解释并且帮您确定您所需要掌握关键技术这些技术将会用来为Windows 2000 Server建造大规模信息系统 就这样个千年结束了而另个千年刚刚开始这种变化会给您作为职业开发人员生活带来多少冲击呢?当然当所有闹钟都指向了零时总会在这儿或哪儿产生些暂时波折些陈旧过时系统不得不被送到它们最终应该安息地方但是我们工业作为个整体并不会经历像些媒介预言那种所谓世界末日场面这对我们当中那些想要开发基于近几十年来所开发操作系统和开发工具上应 [阅读全文] [PDF]
1、VB中实现动态移动Control控件 窗体中Control控件如按钮、文本框等般在运行时位 置是固定不变但为了能给用户更方便功能我们可以做到在运行时动态移动Control控件 位置比如我们可以允许用户随便将按钮放到自己喜欢位置而并非界面中固定位置 其实这个功能实现起来是很容易只需要使用APISendMessage传递Control控件移动消息 即可
下面是个例子当用户单击按钮后可以移动按 钮位置
在窗体总体声明部分声明SendMessage及 用到两个常量:
PrivateDeclareFunctionSendMessage
Lib& [阅读全文] [PDF]
VB没有提供直接读写I/O口思路方法所以只能借助其他语言来编写DLL然后在VB中
如果你在Windows下使用过C/C那么编写这样DLL可能没有什么困难在C语言里都包括inp和outp可以把下面这段C语言代码(32位)编译生成DLL然后在VB中
代码如下:
#
#
/*作用:从指定端口读入个字节
参数:portid端口号
返回值:读入字节*/
_stdcall Inport( portid)
{
inp(portid);}
/*作用:向指定端口写入个字节
参数:portid端口号*/
void _stdca [阅读全文] [PDF]
按照百分秒格式显示时间
你可以编写下面代码来显示时间其中包括百分秒格式:
txt = Format$(Time, "hh:mm:ss") & Format$(Timer - Fix(Timer), ".00")
注意:Timer不能显示百分秒格式时间它只能精确到50毫秒
简易安装注册表项目
这里有个安装时设置注册表项目简单思路方法首先在机器上手工创建个项目比尽可能地将的放在所属子路径下面然后使用注册表编辑器输出这个包含项目子路径这就会创建个.REG文件最后将这个文件打包在安装向 [阅读全文] [PDF]
参数表-----------------------------------------------------
Angle光照倾角取值0到90的间以角度为单位
WidthOfArea光照区宽度取值大于1整数以像素为单位
Speed光照区运动速度取值大于1整数
EnhanceRatio光照强度参数取值大于1整数
-----------------------------------------------------
好原理就 [阅读全文] [PDF]
选择新建标准EXE工程在主窗口form1中绘制下表中所列Control控件并设置窗体和各Control控件属性
Control控件 属性 设置
Form1 Name Form1
ScaleMode 3-pixel
PictureBox Name PicDest
ScaleMode 3-pixel
Picture 背景图
PictureBox Name PicSource
ScaleMo [阅读全文] [PDF]
sp; 应用MapX编程两例
citylamp
0 MapX介绍
MapX是MapInfo公司提供具有强大地图分析功能ActiveXControl控件产品由于它是种基于Windows操作系统标准Control控件因而能支持绝大多数标准可视化开发环境如Visual C、Visual Basic、Delphi、PowerBuilder、Visual Studio.NET等编程人员在开发过程中可以选用自己最熟悉开发语言轻松地将地图功能嵌入到应用中并且可以脱 [阅读全文] [PDF]
style=\"WIDTH: 100%; mso-cellspacing: 0cm; mso-padding-alt: 0cm 0cm 0cm 0cm\" cellSpacing=0 cellPadding=0 width=\"100%\" border=0> 1、如果行太长能不能换行?
VB代码是允许换行书写只要在每次换行最后个加上换行“_”就可以了例如:
Sub PicMove
Frm.Picture2.Left = Frm.Picture [阅读全文] [PDF]
border=0 width=\"100%\"> VBAPI编程精粹()
在上篇中我们介绍了API编程基础知识和些比较“酷”API这期我们将配合专题介绍有关注册表编程API及其应用例子使读者朋友何能够将前面学到注册表知识推广到VB编程中继续向VB高手迈进(路漫漫……)当然上期说过要介绍更“酷”API可不能食言后半部分介绍平面工具条生成定会使您更“炫”!
. 注册表API编程
有关注册表知识相信您通过前面专题介绍已经有了较深入了解系统有 6个预定义好关键 [阅读全文] [PDF]
border=0 width=\"100%\"> VBAPI编程精粹( 2)
Visual Basic以友好易学可视化开发环境闻名于 世成为人们学习计算机编程首选语言目前全世界 大概有300多万人使用着Visual Basic语言如果您想在 这茫茫众生中出类拔萃那么您就不得不学习API (Application Program lnterface即Windows应用程 序编程接口)编程不懂API那可成不了高手
第节:API基础
API说到底就是系列底层 [阅读全文] [PDF]
gn=center>
周俊敏
JPEG压缩格式是目前图像处理领域里面用得最广泛种图像压缩方式它实现主要分成 4个步骤:
1.颜色模式转换及采样;
2.DCT变换(离散余弦变换);
3.量化;
4.编码(有算术编码和霍夫曼编码两种这里采用霍夫曼编码)用VB语言编程实现以上 4个步骤即完成了JPEG压缩过程这里假设给定源图像是幅24位真彩色BMP图像
、颜色转换及采样
1.颜色转换:对BMP图像中颜色数据进行由RGBYCbCr转换Y表示亮度Cb [阅读全文] [PDF]
ion Explicit
Public Declare Function CreateWindowEx Lib \"user32\" Alias \"CreateWindowExA\" (ByVal dwExStyle As Long, ByVal lpClassName As String, ByVal lpWindowName As String, ByVal dwStyle As Long, ByVal x As Long, ByVal y As L [阅读全文] [PDF]
- +_@开青岛发票13434444051程生
- 一个简单的 2层系统分析全程
- 主题和皮肤系列(3)
- 主题和皮肤系列(1)
- 主题和皮肤系列(2)
- 鼠标移上去显示层:鼠标滑过显示隐藏层(转)
- jspajax自动刷新:jsp+ajax自动刷新例子(转)
- form表单验证:用js将form表单同时提交到两个区别页面的思路方法
- php上传代码:php统计代码总行数
- 最佳网页宽度及其实现
- 联想2155:PKU 2155
- micboost什么意思:Boost 概述
- atmega16ucosii:μC/OS-II实时性能测试和分析
- cssimportant:4 种实时操作系统实时性的分析对比 --转 time too important
- 基于OHCI的USB主机 —— 总体构架
- 虚拟主机usb:基于OHCI的USB主机 —— 背景介绍
- vc用法:VC使用方法汇总
- 张孝祥《Java就业培训教程》源代码 02 部分
- 抽象类和接口:详细解析Java中抽象类和接口的区别
- 跟踪技术:JSP中的会话跟踪技术