在VB中制作VC中具有PUSHLIKE风格的复选框

原创 2004年09月08日 01:18:00

'Code By 魑魅魍魉
'mailto:DemonStudio@hotmail.com

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long

Private Sub Form_Load()
Op.Value = True
Ch.Value = 1
SetWindowLong Command1.hwnd, -16, &H50008000
SetWindowLong Ch.hwnd, -16, GetWindowLong(Ch.hwnd, -16) + &H1000
SetWindowLong List1.hwnd, -20, &H105
SetWindowLong Text1.hwnd, -20, &H105
SetWindowLong Op.hwnd, -16, GetWindowLong(Op.hwnd, -16) + &H1000
SetWindowLong Op1.hwnd, -16, GetWindowLong(Op1.hwnd, -16) + &H1000
End Sub

效果如下:

让 VB6 开发的程序拥有视觉样式( XP 风格),VC++6.0 同样适用

让 VB6 开发的程序拥有视觉样式( XP 风格),VC++6.0 同样适用。     相信用 VB6 或 VC6 开发过程序的朋友都曾郁闷过吧,VB6 或 VC6 做的程序都没有视觉样式(XP...
  • ROVAST
  • ROVAST
  • 2014年05月19日 16:58
  • 2326

Vb 与 Vc 的区别

一:简单的对比 VB是由Basic语言演化而来的VisualBasic,意思是可视化Basic,而VC是由C++语言演化而来的VisualC++,意思是可视化C++,VB功能没有VC强大,但是很容易...
  • guomutian911
  • guomutian911
  • 2014年10月21日 11:57
  • 2568

VB 给Excel中的checkbox 所在单元格赋值

需求: Excel 中有多组checkbox复选框,需要把选中的复选框和未选中的复选框标记入库。 如果选中则给1没有选中给所在单元格赋0 先上图: VB : Set myDo...
  • thl331860203
  • thl331860203
  • 2017年06月06日 18:23
  • 1198

VB中调用VC++开发的DLL

转自:http://lanshanlhy.blog.163.com/blog/static/302294762010112832031218/ 再谈在VB中调用VC++开发的DLL  再谈...
  • xl19900502
  • xl19900502
  • 2016年02月22日 11:17
  • 493

在vc MFC下制作具有XP风格按钮等控件

首先看一下xp风格与非xp风格:     非xp风格          xp风格 --------------------------------------------------------...
  • ccx_john
  • ccx_john
  • 2013年10月28日 10:56
  • 550

VC++ 与VB 数据类型对应关系

VC++ 与VB 数据类型对应关系   在做VC与vb程序间互相调用,需要注意两种语言不同编译器对数据类型的定义区别,此时两者数据类型的对应关系就显得十分的重要,对应关系以及声明方式如下所示...
  • sdgaojian
  • sdgaojian
  • 2013年12月23日 03:47
  • 691

VC 判断选中的 单选框 复选框的

一 vc对话框中的组框控件起什么作用? 1)它可将多个单选按钮圈起来,再将你想设为默认按钮的那个按钮的Group属性选中,其它按钮的Group属性取消。 这样这些RADIO按钮就成了一组可以实现在他...
  • L_Andy
  • L_Andy
  • 2013年12月23日 18:35
  • 2774

CListBox 带有复选框

由于实际需要在项目中需要使用一个带有复选框的列表控件,没错,VB、Delphi……里现成就有,但由于项目是VC工程,VC里现成的CListBox或CListCtrl都没有复选框。说到这里,高手们可能会...
  • objectively
  • objectively
  • 2013年07月21日 10:56
  • 619

jQuery EasyUI使用教程之创建复杂的树网格

树网格可以展示有限空间上附带的多列和复杂数据电子表格。本教程将演示如何将表格数据排列在分割的网格和多行表头中,以便组织共同的数据。 jQuery EasyUI最新试用版下载请猛戳>> ...
  • AABBbaby
  • AABBbaby
  • 2016年07月20日 09:51
  • 405

分组控件:CheckedListBox控件的使用

在vb.net中,CheckBox、CheckedListBox、RadioButton和TrackBar这四个控件的功能都是设置和获取值的,我们称之为设置值的控件。 前面我们了解了CheckBox控...
  • u011981242
  • u011981242
  • 2016年01月21日 22:25
  • 1073
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:在VB中制作VC中具有PUSHLIKE风格的复选框
举报原因:
原因补充:

(最多只允许输入30个字)