-
VB 6.0 打印与打印预览功能源码
VB 6.0 打印与打印预览功能源码,这个打印预览可以调节预览的放大倍率,在不同的放大状态下预览打印内容,支持打印文字内容和图片的内容,自动调用Windows默认的打印机进行打印,如测试截图所示的效果。
- 2023-05-22 11:35:03下载
- 积分:1
-
VB将 数组元素作为实参
VB将 数组元素作为实参,本例可以求出三个一元二次方程的根。请先单击命令按钮,先输入各个方程的系数,
- 2023-06-29 13:10:04下载
- 积分:1
-
VB演示 FileToSplit分割文件与合并文件
VB演示分割文件与合并文件,这里使用到比较多的文件操作函数,比如FileToSplit、FileLen、UBound、FileCount、FileInfo等。本范例文件分割的思路:程序通过调用FreeFile函数来取得可以的文件号,以二进制的方式打开文件,根据文件的长度FilesLen和每个分割单位的比较,得出被分割之后的子文件个数,重新定义最后一个子文件的大小,将所取得的内容,分别存储到各个子文件中,将文件分割情况,存储到自定义的结构类型FileInfoFile中,最后将文件分割的情况,存入到模版文件中。
关于文件合并,则可看作是上述的逆过程,不再详述,请参见源码中的文件注释。
- 2022-11-15 13:30:03下载
- 积分:1
-
一个使用Winsock控件的VB典型范例
一个使用Winsock控件的VB典型范例,架构为CS结构,由服务端和客户端组成,两者都运行后,可互通消息。调试步骤:
1)打开服务器端的“工程1.dsw”工程
2)点击运行按钮。
1)打开客户端的“工程1.dsw”工程
2)点击运行按钮。
3)此时服务器端和客户端已经建立连接
4)在服务器和客户端分别输入任何内容,另一端将会收到该内容并显示出来。
说明:必须先运行服务器端工程,再运行客户端工程。
- 2022-03-17 18:04:14下载
- 积分:1
-
VB 写的拼图 用数字代表图片
VB 写的拼图 用数字代表图片,将数字的顺序排列好,就完成了拼图,比起图片版的拼图,要简单多了。
玩法:将数字1挪动到最开始的位置,如何移动?要把占位的数字一个一个挪开,依次为1、2、3等数字让位,把整体排序好,就拼好了。
- 2022-07-23 16:53:18下载
- 积分:1
-
VB将程序图标添加到托盘
VB将程序图标添加到托盘,任务栏的系统托盘上有本程序的图标,并可通过图标的右键菜单,调出程序主窗口、退出关闭程序等功能,是一种比较常见的添加系统托盘的示例。
- 2022-03-24 10:49:35下载
- 积分:1
-
VB6.0 获取网络连接信息
VB6.0 获取网络连接信息,在如图所示的窗口中,点击按钮即可获取显示本机的网络连接信息,这些信息包括:
是否通过LAN连接、是否通过Modem连接、是否通过Proxy连接、是否在线连接、是否安装了网络RAS等信息。获取完成最后可提示:“系统通过LAN与Internet连接,系统安装了远程访问服务”。
- 2023-05-26 06:40:02下载
- 积分:1
-
VB NET写的DVD播放器源代码
播放器窗口界面中的操作菜单,实现了弹出菜单的功能,把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。
播放器功能支持DVD格式的视频播放,包括了暂停、播放、停止、弹出等功能。
本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
- 2023-05-18 15:05:03下载
- 积分:1
-
VB的保存文件对话框调用创建一例
VB的保存文件对话框调用创建一例,弹出“打开”对话框,还有保存对话框,另存为对话框,通用对话框,cdlOFNFileMustExist当用户输入非法的文件名时,要显示一个警告。
cdlOFNReadOnly指示对话框关闭时只读复选框的状态。。
- 2022-02-11 13:06:23下载
- 积分:1
-
VB 控件随窗体自动调整大小
VB 控件随窗体自动调整大小,像窗口中的ListBox、Image、FileListBox、VB.Frame控件等,都可以随窗口的大小变化而变化,当用户拖动改变窗口大小时,这些控件的大小也会随之改变,这个功能的实现得益于自定义函数Form_Resize(),用此来控制各个控件的变化,来看代码:
Dim x, y As Long
x = Form1.Width - 200 - Frame1.Width - Image1.Width
y = (Frame1.Height - Drive1.Height - Drive1.Top - 200)
Frame1.Width = Frame1.Width + x / 2
Image1.Left = Frame1.Left + Frame1.Width + 100
Image1.Width = Image1.Width + x / 2
Image1.Height = Me.Height - 600
Frame1.Height = Image1.Height
Dir1.Width = Frame1.Width - 280
File1.Width = Dir1.Width
Drive1.Width = Dir1.Width
Dir1.Height = y / 3
File1.Top = Dir1.Top + Dir1.Height + 100
File1.Height = 2 / 3 * y
此段代码被封装在按钮事件中,请参见源代码文件。
- 2023-02-03 17:15:04下载
- 积分:1