代码改变世界

阅读排行榜

智能排版助手 Gidot Typesetter 3.0.7 !

2008-10-11 13:06 by 电脑人生, 254 阅读, 收藏,
摘要: 不错的免费软件,功能多多,懒得说了,看它的网站说明吧地址:http://www.gidot.net/typesetter/ 阅读全文

动态建立弹出式菜单技术及其应用示例

2004-07-09 10:11 by 电脑人生, 254 阅读, 收藏,
摘要: 建立一个标准EXE新工程,在窗体上添加一个Listbox和一个Text控件。 然后在窗体中粘贴下面代码:(窗体代码) Option Explicit Private Sub Form_Load() List1.AddItem "使用鼠标右键单击这里"End Sub Private Sub List1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single) Dim cMenu As cPopupMenu Dim ret As Long If Button = vbRightButton Th 阅读全文

白石洲大堵车"责任谁承担?如何担责

2006-06-30 09:03 by 电脑人生, 252 阅读, 收藏,
摘要: 近日,深圳交通局一纸“曝光一台、停运一台”的所谓“文明进站”禁令贴满了深圳的公交车上,所带来的是炎炎夏日下巨龙般的罕见公交车大排队壮观景象,这下可苦了以公交车为主要交通工具的上班一族,就如同坐上了“车牢”,意上无车、意下无门,在炎炎夏日如热锅蚂蚁般挨熬塞车之苦。所谓的这纸禁令竟是来源于深圳本地某报纸所谓的“交通专家型”记者之手的“文明”倡导,不知这位高人是否平时坐惯了“公家车”还是脑子里“注了水”,拍着脑袋倡导追求所谓的公交“文明”,要求公交车按站上落客,而我们所谓的老百姓“父母官”的交通局领导们甘愿成为这位记者大人“一世英明”的帮凶,听风是风、盲目的服从,强奸民意,在目前深圳交通配套严重.. 阅读全文

写了个禁止关闭计算机的模块(原创:唐细刚 2005-5-29)

2005-05-29 15:39 by 电脑人生, 252 阅读, 收藏,
摘要: CSDN上看到这个问题,顺便写了个模块,方便大家调用:http://community.csdn.net/Expert/topic/4041/4041955.xml?temp=.7912561主 题:如何阻止windows关机? 'mStopShutDown.bas模块代码:Private Const GWL_WNDPROC = (-4)Private Const WM_ENDSESSION = &H16Private Const WM_QUERYENDSESSION = &H11Private WndProc As LongPrivate Declare Functi 阅读全文

SetCapture的基本应用示例

2004-07-28 09:20 by 电脑人生, 252 阅读, 收藏,
摘要: 怎么样可以捕获到鼠标进入和离开窗体呢? 这里要用到两个Api,即SetCapture和ReleaseCapture. 新建一个工程,将下面代码贴入代码区.按F5运行即可. Option Explicit Private Declare Function SetCapture Lib "user32" (ByVal hwnd As Long) As LongPrivate Declare Function ReleaseCapture Lib "user32" () As Long Private Sub Form_MouseMove(Button As 阅读全文
上一页 1 ··· 29 30 31 32 33 34 35 36 37 ··· 109 下一页