-
VB 6.0 在字符串中用一子串替换另一子串
VB 6.0 在字符串中用一子串替换另一子串,采用VB中内置的Replace函数来实现,类似这种的替换字符串方法,在平时使用十分广泛,在WEB编程的ASP/PHP/ASP.NET中,同样使用广泛。本示例中,主要是替换一个字符串中的指定位字符串,将其替换成其它字符。
关于Replace的用法,请看以下代码片段:
Text3.Text = Replace(Text1, Mid(Text1, 2, 2), Text2)
- 2022-01-26 05:32:59下载
- 积分:1
-
vb 6.0 排队叫号系统
vb 排队叫号系统源代码,Cobeyond排队系统,程序分为了中心控制端、CyMobile管理系统、系统通讯端口设置、系统数据库设置、最大终端客户数设置、检查服务器名和端口号等众多子程序。本排队叫号系统可广泛应用于银行大厅排队叫号、便民服务大厅排队叫号等公共服务场所,系统涉及硬件、数据库及网络各方面的编程知识,是一套比较综合的VB管理系统。其中服务人员子程序打开后的界面如截图所示,源码包中还包括了排队叫号系统设计的流程图、网络拓扑结构图等编程资料,请下载源码包查看详情。
- 2022-02-21 04:44:48下载
- 积分:1
-
VB 写的拼图 用数字代表图片
VB 写的拼图 用数字代表图片,将数字的顺序排列好,就完成了拼图,比起图片版的拼图,要简单多了。
玩法:将数字1挪动到最开始的位置,如何移动?要把占位的数字一个一个挪开,依次为1、2、3等数字让位,把整体排序好,就拼好了。
- 2022-07-23 16:53:18下载
- 积分:1
-
国外的VB版跳棋游戏源码
一款国外的VB版跳棋游戏源码,源代码中同样包括了很多注释,不过注释都是英文。这款跳棋感觉和国内的不一样,走棋方法不同,试着玩了,按照国内的走棋方法,棋子并不走动,不知道如何玩。但是源代码在VB6.0下可顺利编译成功,有兴趣的可下载源代码参考学习。运行效果如下图所示。
- 2022-04-21 21:15:12下载
- 积分:1
-
VB.NET窗体Tab 读取ini文件 界面滑动等功能集
本源码基于VB.NET编写,集合了VB.NET中的读取ini文件,窗体Tab标签,界面滑动等效果,界面看上去是一个音乐播放器,其实本程序是侧重于界面的编程设计,演示了窗口中TAB标签切换、界面滑动以及整体界面的美化的具体实现,使用了比较多的三方DLL,已经都打包了,感兴趣的下载源码,在VS2012版本以上的VS中打开并编译。
- 2022-01-26 07:32:46下载
- 积分:1
-
VB6.0 屏幕滚动字幕(文字滚动)
VB6 屏幕滚动字幕,这个文字滚动区域被控制在屏幕的右下角,由右向左开始滚动,中间的高度可以调节,通过调节Me.Top = Screen.Height - Me.Height - 800参数,来改变文字滚动区域距离屏幕顶部的距离,文字滚动的实现是基于计时器和循环来实现,下面的代码可为你提供本效果的实现思路:
Label1.Caption = "这里定义需要滚动的文字内容: 用VB制作的文字滚动效果!"
Me.Left = Screen.Width
Me.Top = Screen.Height - Me.Height - 800
BeginPath Me.hWnd
SetBkMode Me.hWnd, TRANSPARENT
EndPath Me.hWnd
rgn = PathToRegion(Me.hWnd)
SetWindowRgn Me.hWnd, rgn, True
Timer1.Interval = 200
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Me.Left = Me.Left - 100
If Me.Left < Label1.Width * (-1) Then
Timer1.Enabled = False
Me.Left = Screen.Width
Timer1.Enabled = True
End If
End Sub
- 2022-05-21 14:58:30下载
- 积分:1
-
VB 记录鼠标行为,判断左键右键
VB 记录鼠标行为,记录用户是单击了鼠标右键或是左键,监控鼠标被单击了哪个键,核心的代码如下:
If GetAsyncKeyState(VK_LBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标左键 "
ElseIf GetAsyncKeyState(VK_RBUTTON) = -32767 Then
Text1.Text = Text1.Text + " 鼠标右键 "
End If
- 2022-02-28 11:29:47下载
- 积分:1
-
VB Val与汉字的相互转化
VB 数字与字符串的相互转换(汉字区位码与汉字的相互转化)的例子,主要是使用Val函数来实现转换功能,Val的用法很简单,如Text4.Text = Val(Text3),将此行代码添加到自定义的按钮事件中即可,当用户单击按钮后,可触发此代码执行区位码转换。实现的功能为:
把数字转换成字符串,把字符串转换成数字。
- 2022-02-10 12:28:52下载
- 积分:1
-
VB6.0 实现表格样式的内容生成Excel表格式
VB6.0 实现表格样式的内容生成Excel表格式,将DataGrid的表格数据转换成Excel格式,生成Excel表文件,用Offie套件就可以打开,在转换前可设置文字格式、样式等参数,看上去是一个国外的程序,代码里的注释全是英文的,如果E文好的话,推荐参考。
- 2022-03-21 16:22:21下载
- 积分:1
-
VB NET SQLSERVER 酒店客房管理系统
VB NET SQLSERVER 酒店管理系统,功能模块:基础设置、业务管理、预定管理、入住管理、收钱退房、信息查询、客房管理、预定信息查询、入住信息查询、入住客史查询等,只是一个基础级的酒店客户管理程序,测试前请把Database下的数据库附加,修改数据库连接字符串,然后运行Debug中的exe程序。
- 2023-04-22 15:20:03下载
- 积分:1