VB的“问”与“答”

荭人小熙

荭人小熙

2016-02-19 16:30

图老师设计创意栏目是一个分享最好最实用的教程的社区,我们拥有最用心的各种教程,今天就给大家分享VB的“问”与“答”的教程,热爱PS的朋友们快点看过来吧!
作为一个VB爱好者,一个人在黑暗中摸索真是太累了。现将我摸索的一些心得贡献给大家,希望起抛砖引玉的作用(我用的是VISUALBASIC50中文版)。
  1.问题:有一程序含有两个Form,其中Form2的Picture属性为一张BMP位图,而以下是Form1显示Form2的程序:
  Form2Show
  '延迟2秒
  Time1=Timer
  WhileTimer-Time12
  Wend
  以上程序的目的是希望显示Form2的图片两秒之后,Form1才继续执行,结果竟然是2秒之后,Form2的图片才显示出来。为什么图片会延迟显示呢?
  回答:一般而言,绘图会比一般的指令费时,因此,绘图指令的优先级较低,也就是说,直到其他指令都执行完毕之后,才会轮到绘图指令的执行,在以上的Form1程序中,由于Form2Show之后,又执行了一个费时2秒的While循环,因此,Form2的图片必须等待2秒钟,才会被描绘出来。
  可按如下方法解决:
  在While循环中增加DoEvents,如下:
  Form2Show
  '延迟2秒
  Time1=Timer
  WhileTimer-Time12
  DoEvents
  Wend
  DoEvents的作用是短暂地停止执行,使得优先级较低的绘图指令被执行,于是Form2的图片便可以在While循环执行的阶段就被显示出来。
  2.问题:在编数据库程序时,根据帮助来声明变量,如下:
  DimdbAsDatabase
  DimrsAsRecordset
  结果程序编译时VB竟然说“用户定义类型未定义”,是何原因呢?
  回答:Database及Recordset属于DAO(DataAccessObject)模块里的,不是VB内定的,因此必须将DAO的定义包含在“引用中”,VB才会认得Database及Recordset,操作方法是选取功能表的“工程(P)”,待出现“引用(N)”窗时,再选取MicrosoftDAO30ObjectLibrary或MicrosoftDAO25/30CompatibilityLibrary(兼容Access20以前的版本)。(如果使用的是16位版本的VB,则选取MicrosoftDAO25ObjectLibrary)
  3.问题:我想控制I/O,VB是否有类似QuickBASIC的INP、OUT指令可使用?
  回答:VB并无INP及OUT的指令可用,即使是Windows的API函数也没有类似的函数,原因是Windows不希望应用程序直接控制硬件。如果想控制RS232的通讯口,则VB专业版(或企业版)有现成的“MSComm”控件可用。
  4.问题:如何创建椭圆形的窗体?
  回答:当然是用Win32API函数了,用VB50中文版的API文本查看器将下列API函数加入窗体的通用代码中,就可以做一个椭圆窗口。
  PrivateDeclareFunctionCreateEllipticRgnLib″gdi32″(ByValX1AsLong,ByValY1AsLong,ByValX2AsLong,ByValY2AsLong)AsLong
  PrivateDeclareFunctionSetWindowRgnLib″user32″(ByValhWndAsLong,ByValhRgnAsLong,ByValbRedrawAsBoolean)AsLong
  在Form_Load()窗体中加入如下代码:
  PrivateSubForm_Load()
  Show
  SetWindowRgnhWnd,CreateEllipticRgn(0,0,300,200),True
  EndSub
  上述代码可以创建一个椭圆形状的窗口。->

展开更多 50%)
分享

猜你喜欢

VB的“问”与“答”

编程语言 网络编程
VB的“问”与“答”

新生宝宝吃奶粉上火的3问与3答

电脑网络
新生宝宝吃奶粉上火的3问与3答

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

苹果新机iphoneSE的10问10答

iphone iPhone 5s iPhone 6 iphone刷机
苹果新机iphoneSE的10问10答

秋冬肌肤美白实问实答

护肤
秋冬肌肤美白实问实答

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

七问七答帮你解决“毛问题”

美容
七问七答帮你解决“毛问题”

关于护精的10问10答

电脑网络
关于护精的10问10答

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

MAC设置默认浏览器的小技巧

MAC设置默认浏览器的小技巧

计算两个日期间的工作日

计算两个日期间的工作日
下拉加载更多内容 ↓