灯火互联
管理员
管理员
  • 注册日期2011-07-27
  • 发帖数41778
  • QQ
  • 火币41290枚
  • 粉丝1086
  • 关注100
  • 终身成就奖
  • 最爱沙发
  • 忠实会员
  • 灌水天才奖
  • 贴图大师奖
  • 原创先锋奖
  • 特殊贡献奖
  • 宣传大使奖
  • 优秀斑竹奖
  • 社区明星
阅读:20289回复:0

VB新手常见问题解答

楼主#
更多 发布于:2012-09-08 11:51

SP2、SP3、企业版有何区别

  问 请问VB中的SP2、SP3、企业版这三种,各代表什么含义?

  答 SP是Service Pack的缩写。微软每推出一个软件后,都会不定期地推出一些补丁程序,依时间先后称为SP1、SP2等等。后一个SP版本包括前一个版本的全部内容,所以如果你安装了SP3就用不着安装SP2了。SP可以从微软的站点免费下载。VB 5.0的SP下载地址:http://msdn.microsoft.com/vstudio/sp/vs97/。VB 6.0的SP下载地址:http://msdn.microsoft.com/vstudio/sp/default.asp。在Service Pack的Readme文件中介绍了该Service Pack修改了哪些错误。VB有三个主要版本:学习版、专业版、企业版。企业版是功能最全的版本,当然也是最贵的版本。


  API的意义是什么


  问 编程中经常碰到API。请问API的意义是什么?如何知道编程中经常用到的窗口句柄、窗口类名等?

  答 API是Application Programming interface(应用编程接口)的缩写,也就是应用程序调用系统功能的接口。Windows API主要包括由Windows系统定义的函数、消息及与之相关的数据类型。我们使用各种开发工具归根结底都是和API打交道。但是API本身比较难掌握,所以Visual Basic提供了可视的面向对象的控件,使初学者即使不太了解API,也可以编写Windows程序。但是Visual Basic提供的控件毕竟是有限的,不可能包括API的所有方面,所以一些复杂的功能仍然需要调用API来实现。


  API定义中的&H是什么含义


  问 现在我看到一些用API函数做的例程,其中有一个语句:PUBLIC CONST LVM_FIRST = &H1000 ,该语句中&H1000代表的是什么含义?

  答 &H是16进制的表示,比如&H10等于十进制的16。


  为何总提示“变量未定义”


  问 下面是一个关闭Windows的小程序:

  Option Explicit

  Private Declare Function ExitWindowsEx Lib “user32” (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

  Private Sub Form_Load()

  ExitWindowsEx EWX_FORCE Or EWX_LOGOFF Or EWX_SHUTDOWN, 0

  End Sub

  但编译的时候,总是提示:EWX_FORCE 变量未定义,但EWX_FORCE 是一个参数。这是为何?

  答 EWX_FORCE和其他几个参数都是Windows API中定义的常数。你使用了Option Explicit(这是个好习惯,便于发现错误),所以VB发现未定义的符号都会进行提示,这有助于发现拼写错误和遗漏参数定义。你应该从VB的Win32api.txt中复制这几个参数的定义。


  如何保存图片


  问 我在VB的主窗体要装入一幅事先选好的图片,程序运行后我可以在图片上进行修改并保存它,以备以后调用。请问怎样办?

  答 你可以把Form或PictureBox的AutoDraw属性设为True,进行修改后使用VB的SavePicture语句进行存盘。如:

  SavePicture Picture1.Picture, “c:\test.bmp”

  这种存盘的文件为.bmp文件,颜色数与当前屏幕的色彩数相同。如果你的存盘要求很高,希望控制存盘格式,只能借助于其他控件,比如ImageMan(http://www.data-tech.com下载)、Lead Tools(http://www.leadtools.com下载)等等。


  “实时错误9下标越界”错误


  问 我在为一数组赋值时出现如下错误:“实时错误9——下标越界”。出错的代码如下:

  Dim inputdata() As Single

  inputdata(0) = Text2(0).Text / Text2(1).Text 注释:入学率

  请问为何会出现这种错误?

  答 VB在使用数组前必须指定数组的大小。一种办法是在定义时确定大小,如:Dim InputData(10) As Single,另一种是采用动态数组。对于你的程序,数组声明部分可以不用修改,而在出错语句前加一句:ReDim InputData(10) As Single。


  如何打开光盘上的数据库


  问 我在编一个VB 程序,当程序刻到光盘以后,不能使用,经过检查发现是因为.mdb文件为只读,程序出错:“该数据库文件已经被另外的一个用户以独占的方式打开,您不能访问”。请问各位高手怎么办?可是我用Access却可以阅读该数据库(只读)。

  答 如果你用Data控件使用该数据库,将Data控件的ReadOnly属性设为True,将Exclusive属性设为True。如果ReadOnly属性为False,则就出现你所见到错误信息。如果不将Exclusive属性设为True,将出现Can注释:t lock file的错误信息。如果你是使用OpenRecordset语句打开数据库,Exclusive属性对应着dbDenyWrite和dbDenyRead参数。


  怎样避免当前窗口被关闭


  问 在按下右上角的关闭键后,怎样避免当前窗口被关闭?

  答 在按下关闭键后,会发生Form_Unload和Form_QueryUnload事件。这两个事件都有个Cancel参数,如果在事件处理过程中将其设为True就可以避免窗口被关闭。对于你的问题,Form_QueryUnload事件可能更好些,因为它有一个UnloadMode参数可以区分关闭窗口的指令是用户做出的,还是系统做出的,或者是本程序代码产生的。


  DLL的编程格式问题


  问 我是第一次编写ActiveX DLL程序,在DLL中,我只在类模块中写了一个函数CARD,编译成DLL后,在另外一个程序中调用,在模块中声明:

  Public Declare Function card_config Lib "c:\test\card.dll" (ByVal address As Integer, ByVal intermit As Integer)

  在一个按钮中写如下代码:

  c = card_config(12,12)

  运行后出现错误:编译Activex DLL后,调用时出现错误:“实时错误453,找不到DLL入口点”望指教。如有可能:请详细告之DLL的编程格式。

  答 Declare语句只能用来调用标准DLL,而不能用于调用ActiveX DLL,这是你程序出错的原因。VB无法生成标准DLL,只能生成ActiveX DLL。要调用ActiveX DLL,一般通过CreateObject语句调用,或在集成环境中选择菜单“工程/”,在对话框中选择你要调用的ActiveX DLL。这样你就可以在程序中使用ActiveX DLL中定义的对象或函数。


  怎样启动其他应用程序


  问 怎样在VB中启动其他Windows应用程序,例如记事本?

  答 你可以使用VB的Shell函数调用其他应用程序。如:

  Shell“Notepad.exe c:\autoexec.bat”


  如何打印 MSChart


  问 如何打印 MSChart 控件中的内容?

  答 MSChart本身没有打印功能,所以必须先用EditCopy将图像放在剪贴板中,然后再打印,如:

   MSChart1.EditCopy

   Printer.Print ″ ″

   Printer.PaintPicture Clipboard.GetData(), 0, 0

   Printer.EndDoc


  “can′t find dll entry point”是指什么


  问 出现以下错误信息是什么意思?“run-time error 注释:453注释: can注释:t find dll entry point openprocess in kernel 32 ”,(我有一个定义Private Declare Function openprocess Lib “kernel32" (ByVal dwdesireaccess As Long, ByVal bInherithandle As Long, ByVal dwprocessId As Long) As Long)

  答 把openprocess改为OpenProcess。因为在Win 32下,DLL中的函数名是区分大小写的。在kernel32中只有OpenProcess函数,没有openprocess函数。


  “对象不支持该属性或方法”错误


  问 为什么执行Data1.Recordset.FindFirst “PubID=” & DBCombo1.BoundText时出现“对象不支持该属性或方法”错误?

  答 这是因为FindFirst、FindNext、FindLast等方法不支持Table类的记录集,但可以使用Seek方法进行查找工作。但你必须对Pubid字段建立索引。如果想使用FindFirst方法,请修改Data1的RecordsetType属性为Dynaset。

喜欢0 评分0
游客

返回顶部