-
VB 以TextStream流的方式打开文本文件
VB 以流的方式打开文本文件,创建FileSystemObject MyFSO对象,创建TextStream对象,然后使用对象GetFile文件,最后使用对象OpenAsTextStream读取流文件,具体用法,可参见以下代码:
Private Sub Form_Load()
Dim MyFSO As New FileSystemObject
Dim MyFile As File
Dim MyTS As TextStream
Set MyFile = MyFSO.GetFile(App.Path & "MyFile.txt")
Set MyTS = MyFile.OpenAsTextStream(ForReading)
Text1.Text = MyTS.ReadAll
MyTS.Close
End Sub
完整的可编译实例,请下载源码包。
- 2022-06-14 22:18:23下载
- 积分:1
-
VB制作圆形窗体界面
VB6.0制作圆形窗体界面,打开后是一个矩形窗体,双击后变为一个圆形窗口,创建一个矩形区域的API函数,用来将窗口恢复为矩形,同时创建一个椭圆形区域的API函数,圆形应该是一个规则的矩形窗口,代码还是挺简单的,而且还有注释,非常适合学习研究VB的窗体制作,有兴趣的下载源码。
- 2022-04-14 23:47:36下载
- 积分:1
-
VB MSChart图表控件实例:柱状图的实现
VB 柱状图生成的例子,看看,是不是很实用的图表效果,这种图表也叫做直方图表,这是纵向的,也有横向的柱状图.本柱状图的生成是使用了Vb内置的微软图表控件MSChart控件,因此可看作是此控件的应用范例.
- 2022-04-15 23:55:01下载
- 积分:1
-
vb6.0 字节数组和字符串的相互转换
vb6.0 编程实现字节数组和字符串的相互转换,演示如何进行字节数组和字符串的相互转换.
- 2023-03-14 07:50:04下载
- 积分:1
-
VB6.0 如何计算加权平均值
VB6.0 代码演示如何计算加权平均值,计算加权平均值可编写以下代码实现:
Private Sub Command1_Click()
Text7.Text = jiaquan(Text1, Text2, Text3, Text4, Text5, Text6)
End Sub
Private Function jiaquan(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer, ByVal d As Integer, ByVal e As Integer, ByVal f As Integer)
Dim sum As Integer
sum = (a * b + c * d + e * f) / (b + d + f)
sum = Round(sum, 2)
jiaquan = sum
End Function
- 2022-02-25 12:19:27下载
- 积分:1
-
VB.NET应用程序管理工具-类似360桌布助手
这是一个用VB.NET开发的应用程序管理工具-类似360桌布助手的某此功能,通过导入保存有常用程序列表的XML文件,来通过程序来管理各应用程序的快捷方式,用户可以把常用的程序收集起来,在这里可以直接双击列表中程序名称或点击【启动程序】来启动每个程序。不用到处找你所安装的程序或软件。方便,快捷,常用程序列表:(用户可以拖放任何文件到下面列表中)。
程序列表的操作有导入和导出。
- 2022-08-20 10:25:11下载
- 积分:1
-
VB6.0检查是否有拨号连接
VB6.0检查你的电脑是否有拨号连接,获取本机的网络连接列表,重点是检测是否有拨号网络连接。
- 2022-07-25 20:56:18下载
- 积分:1
-
窗体分割 窗口分栏程序- vB版
窗体分割 窗口分栏程序- vB版,这个可将窗口分为上下部分、左右部分,可分成二栏、三栏,通过程序左侧的参数设置面板,决定程序窗口要经过怎么的切割。本源码同样来自于国外源代码网站。代码注释英文,这里就不帖代码,你可以单击页面底部的“下载源码”按钮,下载本窗口切割实例的完整源码。
- 2022-09-05 06:00:03下载
- 积分:1
-
VB6.0演示的AutoSize实例
VB6.0演示的AutoSize实例,自动改变图片框的大小以显示图形全部内容,当图片框比图形小时,图形超出部分不被显示,减少图片框高度,使图片框小于图形。
- 2022-08-07 04:59:17下载
- 积分:1
-
Vb6.0 仿制资源管理器界面折叠菜单
Vb6.0 仿制资源管理器界面折叠菜单,这个菜单的形式估计大家都见到过,像Windows窗口右侧的资源管理器窗口那样,鼠标单击的时候会折叠起来,再次点击会展开所属子菜单项,相信这个菜单的功能不用多介绍了,代码方面实现还是挺麻烦的,有兴趣的下载源码参见代码。
- 2023-01-05 08:10:03下载
- 积分:1