VC实现类似VB中的LinkLabel功能
VC实现类似VB中的LinkLabel功能
//VB里面有个LinkLabel，VB中的Label在VC中式CStatic，但是VC中CStatic没有类似LinkLabel的功能。可以自己
//添加一点代码来实现：
//不知道为什么IDC_HANDD一定要自己定义一下
#define IDC_HAND MAKEINTRESOURCE(32649)
//处理鼠标移动
void CAppNonameDlg::OnMouseMove(UINT nFlags, CPoint point)
{
CRect rc;
GetDlgItem(IDC_STATIC_COLOR)->GetWindowRect(&rc);
ScreenToClient(&rc); //坐标转换
if(rc.PtInRect(point)) //是否在静态文本区域范围内
SetCursor(LoadCursor(NULL, IDC_HAND));
else
SetCursor(LoadCursor(NULL, IDC_ARROW));
CDialog::OnMouseMove(nFlags, point);
}
//处理鼠标安下，这是只要在文本区域上，一直都是IDC_HAND
void CAppNonameDlg::OnLButtonDown(UINT nFlags, CPoint point)
{
CRect rc;
GetDlgItem(IDC_STATIC_COLOR)->GetWindowRect(&rc);
ScreenToClient(&rc);
if(rc.PtInRect(point))
SetCursor(LoadCursor(NULL, IDC_HAND));
CDialog::OnLButtonDown(nFlags, point);
}
//处理鼠标安下，这是只要在文本区域上，同样一直都是IDC_HAND
void CAppNonameDlg::OnLButtonUp(UINT nFlags, CPoint point)
{
CRect rc;
GetDlgItem(IDC_STATIC_COLOR)->GetWindowRect(&rc);
ScreenToClient(&rc);
if(rc.PtInRect(point))
{
SetCursor(LoadCursor(NULL, IDC_HAND));
//打开指定链接
ShellExecute(NULL, "open", "http://hi.csdn.net/vb2010", NULL, NULL,
SW_SHOWNORMAL);
}
CDialog::OnLButtonUp(nFlags, point);
}
相关文档：
长久以来，由于不能直接获得VB类成员函数指针，因为无法在VB的类模块中直接使用定时器控件或定时器API，基于俺编写的获得类成员函数指针的函数，俺编写了这个带定时器功能的类，希望给朋友们一些启发。
一、新建一个类，类名称为clsTimer，类代码如下：
Option Explicit
'* ** ......
简单而实用的合并Excel文件的函数，能够将多个XLS文件中指定数量的工作表自动合并到一个XLS文件里。当然，如果只是数据合并，则使用ADO就可以实现，但如果要保留表格格式，则恐怕只能使用俺的方法了。
一、函数代码：
Option Explicit
'* ********************************************************* ......
UDP协议基础：
UDP(User Datagram
Protocol)是一种无连接协议，与TCP操作不同，计算机间并不需要建立一个连接，同时，一个UDP应用可同时作为应用的客户或服务器方。
由于UDP协议并不需要建立一个明确的连接，因此建立UDP应用要比建立TCP应用简单得多。在TCP应用中，一个Winsock控制必须明确地设置成&ldqu ......
报告书
名称
实验10-1 实现计算器的功能
姓名
指导教师
学号
日期
任务清单
在本练习中，你将使绘制的计算器完成简单的四则运算。
1) 启动Visual Studio 2005。
2) 新建一个VB Windows� ......
今天用编程语言Visual Basic（VB）写出自己的记事本！记得自从上次的一个VB打造简单计算器后就再也没有写一些小程序了！今天呢，写一个简单的记事本程序吧！
工具：一台计算机（电脑）。（配置不做什么要求，现在的机器应该没有配置很低的吧！只要能运行Visual Basic 6.0就行！）
&nbs ......
