注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

何丽杰 廊坊师范学院信息技术提高班十一期

任何地方, 只要你爱它,它就是你的世界。

 
 
 

日志

 
 

vb中的小问题(4)  

2014-01-27 15:04:49|  分类: 疯狂计算机 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

1、ByRef 参数类型不匹配

按缺省规定,一个以 ByRef (按址)方式传递的参数,必须具有该过程所允许的正确数据类型。这个错误的起因与解决方法如下所示: 

传递的参数,其类型不能被强迫转成所需的类型。 

例如,如果预期的是 Long,而传递的却是 Integer 变量,就会生成错误。假如您想要避免发生这种情形,可以将参数放在括弧中来传递。例如,若要传递 Variant 参数 MyVar 至一个必须是 Integer 参数的过程,您可撰写以下的调用:

Dim MyVar

MyVar = 3.1415

Call SomeSub((MyVar))

Sub SomeSub (MyNum As Integer)

MyNum = MyNum + MyNum

End Sub

将参数放在括弧中,强迫其作为一个表达式来计算。在此期间,数值的小数部分会被四舍五入(并非被截断),使它符合所预期的参数类型。计算结果会被放在一个临时区,而该过程会收到该临时区的地址。因此,原来的 MyVar 会保留其值。

2、用鼠标模拟画笔画图
       Option Explicit
       Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
       If Button = 1 Then
       Picture1.PSet (X, Y), RGB(Rnd * 255, Rnd * 255, Rnd * 255)
       End If
       End Sub
     vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
  这样就可以随心所欲的画画了,另外在另一个地方也有此功能。
工程→部件→可插入对象→位图图像。不过这个只能在启动前编辑,画完启动后观看。
 3、API 函数
     调用一个API函数之前,必须在vb窗体模块,标准模块或类模块中用declare语句对其进行声明。(只需声明一次)
            窗体模块:private 私有过程声明,只能在窗体中调用。
            标准模块:public 公有过程声明,任何窗体或模块调用。
            有返回值用function声明,没有返回值有sub声明。
vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
 4、API 文本浏览器的使用
   (1)打开:执行菜单“外接程序”→“外接程序管理器”→VB 6 API  viewer→单击“加载/卸载”复选框→确定→即可将API浏览器加载到“外接程序”菜单中→再执行菜单“外接程序”→“API浏览器”命令,可打开API浏览器。
   (2)将API 函数复制或插入到vb中。
单击”文件“下的“加载文本文件”,选择win32API.txt,然后你需要什么函数就可以在里面找什么函数。
vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
 (3)将API函数插入窗体或模块中:
vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
 vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
 也可以将选择的函数添加到标准模块中。
 vb中的小问题(4) - 何丽杰 - 何丽杰-廊坊师范学院信息技术提高班十一期
这样你就可以调用好多函数。而不用自己动手敲代码,还避免了好多错误。

 
 
  评论这张
 
阅读(31)| 评论(30)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017