-
VB.NET窗体Tab 读取ini文件 界面滑动等功能集
本源码基于VB.NET编写,集合了VB.NET中的读取ini文件,窗体Tab标签,界面滑动等效果,界面看上去是一个音乐播放器,其实本程序是侧重于界面的编程设计,演示了窗口中TAB标签切换、界面滑动以及整体界面的美化的具体实现,使用了比较多的三方DLL,已经都打包了,感兴趣的下载源码,在VS2012版本以上的VS中打开并编译。
- 2022-01-26 07:32:46下载
- 积分:1
-
vb根据用户输入的内容决定显示指定内容
vb根据用户输入的内容决定显示指定内容,从例子来看,是一个数据库搜索的例子,也就是用户搜索的什么,列表中会显示出相关内容。只是说法不同而已,为了可以正常运行,本示例中的数据库采用Access数据库,数据库文件为:db_Client.mdb。
- 2022-08-23 09:42:29下载
- 积分:1
-
VB 演示如何使用WeekdayName获取星期名称
VB 演示如何获取星期名称,这里获取星期几是使用了VB内置的WeekdayName函数,将获取到的日期和星期几直接显示在Text控件中,下面是这个函数的具体用法:
Private Sub Command1_Click()
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
Private Sub Form_Load()
Text1.Text = Date
Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)
End Sub
在VB6.0 IDE环境中编译此源代码,生成如演示截图所示的运行效果。
- 2022-11-30 01:55:03下载
- 积分:1
-
VB6.0 Mid判断指定字符串出现的次数
VB6.0 判断指定字符串出现的次数,判断字符串A在字符串B中出现的次数,使用了VB的Mid函数来判断,如图所示的运行效果,单击按钮即可查看运行结果。代码验证判断部分,采用for循环遍历判断,代码如下:
Dim j As Integer
j = 0
For i = 1 To Len(Text1)
If Mid(Text1, i, Len(Text2)) = Text2 Then
j = j + 1
End If
Next i
Label2.Caption = "出现" & j & "次"
- 2022-03-18 12:18:22下载
- 积分:1
-
telnet VB源代码
一个不错的VB TELNET实现源码,虽然很简单,但是对于新手来说比较容易学习
- 2023-02-26 22:25:03下载
- 积分:1
-
vb 设置窗体透明度
vb 拖动滑块设置窗体透明度,在如图所示的窗体中,有一个滑块可左右滑动,用户可改变滑块的值,来改变窗体的透明度,如图所示是在30%位置的透明度效果,滑块往右,则透明度减小,也就是窗体越清淅,往左则窗口越来越透明。源码运行于VB6.0,欢迎VB爱好者下载研究源码。
- 2022-02-04 04:51:17下载
- 积分:1
-
VB Seek语句设置随机访问文件的读取位置
VB 设置随机访问文件的读取位置,本例中是使用Seek语句来设置随机访问文件的读取位置,代码编写方面,主要是掌握Seek的用法,以下代码将用户的单击行为作为触发Seek的事件条件:
Private Sub Command1_Click()
Dim str As String * 10
Open App.Path & "MyFile.txt" For Binary As #1
Seek #1, 5
Get #1, , str
Text1.Text = str
Close #1
End Sub
当用户单击按钮后,执行seek语句。
- 2022-03-24 08:37:41下载
- 积分:1
-
VB的保存文件对话框调用创建一例
VB的保存文件对话框调用创建一例,弹出“打开”对话框,还有保存对话框,另存为对话框,通用对话框,cdlOFNFileMustExist当用户输入非法的文件名时,要显示一个警告。
cdlOFNReadOnly指示对话框关闭时只读复选框的状态。。
- 2022-02-11 13:06:23下载
- 积分:1
-
VB.NET邮件发送实例 可发附件
VB.NET编写支持发送附件的邮件发送实例,本实例源码中包含用于将电子邮件发送到简单邮件传输协议(SMTP)服务器进行传送的类,这里使用了SmtpClient 类发送电子邮件,可设置允许添加的附件类型,支持文本文件(*.txt)|*.txt|Word文档(*.doc)|*.doc|图像文件*.BMP;*.JPG;*.GIF等格式,为了避免程序出错,在本程序刚启动时,帐号、密码框暂时不可用。
- 2022-08-15 21:36:57下载
- 积分:1
-
VB.NET API函数画线条示例
VB.NET API函数示例,使用VB api函数画线条的一个例子,如图所示的效果中,鼠标单击两端,即可画出一条直线,主要是学习使用VB.NET中的API画图函数用法。示例运行效果请参见截图所示,本页提供该实例的源码下载。
- 2022-03-22 10:44:12下载
- 积分:1