VB6 附庸风雅
文章平均质量分 74
VBWinner
这个作者很懒,什么都没留下…
展开
-
在VB6中使用API函数实现矢量图的绘制
<br />在VB6中绘制矢量图并没有想象中那么困难,其实只要使用一个增强型图元文件(EMF文件)并配合3个API函数就可以实现矢量图的绘制。上述的API函数分别是GetEnhMetaFile、GetEnhMetaFileHeader、PlayEnhMetaFile。<br />以下是上述函数的原型:<br />(1)Declare Function GetEnhMetaFile Lib "gdi32" Alias "GetEnhMetaFileA" (ByVal lpszMetaFile As Strin原创 2010-09-03 11:05:00 · 3203 阅读 · 0 评论 -
AT 语音命令
<br />AT 语音命令<br />语音命令 <br /> 命令 描述 <br /> +FCLASS=8 进入语音模式。AT+FCLASS=8 将调制解调器置入语音模式。扩音电话和 TAM <br /> 模式包括在通用语音模式中,并使用特定的语音模式命令子集来执行各自的特性和功能。调制解调器控制器将维持系统总体状态,以便掌握使用扩音电话在 TAM <br /> 的环境或其它语音环转载 2010-09-03 11:10:00 · 1152 阅读 · 0 评论 -
VB实现ADSL自动拨号的2种方法
<br />VB实现ADSL自动拨号的2种方法<br />方法1:<br />Private Sub Command1_Click() <br />shell "rasdial <连接名称> <连接用户名> <连接密码>" <br />End Sub<br />方法2:<br />1、第一个问题还要添上连接名(就是拨号连接的名字) <br />我这里有一个现成的代码,挺长的,能上网、断网、查看网络状态、查看连接数目,如果其它的不需要的话,自己看函数的名字,删了即可 <br />把一下代码粘贴到模块中,在窗体转载 2010-09-03 11:08:00 · 1053 阅读 · 0 评论 -
VB6 鬼怪二三事
本人最近灵异小说看多了,遇到一些出乎意料的现象都喜欢归咎于“灵异事件”。在使用VB6编程时,本人就遇到过几个诡异的现象。有些现象经过思考后可以找到其中的原因,但是有些的至今没找到答案。先来看看已经找到答案的:Msgbox Text1.Text - Text2.Text。如果在Text1中输入12,Text2中输入12.8,返回的结果不是预想的0.8,而是 -800000000000001。出现这种现象其实是“精度”在作怪。将代码修改为:Dim i as Singlei=Text1.Text - Text2.原创 2010-09-03 13:47:00 · 532 阅读 · 0 评论