服务内容：承接各类大中小型软件开发定制。（本店不接任何违法违规，违反职业道德的订单。） 服务流程：咨询沟通→拍下付款→开始研发→作品测试→收货评价→交易完成 流程说明： 1、软件报价是根据具体功能来计算的，依不同需求而定。 2、程序开始研发，如增加或者变更需求需重新协商制作费用。 3、软件开发完成，测试满意再收货。 4、同样，软件交付后若增加功能或更新软件需适当收取相应功能费用（优惠）。 5、如无特殊说明，报价均

数据爬虫，自动化办公，其他脚本等等 职菜玫范谫乃瘴

菜鸟想学HOOK 请赐教 多加点注释呗

菜鸟想学HOOK 请赐教 多加点注释呗

菜鸟想学HOOK 请赐教 多加点注释呗

看到VB吧里的问题，忍不住想对新手们说两句： 1.少问点，多查点；少查点，多想点；少想点，多实践。每个人都有脑子，如果真的想不出，网络资源也不是没有，不要拿Form是什么之类的问题出来给我们丢脸。 2.读完入门书再进VB吧闯荡，把基础的对象搞清楚，不要VB的IDE都没见过。 3.英语学好，看见代码（别人给的也算）里的生词去查一查……例如Class、Sub是什么意思，我保你下次写代码决不会把Sub放到Class外面。 4.不要把问题全部推给别人，比如别

Private Sub Form_Load() If Label3.Caption = "a" Then Timer1.Enabled = True End If Private Sub Check1_Click() Label3.Caption = "a" End Sub Private Sub Command1_Click() WindowsMediaPlayer1.Controls.stop WindowsMediaPlayer1.URL = List2.List(List1.ListIndex + 1) WindowsMediaPlayer1.Controls.play End Sub Private Sub Timer1_Timer() Command1_Click End Sub

　　我们需要什么？当我们在一个精彩的游戏世界中游历了一番之后，或是惊叹于某一工具软件的小巧精致之余，多少总会产生些许编程的冲动。编程吗，在以前如果你对电脑还是一个门外汉，那实在是一件可望而不可及的事情。如果运用基于DOS下的编程语言，譬如C、Qbasic、Pascal等等，真不知何年何月才能有所成就。 　　编程是需要天赋的，你必须在大脑中对整个程序有一个清晰的轮廓，一个高效的流程，这并不是每个人都能做到的，你必须思之慎

一楼防抽

吧主能不能经常回来看看，我们来这里就是来请教的

*/ ---------------------------------------------------- */ 出自： 编程中国  http://www.bccn.net */ 作者： china25qd         */ 时间： 2007-10-3   编程论坛首发 */ 声明： 尊重作者劳动，转载请保留本段文字 */ ---------------------------------------------------- 我这个是VB版的,希望高手多提宝贵意见谢谢! 1. '设置窗体形状声明 '------------------------ '自定义 Public Type Dat '设计坐标 sx As Integer '存储扫描头次遇到非背景色的X坐标 ex As Integer '存储扫描

Private Sub Command1_Click() Dim a#, b#, c#, d# a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) If Not IsNumeric(Text1) ThenMsgBox "输入有误" ElseIf Not IsNumeric(Text2) Then MsgBox "输入有误" ElseSelect Case c Case "+" d = a + b Case "-" d = a - b Case "*" d = a * b Case "/" if len(text3.text）〈〉0 Then d = a / b Text4.Text = d ElseIf Len(Text3.Text) = 0 Then MsgBox "除数不能为零 "End If End Select End Sub Private Sub Command2_Click() End end sub

如何 让一个程序在隐藏后 按快捷后显示程序

求迷宫!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

     本文介绍了Visual Basic Print方法的调用格式和功能。      格式：[对象.]Print[表达式表][，l;]      功能：Print方法可以在相应的对象上显示文本和表达式的值。      说明：      (1)“对象"可以是窗体(Form)、图片框(PictureBox)、打印机(Printer)或立即窗口(Debug)。 如果省略了“对象"，则是指窗体。      (2)“表达式表”是一个表达式或多个表达式，可以是数值表达式或字符

