按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
Q：我的 VB6 总把全角符号和半角符号一样对待，而且它对字符串的长度也辨不清如len（中华人民共和国）的返回值为 7。而其 FileLen（） 的返回值却又似乎正常，等于文件的长度（Bit），请问到底得如何解决？
23
Q：能否在 VB 中作 DLL 文件？ 24
Q：如何在不使用 Windows 的打印对话框或打印设置框的情况下，在 VB 程序中设定打印机的自定义纸张尺寸？
25
Q：在 VB 中如何控制计算结果的整数位和小数位？ 26
Q：在 VB6。0 中如何区分汉字和半角西文字符？
27
Q：微软 VISUAL J＋＋ 和 JAVA 有什么不同？ 28
Q：如何在 VB 中调用资源文件中的资源，如图片、光标等？
29
Q：是否运行用 Delphi 开发的数据库应用程序时，一定要装 BDE？ 能否可以将其包含在应用程序中，使不安装 BDE，就可行？ 30
Q：请问怎么样将用 VFP5。0 编写的小软件编绎成可以脱离 VFP 而独立运行的软件？
31
Q：如何在 VC＋＋6。0 中使用 MSm 控件与单片机通讯？ 要求是 PC 机发一个字节的命令，单片机返回相应的 13 字节数据。 32
Q：VB 网格中输入数据
33
Q：启动“控制面板”中的设置程序 34
Q：交换鼠标左、右键
35
Q：程序控制光驱（开）关 36
Q：用程序遥控计算器VB 的 SendKeys 语句范例
37
Q：ASP 编程中参数传递的几种方法 38
Q：一次性清空本窗口内所有文本框（TextBox）
39
Q：怎样在 VB 程序中播放 Flash 动画？ 40
Q：怎样在 VB 程序中实现图象扫描功能？
41
Q：在 VB 编程中检测声卡是否存在？ 42
Q：在 VB 中终止 Windows95 的运行
43
Q：给一大段 VB 程序一次性加上注释符号 44
Q：VB 中在一个窗体中执行另一个窗体中的代码
45
Q：Visual Basic 5。0 支持类吗？ 46
Q：在 VB 5。0 中文版中，表单上最多允许有多少个控件？
47
Q：Visual Basic 能用来创建在 Windows CE 环境下运行的应用程序吗？ 48
Q：Visual Basic5。0/6。0 能用来创建 Windows NT 服务吗？
49
Q：Microsoft Visual Basic 5 除了支持本机编译的代码外，还支持 p 代码吗？ 50
Q：Microsoft Visual Basic 可以在 Macintosh 上使用吗？
51
Q：Visual Basic 5。0/6。0 支持 16 位开发吗？ 52
Q：Visual Basic 5。0 中文版内的 Text Box 能存储 64K 以上的数据吗？
53
Q：在 ASP 编程中统计查询结果的记录数 54
Q：为何无法编译成 dll 文件？
55
Q：资源文件有什么用处？ 56
Q：如何在 DOS 程序结束执行时，自动将其关闭？
57
Q：VB 编程中打开默认网址和 Email 的更简单的方法 58
Q：我用 VB6。0 的 ActiveX dll 工程开发了一个在 ASP 中调用的 dll 类型库，里面有好多封装的函数，我能不能在 VB 的 EXE 工程中利用它们？
59
Q：“我爱你”病毒传播的秘密 60
Q：在 PowerBuilder 中使用 RichTextEdit 控件，属性中没用 Font，我想设置字体怎么办（如果不设字体，读入一个文本文件，缺省的字体对不齐）？
61
Q：在一个 PowerBuilder 程序中，我想用 RichTextEdit 控件从本地取文本文件显示，可是在我的机器上 RTE 只能显示出少量英文和乱码，程序并没有编错，因为相同的程序在其他人的机器上显示出的是正确的文本，不知是什么原因？ 62
Q：如何在 PowerBuilder 的 BLOB 字段中写入大于 1M 的文件（数据库为MSSQL 7。0）？
63
Q：用程序控制电脑说英语？ 64
Q：怎样判断、防止程序重复执行？
65
Q：如何结束 Shell 所启动的程序？ 66
Q：用 VB5。0 创建 Windows 程序组中的快捷方式
67
Q：VB 中使 TextBox 按 Mouse 右键时只出现自定 PopUp Menu？ 68
Q：用 VB 实现拖放功能
69
Q：用 VB 程序如何改变桌面墙纸的图片？ 70
Q：用 VB 程序捕捉屏幕图像
71
Q：测试表中的记录总数又一法（笨而准确） 72
Q：如何判断生成的记录集是“空集”（记录数为 0）？
73
Q：VB 编程中如何使窗口右上角的关闭按钮（X）失效？ 74
Q：用 VB 实现超级链接功能
75
Q：在 VB 安装程序中加入“卸载”功能 76
Q：怎样在 VC＋＋ 中产生闪烁的光标
77
Q：VFP 程序编译成 。EXE 文件后运行，为在什么屏幕上一闪而过就结束了？ 78
Q：VB 中如何在保存并覆盖文件时让其出现对话框，询问是否替换
79
Q：VB6 中的字体出现乱码怎么办？ 80
Q：怎样用 VB 编写多线程程序
81
Q：加快 Delphi5。0 启动速度 82
Q：观察 Delphi5。0 内存堆分配情况
83
Q：Delphi 中如何在打印或打印预览前获取报表页数 84
Q：如何在 Delphi 中实现普通文件的拷贝？
85
Q：用 Delphi 编写支持多国语言的程序 86
Q：在 SQL Server 中怎么样恢复数据的存储？
87
Q：Asp 中无 DSN 法连接 SQL Server 数据库的方法及其注意问题 88
Q：Delphi 中判断系统是否已经安装了声卡
89
Q：用 ASP 打开 Web 服务器上的应用程序 90
Q：一个用进度条表示的时钟
91
Q：Delphi 中实现对日期数据的有效性检验 92
Q：PHP4 的 CGI 版本和 ISAPI 版本有什么区别？
93
Q：VFP6。0 一条语句有多长？ 94
Q：Delphi 中调用 Windows API 函数 ShellExecute 实现打开 IE 和 Outlook 应用程序？
95
Q：用一条 SQL 语句找出“相同的客户代码中序号最大”的那些数据 96
Q：在 Delphi5。0 中怎么找不到 Html 组件？
97
Q：在 Delphi 中实现控件焦点转移？ 98
Q：在 Delphi 中判断本程序是否已经运行？
99
Q：Delphi 与 VB、ASP 带变量参数 SQL 语句的比较100
Q：Delphi 实现渐变窗口背景
第五卷 第二章
？101；Q：用 Visual Basic 保存 BMP 文件：
A： 在用VB编制绘图程序时，有时需要将窗体或图片框上的绘图结果形成一个定制的图形文件保存起来，以便以后浏览或修改。这一功能可以用 VB 本身带有的 SavePicture 语句来完成。
SavePicture语句将窗体、图象控件或图片框中的图形图象保存到磁盘上的一个文件中，这些图象可以是使用画图方法（Line，Circle，Pset）产生出来的，也可以存储那些通过设置窗体或图片框的图片属性或者通过PaintPicture 方法或 Load Picture 函数载入的图象。这些载入的图象可以是 BMP、ICO 或 WMF 图形文件。
SavePicture 语句的语法格式如下：
SavePicture picture，stringexpression
参数 picture 为窗体或图片框的 picture 或 image 属性；参数 strngexpression 为保存的文件名。
下面举一个具体的程序来说明定制图象文件的过程：
1、创建一个新的项目文件，在 Forml 中加入一个图象控件 Picture1，将Picture1 的 AutoRedraw 属性设置为 True；
2、在Form_Load（） 事件中，加入如下代码：
Private Sub Form－Load（）
Dim CX As Integer
Dim CY As Integer
Dim Limit As Integer
Dim Radius As Integer
CX＝1000
CY＝1000
For Radius＝0 To Limit
Picturel。Circle（CX；CY）；Radius；RGB（Rnd*255；Rnd*255；Rnd*255）
Next Radius
SavePicture Picturel。Image；〃c：custom。bmp〃
End Sub
执行此程序就会把图片框 Picture1 上的图象保存在 C： 盘根目录下 custom。bmp 图象文件中。
最后有两点需要指出：
1、在使用 SavePicture 语句之前，必须先将窗体或图片框的 AutoRedraw 属性设为 True，否则保留的将是一张空图；
2、使用 Image 属性保存的用画图命令（如 Line，Cirele，Pset 或 Print）画出来的图形总是以 BMP 文件格式保存。但在程序设计时如果使用窗体或图片框的 Picture 属性载入或在程序运行时通过 LoadPicture 函数载入的图象，使用 SavePicture 语句存储时，存储的文件格式同其载入前的文件格式一样（如 ICO 格式等）。
102；Q：在 Visual Basic 中如何拖动窗体或控件？
A：现在的许多 windows 下的应用程序，都采用了图形化的界面，但是在这样的界面下就不能使用 Windows 原来的标题条了，否则会影响界面的美观。那么在没有标题条的情况下如何用鼠标拖动窗体或者其它的控件呢？
其实，采用 API 函数调用很容易实现，下面我们以拖动窗体 Form1 为例来具体讲一下实现方法：
1、新建立一个项目，名称为 test。vbp；
2、填加一个模块，名称为 test。bas，并且在声明部分加入以下代码：
Declare Function ReleaseCapture Lib 〃user32〃 （） As Long
Declare Function SendMessage Lib 〃user32〃 Alias 〃SendMessageA〃 （ByVal hwnd As Long； ByVal wMsg As Long； ByValwParam As Long； lParam As Any） As Long
Public Const WM_SYSMAND &H112
Public Const SC_MOVE &HF012
其中 ReleaseCapture 函数是用来释放鼠标捕获的，SendMessage 函数是一个在 Windows API 中非常重要的函数，在这里的作用是用来向 Windows 发送移动窗体的消息。WM_SYSMAND 是向 Windows 发送消息的常量。SC_MOVE 是控制移动窗体的常量。请注意：这里 SC_MOVE 的赋值是 &HF012，表示鼠标对象。
3、在窗体的 MouseDown 过程中加入以下代码：