-
等级
本版专家分：0结帖率 95.24% -
本人Vb比较菜，各位高手看看下面的效果能不能实现：
展开阅读全文
-
等级
本版专家分：7262 -
可以，做一个半透明的无边框的窗体即可。
-
等级
本版专家分：64057勋章
-
-
红花
2010年10月 VB大版内专家分月排行榜第一
2010年9月 VB大版内专家分月排行榜第一
2010年8月 VB大版内专家分月排行榜第一
2008年12月 VB大版内专家分月排行榜第一
-
-
黄花
2011年7月 VB大版内专家分月排行榜第二
2010年7月 VB大版内专家分月排行榜第二
2009年12月 VB大版内专家分月排行榜第二
2009年11月 VB大版内专家分月排行榜第二
2009年10月 VB大版内专家分月排行榜第二
2009年8月 VB大版内专家分月排行榜第二
2008年11月 VB大版内专家分月排行榜第二
2008年10月 VB大版内专家分月排行榜第二
2008年9月 VB大版内专家分月排行榜第二
-
-
蓝花
2010年6月 VB大版内专家分月排行榜第三
2009年9月 VB大版内专家分月排行榜第三
2009年3月 VB大版内专家分月排行榜第三
2009年2月 VB大版内专家分月排行榜第三
2009年1月 VB大版内专家分月排行榜第三
-
-
一切皆有可能
擅长.net为什么不用？
-
等级
本版专家分：0
-
我觉得麻烦的问题就在它随时可以增加的
-
等级
本版专家分：64057勋章
-
-
红花
2010年10月 VB大版内专家分月排行榜第一
2010年9月 VB大版内专家分月排行榜第一
2010年8月 VB大版内专家分月排行榜第一
2008年12月 VB大版内专家分月排行榜第一
-
-
黄花
2011年7月 VB大版内专家分月排行榜第二
2010年7月 VB大版内专家分月排行榜第二
2009年12月 VB大版内专家分月排行榜第二
2009年11月 VB大版内专家分月排行榜第二
2009年10月 VB大版内专家分月排行榜第二
2009年8月 VB大版内专家分月排行榜第二
2008年11月 VB大版内专家分月排行榜第二
2008年10月 VB大版内专家分月排行榜第二
2008年9月 VB大版内专家分月排行榜第二
-
-
蓝花
2010年6月 VB大版内专家分月排行榜第三
2009年9月 VB大版内专家分月排行榜第三
2009年3月 VB大版内专家分月排行榜第三
2009年2月 VB大版内专家分月排行榜第三
2009年1月 VB大版内专家分月排行榜第三
-
-
动态添加控件就可以了
-
等级
本版专家分：64057勋章
-
-
红花
2010年10月 VB大版内专家分月排行榜第一
2010年9月 VB大版内专家分月排行榜第一
2010年8月 VB大版内专家分月排行榜第一
2008年12月 VB大版内专家分月排行榜第一
-
-
黄花
2011年7月 VB大版内专家分月排行榜第二
2010年7月 VB大版内专家分月排行榜第二
2009年12月 VB大版内专家分月排行榜第二
2009年11月 VB大版内专家分月排行榜第二
2009年10月 VB大版内专家分月排行榜第二
2009年8月 VB大版内专家分月排行榜第二
2008年11月 VB大版内专家分月排行榜第二
2008年10月 VB大版内专家分月排行榜第二
2008年9月 VB大版内专家分月排行榜第二
-
-
蓝花
2010年6月 VB大版内专家分月排行榜第三
2009年9月 VB大版内专家分月排行榜第三
2009年3月 VB大版内专家分月排行榜第三
2009年2月 VB大版内专家分月排行榜第三
2009年1月 VB大版内专家分月排行榜第三
-
-
参考一下
工程中添加两个窗体，form1和form2, 下例是在form1中的代码，
Option Explicit
Dim frm As Form2
Private Sub Command1_Click()
Set frm = New Form2
frm.Show
End Sub
Private Sub Command2_Click()
Unload frm
Set frm = Nothing
End Sub
-
等级
本版专家分：28024勋章
-
-
红花
2006年10月 VB大版内专家分月排行榜第一
2006年9月 VB大版内专家分月排行榜第一
2006年8月 VB大版内专家分月排行榜第一
-
- 黄花 2006年11月 VB大版内专家分月排行榜第二
-
-
蓝花
2008年8月 VB大版内专家分月排行榜第三
2008年7月 VB大版内专家分月排行榜第三
-
-
楼主的桌面够乱的啊 -_-!!
-
等级
本版专家分：603 -
首先将一个窗体设置成半透明~~这个网上有很多例子的~如果找不到我可以发代码上来~~
需要显示的数据实时从数据库中获取~~这个很简单吧?
循环数据库动态添加Label控件,将需要显示的数据显示在Label控件上~~
其实并不难~
-
等级
本版专家分：9709 -
vb 有个透明控件,在部件里.. 忘记啥名字了..
-
等级
本版专家分：0
-
VB6
半透明: 将如下代码放置一个模块中
在你的form中调用 Transparence Form1.hwnd
至于编辑功能就更简单啦，不需要我啰嗦吧
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public Const HWND_TOPMOST = -1
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOMOVE = &H2
Declare Function GetWindowRect Lib "user32" _
(ByVal hwnd As Long, lpRect As RECT) As Long
Public Declare Function ClipCursor Lib "user32" (lpRect As Any) As Long
Public Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Public Declare Function ReleaseCapture Lib "user32" () As Long
Public Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Const WM_CLOSE = &H10
Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Public Const WS_EX_LAYERED = &H80000
Public Const GWL_EXSTYLE = (-20)
Public Const LWA_ALPHA = &H2
Public Const LWA_COLORKEY = &H1
Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Function Transparence(hwnd As Long)
Dim rtn As Long
rtn = GetWindowLong(hwnd, GWL_EXSTYLE) '注释：取的窗口原先的样式
rtn = rtn Or WS_EX_LAYERED '注释：使窗体添加上新的样式WS_EX_LAYERED
SetWindowLong hwnd, GWL_EXSTYLE, rtn '注释：把新的样式赋给窗体
SetLayeredWindowAttributes hwnd, 0, 192, LWA_ALPHA
'注释: 把窗体设置成半透明样式 , 第二个参数表示透明程度
'注释: 取值范围0 --255, 为0时就是一个全透明的窗体了
' 第二种使用方法
' SetLayeredWindowAttributes hwnd, &H0, 0, LWA_COLORKEY
'注释: 表明不显示窗体中的透明色
'注释: 而第二个参数表示透明色为黑色 , 并且你可以用RGB函数来指定颜色值进入讨论组讨论?
End Function
-
等级
本版专家分：45
-
樓主代碼有點復雜, 有沒有簡單點的, 最後到時候有語音提示功能就好了 .
設定時間,到時候提交,該干嗎干嗎去. 從而防止在打遊戲或工作時看不到桌面
- vb仿excel控件_为什么老外的 Excel 表格这么漂亮？看这篇就够了
一份高质量的Excel报表，不仅仅是他的实用性、便捷性，美观也是非常重要的一部分。几个老外做的Excel表格，非常的漂亮：再看看我们最常见的表格，难看的瞬间爆表！对老外表格好看的原因进行了归纳，下面我们按老外的...
- 在线代码编辑器的实现原理与思路探讨？
contenteditable>来实现，就是类似于常见的在线网页编辑器，但是因为仅仅是需要代码编辑，所以，要控制只能输入文本，不能让用户插入图片啊链接啊等等东西，感觉比较难。 希望大家能够探讨一下如何实现。 ...
- VB实现可调节难度的九宫格拼图
VB实现可调节难度的九宫格拼图实现本游戏需要熟练掌握paintpicture函数的应用，如果读者对该函数不熟练，需要读一下前面两篇博客哦 http://blog.csdn.net/wf824284257/article/details/53221631 ...
- [VB.NET]100分求解:如何屏蔽VB2005中TREEVIEW控件的AfterSelect事件?????
100分求解:如何屏蔽VB2005中TREEVIEW控件的AfterSelect事件?????当选择了一个TREEVIEW控件的焦点时就会触发AfterSelect事件,那么如果我想点击TREEVIEW控件中其它焦点,但又不想触发AfterSelect事件的话应该用什么语句...
- 三层VB.NET版的实现
主要通过C#版的三层和VB.NET版的进行对比，知道两种语言在转化上有什么区别
- 屏幕取色器设计思路及源码
16年因工作需要，需要根据UI图获取指定位置的颜色，在网上下载了几个取色软件，操作不方便，遂自己花了些时间做了一个 。 你可能会觉得做个这样的软件很难，其实不难，UI界面加上一系列的优化，仅花了几个小时。 ...
- vb.net usb通用协议api_这样讲API网关，你应该能明白了吧！
今天我们一起来看看 API 网关的设计思路，需要承载了哪些功能？以及如何选择流行的 API 网关？ 什么是 API 网关 既然需要 API 网关为我所用，首先就让我们来了解一下什么是 API 网关。 什么是 API 网关 网关一词最早...
- 状态机设计的一般步骤_PLC编程状态机如何实现
在PLC程序的编写过程中，可以使用状态机的控制思路，将一些复杂的控制过程使用状态机的方法处理...以上这些都比较抽象，初次接触的话不是特别能让人理解，接下来我们看一下一个程序功能如何拆分为状态机的单个状态。...
- vb模块怎么用_双非院校成绩不好的他，怎么突然拿到腾讯offer了？
编者荐语： 今天小开搜罗了一篇有关前端的干货面试稿给大家~以下文章来源于Hello FE，作者Bven❝我的春招结束已经有一段时间了，之前只做了一个面试的简单总结，但是没有对自己春招的做一个比较完整的回顾，这里忙...
- vb.net usb通用协议api_这样讲 API 网关，你应该能明白了吧！
作者简介：崔皓，十六年开发和架构经验，曾...今天我们一起来看看 API 网关的设计思路，需要承载了哪些功能？以及如何选择流行的 API 网关？什么是 API 网关既然需要 API 网关为我所用，首先就让我们来了解一下什么...
- vb.net usb通用协议api_这样讲 API 网关，你应该能明白了吧
今天我们一起来看看 API 网关的设计思路，需要承载了哪些功能？以及如何选择流行的 API 网关？什么是 API 网关既然需要 API 网关为我所用，首先就让我们来了解一下什么是 API 网关。什么是 API 网关网关一词最早出现...
- 易语言 && Visual Basic 6.0 (VB6)
VB6编译的程序在Windows 95系统内运行需要VB6运行库(MSVBVM60.dll直到Win98才被操作系统内置)，而易语言编译的程序不需要该运行库。 易语言支持通过置入代码向目标编译程序输出x86机器码，而VB6没有类似的功能。 ...
- VB / VS 多语言软件设计
VB6被很多程序员认为是一个过气的开发工具，但它实在是微软最经典的开发工具，没有之一！编译出的程序短小精悍，一般就几十K，而且从XP以后的操作系统，均携带其运行时库，只要程序只使用VB的标准控件，连安装都不...
- 浅谈CMS标签设计思路
分类： ASP相关 2009-10-20 15:58 972人阅读 评论(2) ...因为是第一个版本,我并没有打算生成静态,原因如下: ESCMS是面向中小企业网站的小型CMS,生成静态对效率影响不大,反而会增加工作量. 用户直接直观的
- 用VB实现COM+组件配置
用VB实现COM+组件配置作者：肖志云 在Windwos2000的管理工具里有一个“组件服务”工具，可以实现对COM+组件的应用的安装、启动、删除和对组件的安装、删除。这在安装一个有COM+组件的应用系统时时非常有用的，我们...
- VB总结
Visual Basic是一种可视化的、面向对象的、采用事件驱动对象对时间进行处理的程序设计语言，也是目前在Windows操作系统水平台上广泛使用的应用程序开发工具。在VB中，用户只需要利用鼠标、键盘把这些控件对象托到...
- vb和python-vb与python
广告关闭2017年12月，云+社区对外发布，从最开始的技术博客到现在拥有多个社区产品。未来，我们一起乘风破浪，创造无限可能。在我的windowspc上，我同时拥有fruityloops和propellerhead的推理软件合成器。...
- VB程序破解
VB程序也是一个非常有趣的东西，你去看VB的主程序，是用Microsoft Visual C++ 5.0编写的，也就是说，其实里面调用的各种命令和控件，都是一段VC++的代码。还有VB运行时必须的“库”(虚拟机)：msvbvm50, msvbvm60,
- VB 共享软件防破解设计技术初探（一）
VB 共享软件防破解设计技术初探（一） ×××××××××××××××××××××××××××××××××××××××××××××× 其他文章快速链接： VB 共享软件防破解设计技术初探（二） ...
- vb 程序破解
WARNING: 此文章非常长，如果你感兴趣但是没耐心看完，可以做个标记然后按浏览器的关闭按钮，等到下次有兴趣了再看。这里我尽量多和详细地解释了VB...VB程序也是一个非常有趣的东西，你去看VB的主程序，是用Microsoft V
- VB操作EXCEL表的常用方法
VB是常用的应用软件开发工具之一，由于VB的报表功能有限，而且一但报表格式发生变化，就得相应修改程序，给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。...
- 【游戏设计模式】之二 论撤消重做、回放系统的实现：命令模式
如果你想知道《Dota2》中的观战系统、《魔兽争霸3》中的录像系统、《守望先锋》的全场最佳回放系统可能的一些实现思路，这篇文章或许就能给你一些启示。 一、本文涉及知识点思维导图 还是国际惯例，先放出这篇文章...
- VB.NET 贪吃蛇 (画圆)
设计思路这个游戏(1)呢，得有个地图(2)，有条蛇(3)，有个蛋(4)，所以一共设计了4个类，然后通过类之间的交互，在Form上的PictureBox上形成游戏效果。为什么还要弄个游戏类呢，因为这样新开一局游戏就非常简单了啊，...
- 如何使用excel的vb如何把一个单元格的内容分开到另两个单元格_excel图表技能：如何更准确的表现营业额的...
编按：哈喽，大家好！在excel中有很多的图表类型，可供小伙伴们选择。...今天，作者E图表述就带着大家一起来了解一下“图表设计”的思路过程，一起来看看吧！【前言】 很多同学对于图表，都是即喜...
- VB 共享软件防破解设计技术初探（二）
VB 共享软件防破解设计技术初探（二） ...VB 共享软件防破解设计技术初探（一） http://bbs.pediy.com/showthread.php?t=72050 VB 共享软件防破解设计技术初探（三） http://bbs.pediy.com/show
- 字符串匹配基础（中）：如何实现文本编辑器的查找功能？
------ 本文是学习算法的笔记，《数据结构与...当然，你用上一节讲的BF算法和PK算法，也可以实现这个功能，但是在某些极端情况下，BF算法性能会退化的比较严重，而PK算法需要用到哈希算法，而设计一个可以泽各种类型...
- 如何学好VB
如何学好VB(1) 1、明确目的：学习VB的是成为软件工程师，而非代码工人。 什么是代码工人，代码工人也叫软件蓝领。指那些至少掌握一门开发语言或开发工具，所从事...软件工程师跟一般程序员的分別，在于一个程序员的工
- vb filelistbox对双击进行操作_素数案例高职考VB技能提升
做一个案例吧！案例~根据题意来填空：根据这个题目，我们来设计并制作一下这个案例。首先来按照题目意思来设计一下：文本框相关设置：1、multiline 选择 true代表可以多行写。2、scrollbar选2代表打开纵向滚动条...