精华内容
下载资源
问答
  • vbsub main到底是个啥

    千次阅读 热门讨论 2017-11-12 13:21:31
    遇到不懂的,就去查,现在查的多了,以后自然就快了,接下来大家一起来和我看看 sub main在vb中的作用吧! 一、sub main的理论知识 1、设置启动窗体。 我们在做程序中,一般第一个窗体就是你的启动窗体,但是...

    前言:

    遇到不懂的,就去查,现在查的多了,以后自然就快了,接下来大家一起来和我看看 sub main在vb中的作用吧!

    一、sub main的理论知识

    1、设置启动窗体。

    我们在做程序中,一般第一个窗体就是你的启动窗体,但是有些时候我们需要固定好第一个启动窗体具体是哪一个!如果想在应用程序启动时显示别的窗体,那么就得改变启动窗体。要改变启动窗体,请按照以下步骤执行: 从“工程”菜单中,选取“工程属性”。选取“一般”。在“启动对象”ListBox 中,选取要作为新启动窗体的窗体。选取“确定”。

    注意:这是网上说的,其实没有sub main 照样可以按照上面的方式,设置好任意一个窗体都是第一个启动,我个人的理解就是:我们在写不同的程序时,第一个启动窗体的名字都是不一样的,而这时我们利用sub main,就可以让我们无论在敲什么应用程序,都可以设置sub main为首先启动的窗体!

    2、没有启动窗体的启动

    有时候也许要应用程序不加载任何的窗体!例如:可能想先运行装入数据文件的代码,然后再根据数据文件的内容决定显示几个不同窗体中的哪一个。要做到这一点,可在标准模块中创建一个名为 Main 的子过程,如下面的例子所示。

    Sub Main()
      Dim intStatus As Integer   
       '调用一个函数过程来检验用户状态。
      intStatus = GetUserStatus
       '根据状态显示某个启动窗体。
      If intStatus = 1 Then
          frmMain.Show
      Else
          frmPassword.Show
      End If
    

    3、显示启动时的快速显示( 对于用户)

    如果在启动时,有一个较长的执行过程,例如,我在启用程序之前,需要调用大量的数据,这时调用数据是需要时间的,这时对于用户来说,是非常不爽的,这时sub main来了!直接可以让你看到一个图形界面,用户就会感到很爽了,也不会烦了!(这里大家可以细细的感受一下,真的是这样!只要看到你的界面有点变化就会很舒服呢!)例如,我们的vb第一眼看到的窗体就是一个快速显示!

    这里写图片描述

    展开全文
  • VB中End sub和Exit sub

    千次阅读 热门讨论 2017-12-30 10:13:50
    End Sub是一个过程的结束代码,每一个SUB中必须应对一个END SUB。 Exit Sub是在过程内代码执行时,可选择性的退出过程执行,既不执行Exit sub之后的代码,相当于中途退出的意思,这不是必须的。 private sub ceshi...

    End Sub是一个过程的结束代码,每一个SUB中必须应对一个END SUB。

    Exit Sub是在过程内代码执行时,可选择性的退出过程执行,既不执行Exit sub之后的代码,相当于中途退出的意思,这不是必须的。

    private sub ceshi()
    Dim i as integer 
    For i=0 to 10
    if i mod 3=0 then
    Exit sub

    这里就是可选择性的退出过程的执行,这句至四年过后,最后的Msgbox就不会执行了

    Else
    Msgbox i
    End if 
    Next i mgsbox"ceshi"
    end sub

    过程结束代码,这是sub必须的。

    展开全文
  • Function是函数,sub是子程序,都可以传递bai参数,但函数有返回值,子程序没有 function 可以用自身名字返回一个值,sub 需定义别的变量,用传址方式传回值。 Sub 过程与Function 过程的区别: 1. Sub 过程定义时...

    Function是函数,sub是子程序,都可以传递bai参数,但函数有返回值,子程序没有
    function 可以用自身名字返回一个值,sub 需定义别的变量,用传址方式传回值。
    Sub 过程与Function 过程的区别:
    1. Sub 过程定义时无需定义返回值类型,而Function 过程一般需要用“As 数据类型” 定义函数返回值类型。
    2. Sub 过程中没有对过程名赋值的语句,而Function 过程中一定有对函数名赋值的语句。
    3. 调用过程:调用 Sub 过程与 Function 过程不同。调用 Sub 过程的是一个独立的语句,而调用函数过程只是表达式的一部分。Sub 过程还有一点与函数不一样,它不会用名字返回一个值。但是,与 Function过程一样,Sub 过程也可以修改传递给它们的任何变量的值。
    4. 调用 Sub 过程有两种方法:
    以下两个语句都调用了名为 MyProc 的 Sub 过程。
    Call MyProc (FirstArgument, SecondArgument)
    MyProc FirstArgument, SecondArgument
    注意当使用 Call 语法时,参数必须在括号内。若省略 Call 关键字,则也必须省略参数两边的括号。

    展开全文
  • 网络爬虫尝试(VB编写)

    千次阅读 2019-03-15 16:42:16
    Private Sub Form_Load() a = getHTTPPage(“http://www.baidu.com/”) b = Split(a, “[”)(1) c = Split(b, “]”)(0) MsgBox c End Sub Function getHTTPPage(url) On Error Resume Next Dim http Set ...

    Private Sub Form_Load()
    a = getHTTPPage(“http://www.baidu.com/”)
    b = Split(a, “[”)(1)
    c = Split(b, “]”)(0)
    MsgBox c
    End Sub
    Function getHTTPPage(url)
    On Error Resume Next
    Dim http
    Set http = CreateObject(“MSXML2.XMLHTTP”)
    http.Open “GET”, url, False
    getHTTPPage = http.Send()
    'MsgBox http.ReadyState
    If http.ReadyState <> 4 Then
    MsgBox “无法连接服务器”
    Exit Function
    End If
    getHTTPPage = BytesToBstr(http.responseBody, “GB2312”)
    Set http = Nothing
    End Function
    Function BytesToBstr(body, Cset)
    Dim objstream
    Set objstream = CreateObject(“adodb.stream”)
    objstream.Type = 1
    objstream.Mode = 3
    objstream.Open
    objstream.Write body
    objstream.position = 0
    objstream.Type = 2
    objstream.Charset = Cset
    BytesToBstr = objstream.ReadText
    objstream.Close
    Set objstream = Nothing
    End Function

    展开全文
  • vb Form的基本事件

    千次阅读 2018-06-30 11:19:10
    Private Sub Form_Activate() 当此窗体变为活动窗口时触发 End Sub Private Sub Form_Click() 单击时触发 End Sub Private Sub Form_DblClick() 双击时触发 End Sub Private Sub Form_Deactivate() 当此窗体不再是...
  • VBSub与Function的区别

    2021-04-29 06:04:37
    Sub可以理解为执行一个过程,一个操作,(举例:我拍了下桌子)Function在执行完过程后,还要返回一个结果(举例:我拍了下桌子,结果:我手拍红了,疼的。)Sub:过程; Function:函数,可以带返回值语法:Sub SubName...
  • 程序代码:PrivateSub RECTAcreage(ByVal sngChangDu As Single, ByVal sngKuanDu As Single, Optional ByVal intPoint As Integer = 3)MsgBox "矩形的长=" & sngChangDu & vbCrLf & "矩形的宽=" & ...
  • 满意答案shaneya2013.06.17采纳率:44%等级:12已帮助:15807人对上面一个程序加下注解Private Sub Command1_Click() 'Command1的单击事件所以要在窗体上加command1按钮一个Dim a As Long, b As Long, c As Long, s ...
  • vb.net未找到Sub Main()

    千次阅读 2011-06-07 15:09:00
    vb.net中如果修改了窗体的那么属性或修改了启动项,会出现"未找到Sub Main()"的错误. 解决办法是,打开项目的属性页面-——应用程序——启动窗体把启动窗体设置为改后的窗体名就好了。 另外,不注意把应用程序...
  • sub实现:Private Sub Command1_Click()Dim a As Long, b As Long, c As Longa = Val(InputBox("请输入一个大于0的整数A:"))b = Val(InputBox("请输入一个大于0的整数B:"))c = Val(InputBox("请输入一个大于0的...
  • 《《VB程序设计基础》第4章 函数与过程》由会员分享,可在线阅读,更多相关《《VB程序设计基础》第4章 函数与过程(16页珍藏版)》请在人人文库网上搜索。1、第4章函数和进程,编写4.1过程和传递调用4.2参数4.3多模块...
  • VB传递数组参数

    千次阅读 2008-01-10 01:08:00
    Public Sub 第一个工程() MsgBox "这是我的第一个过程" Dim arrND(0 To 1, 0 To 1) As Variant arrND(0, 0) = "Sample.vsd" arrND(0, 1) = "111" arrND(1, 0) = "222" arrND(1, 1) = "333" CreateDrawing (ar
  • 计算机二级VB强化试题及答案对于备考计算机二级考试的考生来说,试题的练习是巩固知识和提高自信心最有效的方法,以下是由小编整理关于计算机二级VB强化试题及答案的内容,希望大家喜欢!1.在窗体上建立一个名称为...
  • sub指令(汇编语言sub用法)

    千次阅读 2021-05-22 17:49:04
    最近在写一个小程序 查询到汇编指令SUB A, R解释为R-A赋予A 其中A代表累.表示 lz 汇编里面没有+-号吧 然后都是用二进制表示的 所以要做到楼主要求的 必须先写代码 实现输入十进制 转换成二进制过 然后想减结果就出来...
  • 现在学VB编程还有前途吗?目前,没有必要使用VB进行应用程序开发。与VB相关的唯一市场可能是officevba相关的开发,这是office软件(如word、Excel和PowerPoint)的二次开发,但VBA也是VB的一个子集。不建议以特殊的...
  • vb小程序(用vb编写简单小程序实例)

    千次阅读 2021-08-01 03:13:52
    在窗体添加一个标签,一个计时器控件,Private Sub Form_Load() Timer1.Enabled = True Timer1.Interval = 1000 Label1.Caption = "字体随机变色" End Sub Private Sub .用VB编写的应用程序,实用一点,但不需要太...
  • 关于vb中删除数据库记录的语句Sql = "select * from 班级信息where 姓名='" & Trim(Text1.Text) & "'"rsd.Open Sql, conn, adOpenStatic, adLockOptimisticYN = MsgBox("确定删除", vbYesNo)If YN = 6 ...
  • vb曲线拟合

    2020-12-23 14:23:29
    展开全部我就给你贴出frm文件吧。其他的工程文件也贴不出。希望对你有用。VERSION 5.00Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"Object = "{F9043C88-... "COMDLG32.OCX"Begin VB.F...
  • vb语言程序设计简介以vb程序设计语言为工具,对特定的问题进行分析,并设计出解题的算法,根据得到的算法,用vb语言编写出源程序的过程就是vb程序设计。编写计算机程序需要使用计算机编程语言。计算机编程语言是人和...
  • VB.Net - 常数和枚举

    2021-02-27 11:19:56
    constants 常数指的是程序在执行过程中可能不会改变的...在VB.Net中,常量是使用Const语句声明的。 Const语句用于模块,类,结构,过程或块级别,以用于替换文字值。 Const语句的语法是: [ < attributelist> ]
  • 2017年计算机二级VB考试训练题及答案为了帮助大家提高计算机考试成绩,今天百分网小编特地为大家收集了以下2017年计算机二级VB考试训练题及答案,欢迎学习!1.与数学表达式ln(a+b)/(3x)+5 对应的Visual Basic表达式是...
  • 科学计算器vb代码.doc

    2021-06-18 07:30:03
    科学计算器vb代码.doc (19页) 本资源提供全文预览,点击全文预览即可全文预览,如果喜欢文档就下载吧,查找使用更方便哦!14.90 积分· 用VB写计算器似乎有很多例子,这个代码就是其中之一,科学计算器是在基本...
  • VB操作wincc脚本心得

    2020-12-19 19:25:49
    Vbs 操作 wincc 画面脚本总结 一: 不使用变量... 设置文本 Set titleTxt=HMIRuntime.Screens ("Home1").ScreenItems(" 静态文本 2") titleTxt.Text =titleTxt.Text+"EF" // 获取文本的值并追加字符 4.vb 字符串函数
  • 科学计算器vb代码

    2021-07-29 03:45:17
    《科学计算器vb代码》由会员分享,可在线阅读,更多相关《科学计算器vb代码(30页珍藏版)》请在人人文库网上搜索。1、用VB写计算器似乎有很多例子,这个代码就是其中之一,科学计算器是在基本计算器的基础上,加入...
  • VB实现List集合

    2021-07-25 22:50:17
    Option Explicit '***********************List集合***************************** Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef psa() As Any) ...Public Sub Add(E As Variant) Dim Size.
  • PrivateSubCommand1_Click()Caption="b样条曲面"CommonDialog1.Filter="数据文件*.txt|*.txt|(*.*)|*.*"CommonDialog1.ShowOpenfilehandle=FreeFile()ReDimXB(4,4),YB(4,4),ZB(4,4),P...Private Sub Command1_Click...
  • socket通讯是最常用的通讯协议,以服务器和客户端的形式体现,在VB.net中,也可以实现。 在visual studio2019中新建两个窗体项目,分别命名为server和client
  • vb代码打开网页,打开一个网站的功能用API来做实在是太容易了,就是用ShellExecute函数来完成,只要一行代码,而且VB用ShellExecute也可以轻易打开EXE程序,音乐,视频,txt文件,邮件软件等等...先在窗体写下API...
  • vb文本框字体加粗 vb字体加粗代码

    千次阅读 2021-01-13 18:06:15
    怎么改变VB中文本框字体颜色?为所选颜色上色。要使用此属性,必须首先将flags属性设置为cdlccfeffects。Fontbold是否选择了粗体。Fontitalics是否选择了斜体。Fontstrikethru是否选择了删除线。Fontunderline是否...
  • 注释:网络上没有一个比较系统的VB6或者VBA的教程,于是打算利用中午休息的时间写一写这方面的教程,不喜欢写得很文绉绉,一切都以常用为前提进行介绍。因为要覆盖更多读者,所以本系列文章有些地方可能会介绍比较地...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 48,010
精华内容 19,204
关键字:

vb的sub