郁闷啊！VB6.0做的控件在.Net无法使用

benyfeifei 2004-11-25 06:07:49

我在VB6.0下做了一个图像显示的控件，使用了BitBlt等API函数，但在.Net下图像就显示不出来了，不知道为什么，郁闷啊，请大家给点提示吧！

...全文

107 11 打赏收藏转发到动态举报

写回复

11 条回复

切换为时间正序

请发表友善的回复…

发表回复

w_j76 2004-11-26

打赏
举报

回复

http://msdn.microsoft.com/library/chs/default.asp?url=/library/CHS/vbcon/html/vbconwalkthroughrecreatingcalculatorsampleapplicationinvisuyalbasic70.asp

运行升级向导将 Visual Basic 6.0 应用程序升级到 Visual Basic .NET后有的控件可用，试过

lxhdxlxh1 2004-11-26

打赏
举报

回复

我也有同感

leeyeefeng2004 2004-11-26

打赏
举报

回复

总之..有得有失!
UP

farrio 2004-11-26

打赏
举报

回复

用了VB6的API可能就会有问题的。原因我也不知道，但是我遇到过。

withnetgo 2004-11-26

打赏
举报

回复

嘿嘿我现在正学.NET呢
好东西哦

2zhk 2004-11-26

打赏
举报

回复

支持.net

xjtandqt 2004-11-26

打赏
举报

回复

正常啦,用.net就要抛弃6.0的了。

mycoldboy 2004-11-25

打赏
举报

回复

二楼说得对

viena 2004-11-25

打赏
举报

回复

呵呵

youlongzaitian 2004-11-25

打赏
举报

回复

VB.NET虽然是升级，但是做了很多修改的，不能用也很正常！

landlordh 2004-11-25

打赏
举报

回复

很多类，函数，属性在.net中已经改变，删除或修改了

VB.net与VB6.0的控件数组对比分析

C#变通方法实现VB6.0里面的控件数组,当然VB.net也可以用,,用了三种方法 ,代码添加事件,属性页里设置事件,判别并处理.

用VB.NET开发交互式CAD系统，包括结合GDI+和OPENGL两种方案。联系平台客服可开发票。

在 VB.NET 中它不允许我们使用 Winsock 的 State 属性来判断连接状态，唯一可用的是 SocketHandle 属性，当 Winsock 为开启时它的值为 -1，但是 Connect() 之后就无法从其值判断连接状态了，这是我们可以变换一下思维，主动从服务器请求数据来判断，如果请求成功，说明我们连接成功了。这个 RAR 中包含了最简单的用 VB6.0 写的服务器程序，仅能提供客户端连接；另一个就是 VB.NET 写的客户端程序，同样使用了原来 VB6.0 中的 Winsock 控件。具体可以查看我的一篇短博文。

用vb制作时钟，简单易懂，容易制作// 声明常量，指定时钟的大小 Public Const ClockSize = 30 // 时钟颜色，角度换算 Public Const Pclor = &H33FF, Tmp = 3.14 / 180 // 定义常量，指明指针长度 Public Const Slen = 120, Mlen = 90, Hlen = 70 // 指针的偏转角度 Public Sg As Single, Mg As Single, Hg As Single // 指针的末端坐标 Public Sx As Integer, Sy As Integer Public Mx As Integer, My As Integer Public Hx As Integer, Hy As Integer // 存储各个时间的值 Public s As Integer, M As Integer, H As Single // 声明api函数，以移动没有标题栏的窗体 Declare Function ReleaseCapture Lib "user32" () As Long Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, IParam As Any) As Long Public Const HTCAPTION = 2 Public Const WM_NCLBUTTONDOWN = &HA 1 // 声明api函数创建圆形窗体 Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Long) As Long codesky.net_vb23

16,554

社区成员

110,527

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章