-
-
0服务内容:承接各类大中小型软件开发定制。(本店不接任何违法违规,违反职业道德的订单。) 服务流程:咨询沟通→拍下付款→开始研发→作品测试→收货评价→交易完成 流程说明: 1、软件报价是根据具体功能来计算的,依不同需求而定。 2、程序开始研发,如增加或者变更需求需重新协商制作费用。 3、软件开发完成,测试满意再收货。 4、同样,软件交付后若增加功能或更新软件需适当收取相应功能费用(优惠)。 5、如无特殊说明,报价均
-
1数据爬虫,自动化办公,其他脚本等等 职菜玫范谫乃瘴
-
2菜鸟想学HOOK 请赐教 多加点注释呗
-
0菜鸟想学HOOK 请赐教 多加点注释呗
-
0菜鸟想学HOOK 请赐教 多加点注释呗
-
6看到VB吧里的问题,忍不住想对新手们说两句: 1.少问点,多查点;少查点,多想点;少想点,多实践。每个人都有脑子,如果真的想不出,网络资源也不是没有,不要拿Form是什么之类的问题出来给我们丢脸。 2.读完入门书再进VB吧闯荡,把基础的对象搞清楚,不要VB的IDE都没见过。 3.英语学好,看见代码(别人给的也算)里的生词去查一查……例如Class、Sub是什么意思,我保你下次写代码决不会把Sub放到Class外面。 4.不要把问题全部推给别人,比如别
-
1Private 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
-
4我们需要什么?当我们在一个精彩的游戏世界中游历了一番之后,或是惊叹于某一工具软件的小巧精致之余,多少总会产生些许编程的冲动。编程吗,在以前如果你对电脑还是一个门外汉,那实在是一件可望而不可及的事情。如果运用基于DOS下的编程语言,譬如C、Qbasic、Pascal等等,真不知何年何月才能有所成就。 编程是需要天赋的,你必须在大脑中对整个程序有一个清晰的轮廓,一个高效的流程,这并不是每个人都能做到的,你必须思之慎
-
10一楼防抽
-
3吧主能不能经常回来看看,我们来这里就是来请教的
-
1*/ ---------------------------------------------------- */ 出自: 编程中国 http://www.bccn.net */ 作者: china25qd */ 时间: 2007-10-3 编程论坛首发 */ 声明: 尊重作者劳动,转载请保留本段文字 */ ---------------------------------------------------- 我这个是VB版的,希望高手多提宝贵意见谢谢! 1. '设置窗体形状声明 '------------------------ '自定义 Public Type Dat '设计坐标 sx As Integer '存储扫描头次遇到非背景色的X坐标 ex As Integer '存储扫描
-
3Private 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
-
2如何 让一个程序在隐藏后 按快捷后显示程序
-
0求迷宫!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-
3本文介绍了Visual Basic Print方法的调用格式和功能。 格式:[对象.]Print[表达式表][,l;] 功能:Print方法可以在相应的对象上显示文本和表达式的值。 说明: (1)“对象"可以是窗体(Form)、图片框(PictureBox)、打印机(Printer)或立即窗口(Debug)。 如果省略了“对象",则是指窗体。 (2)“表达式表”是一个表达式或多个表达式,可以是数值表达式或字符
-
2亲爱的各位吧友:欢迎来到chengd222吧! 您可以在本吧内发表留言,并与其它来到这里的朋友分享交流。祝您在贴吧玩得愉快~ 贴吧楼委会
-
2Option 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 主要在第二,第三行
-
0希望吧主能做这方面的介绍
-
0四种A ,2,3,4......j,Q,k 以及大小王,你是怎么表示的?
-
2老师说的不太懂,说什么同一色13张牌相加的和都是一样的,还有提什么公约数。还说不一定要54张,更多也可以,就要将牌分成4色还有2张大小王,用循环做。不理解思路!求高手给个提示,思路!
-
1一楼防抽
-
0Private 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); "数
-
1项目(Project):是用户创建的文件**,这个**包括用户的Windows 应用程序。 控件(Control):是Toolbox窗口中用户置于窗体上的工具,用于配合用户控制程序流程。 代码(Code):是所写的编程语句的另一个名字。像素(Pixel):代表图形元素,表示监视器上最小的可寻址的图形点。 全局变量(Global Variable):就是在整个模块内或整个应用程序内均可使用的变量。 函数(Function)
-
3源代码、Bin 文件及示例脚本下载地址: http://code.google.com/p/indexcript/downloads/list
-
2先引用 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 "" &
-
5原帖及讨论: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
-
0/*(2)定义描述矩形的类Rectangle,其数据成员为矩形的中心坐标(X,Y),长(L),宽(W), 成员函数为计算矩形面积的函数Area()与构造函数。再由矩形类派生出长方体类Box,其 数据成员为长方体的**igh)与体积(Volume).成员函数为:构造函数,计算体积的 函数Vol(),显示矩形坐标(X,Y),长方体的长、宽、高与体积的函数Show().主函数中 用长方体类定义长方体的对象cub,并赋初始值,最后显示长方体的矩形坐标(X,Y)与 长方体的长、宽、高和体积。*/ #include
-
1VB吧2011年5月12日正式成立,欢迎VB爱好者光临。 本吧用来探讨、学习VB知识,只要不涉及版权,欢迎用户把好的代码发上来。有什么问题可以在此提出,我可以帮你答疑解惑。