亲爱的各位吧友：欢迎来到chengd222吧！ 您可以在本吧内发表留言，并与其它来到这里的朋友分享交流。祝您在贴吧玩得愉快~ 贴吧楼委会

Option Explicit Sub putdata(t_filename As String, t_str As Variant) dim sfile = "\"& t_file name open APP path & sfile fou output AS #1 Print #1, t_str Close #1 End Sub 主要在第二,第三行

希望吧主能做这方面的介绍

四种A ,2,3,4......j,Q,k 以及大小王,你是怎么表示的?

老师说的不太懂，说什么同一色13张牌相加的和都是一样的，还有提什么公约数。还说不一定要54张，更多也可以，就要将牌分成4色还有2张大小王，用循环做。不理解思路！求高手给个提示，思路！

一楼防抽

Private Sub Form_Load() Show Dim stuname(5) As String * 10, score(4, 3) As Single stuname(1) = "张三": stuname(2) = "李四": stuname(3) = "王五": stuname(4) = "赵六" score(1, 1) = "78": score(1, 2) = "96.5": score(1, 3) = "75" score(2, 1) = "85": score(2, 2) = "75": score(2, 3) = "96" score(3, 1) = "99": score(3, 2) = "89": score(3, 3) = "88" score(4, 1) = "69": score(4, 2) = "72.6": score(4, 3) = "80" FontName = "黑体": FontSize = 14: FontUnderline = True: FontBold = True Print Tab(13); "考试成绩统计表" Print FontName = "system" Print "姓名"; Tab(15); "语文"; Tab(25); "数

     项目(Project)：是用户创建的文件**，这个**包括用户的Windows 应用程序。      控件(Control)：是Toolbox窗口中用户置于窗体上的工具，用于配合用户控制程序流程。      代码(Code)：是所写的编程语句的另一个名字。像素(Pixel)：代表图形元素，表示监视器上最小的可寻址的图形点。      全局变量(Global Variable)：就是在整个模块内或整个应用程序内均可使用的变量。      函数(Function)

源代码、Bin 文件及示例脚本下载地址： http://code.google.com/p/indexcript/downloads/list

先引用 ActiveMovie control type library 在窗体上放一个图片框Picture1 代码： Option Explicit Private pMC As FilgraphManager '定义pMC为FilgraphManager对象 Private pVW As IVideoWindow '定义pVW为IVideoWindow对象 Private Sub Form_Load()       Me.ScaleMode = 3       Picture1.ScaleMode = 3            On Error Resume Next       Set pMC = New FilgraphManager       pMC.Stop       pMC.RenderFile ""   &

原帖及讨论：http://bbs.bccn.net/thread-183341-1-1.html */ ----------------------------------------------------------------------------- */ 出自： 编程中国  http://www.bccn.net */ 作者： AV终结者         QQ：535843194 */ 时间： 2007-11-4   编程论坛首发 */ 声明： 尊重作者劳动，转载请保留本段文字 */ ----------------------------------------------------------------------------- 第1种-关闭后到像迅雷一样隐藏 Private Sub Form_Queryunload(Cancel As Integer, unloadmode As Integer) Can

/*（2）定义描述矩形的类Rectangle，其数据成员为矩形的中心坐标（X,Y）,长（L）,宽（W）, 成员函数为计算矩形面积的函数Area()与构造函数。再由矩形类派生出长方体类Box,其 数据成员为长方体的**igh）与体积（Volume）.成员函数为：构造函数，计算体积的 函数Vol(),显示矩形坐标（X,Y）,长方体的长、宽、高与体积的函数Show().主函数中 用长方体类定义长方体的对象cub,并赋初始值，最后显示长方体的矩形坐标（X，Y）与 长方体的长、宽、高和体积。*/ #include

　　VB吧2011年5月12日正式成立，欢迎VB爱好者光临。 　　本吧用来探讨、学习VB知识，只要不涉及版权，欢迎用户把好的代码发上来。有什么问题可以在此提出，我可以帮你答疑解惑。