精华内容
下载资源
问答
  • Vb中Index的用法

    千次阅读 2012-12-26 20:05:24
    函数INDEX()有两种形式:数组和引用。数组形式通常返回数值或数值数组;引用形式通常返回引用。 语法: INDEX(array,row_num,column_num)返回数组指定的单元格或单元格数组的数值。 INDEX(reference,row_...
    
    

             函数INDEX()有两种形式:数组和引用。数组形式通常返回数值或数值数组;引用形式通常返回引用。
    语法:

    INDEX(arrayrow_numcolumn_num)返回数组中指定的单元格或单元格数组的数值。

    INDEX(referencerow_numcolumn_numarea_num)返回引用中指定单元格或单元格区域的引用。

    参数:

    Array为单元格区域或数组常数;Row_num为数组中某行的行序号,函数从该行返回数值。如果省略row_num,则必须有column_numColumn_num是数组中某列的列序号,函数从该列返回数值。如果省略column_num,则必须有row_numReference是对一个或多个单元格区域的引用,如果为引用输入一个不连续的选定区域,必须用括号括起来。Area_num是选择引用中的一个区域,并返回该区域中row_numcolumn_num的交叉区域。选中或输入的第一个区域序号为1,第二个为2,以此类推。如果省略area_num,则INDEX函数使用区域1

    实例:

    如果A1=68A2=96A3=90,则公式“=INDEX(A1:A311)”返回68=INDEX(A1:A3111)返回68

     

    展开全文
  • vb js InStr(s,xx) 不存在返回0,首位返回1 s.indexOf(xx) 不存在返回-1,首位返回0 InStr(i,s,xx) s.indexOf(xx,i) Mid(s,i,j) s.substr(i,j) Replace(s,xx,yy) s.replace(xx,yy) Split(s...

    假如要处理的字符串为s

     

    vb  js
    InStr(s,xx)  不存在返回0,首位返回1 s.indexOf(xx) 不存在返回-1,首位返回0
    InStr(i,s,xx) s.indexOf(xx,i)
    Mid(s,i,j) s.substr(i,j)
    Replace(s,xx,yy)  s.replace(xx,yy)
    Split(s,xx)  s.split(xx)
    Len(s)  s.length
    Left(s,i)  s.substr(0,i) 或 s.substring(0,i)
    Right(s,i)  s.substr(s.length-i) 或 s.substring(s.length-i,s.length)或s.slice(-i)或s.substr(-i)
    LCase(s)  s.toLowerCase()
    UCase(s) s.toUpperCase()
    Asc(s) s.charCodeAt(0)
    Trim(s) s.trim()

     

     

     

    展开全文
  • 1,在 第一个单元格 输入 公式 =C12, 选中剩余合并单元格,输入公式 =index(C:C,1+counta(A$1:A3))按Ctrl+Enter 即可(其中A$1:A3里的A3 根据第一个合并单元格的实际范围调整操作解释:index函数是以第一个参数的...

    要求如下:

    把C这一列的内容填到已经进行过不同单元格合并后的A列中。 

    95099822d9bc11b9e0bf16a65d60c9fe.png

    要求的结果如下:

    6e31b10ba5d6d27f2f319204b7418540.png

    操作步骤:

    1,在 第一个单元格  输入 公式  

      =C1

    2, 选中剩余合并单元格,

    输入公式  

    =index(C:C,1+counta(A$1:A3))

    按Ctrl+Enter 即可(其中A$1:A3里的A3 根据第一个合并单元格的实际范围调整

    操作解释:

    index函数是以第一个参数中的内容为基础,显示出第二个参数所对应的行数的值。

    如:index(c:c,3)就是C列中第3行的值,即上图中的107

    而公式中

    =index(C:C,1+counta(A$1:A3))

    的重点就变成了,红色部分如何理解的问题了。

    而前面的1也容易,那counta(A$1:A3)是何意?

    解释:就是从A列的第1行开始,到A3单元格中,值不为空的个数,而A1到A3进行了合并,所以,值只有A1单元格有值,那么,counta(A$1:A3)运算后的值就是1

    所以,A4单元格就是index(c:c,1+1)也就是c列的第二行,得出104的值。

    而A$1:A3中的$锁定了始终从第一行开始,就是下拉时,始终从第一行开始计算。

    那当A9单元格时,上面的公司就变成了=index(C:C,1+counta(A$1:A8)),而counta(a$1:a8)中,有几个非空的单元格呢?只有2个,A1和A4单元格,所以,这个公式就变成了index(c:c,1+2),就是C列的第三行的值,对应107.

    同理。A11单元格的就是C列的第4行的值。就是110的值了。

    在这个例子中,就是学习和理解counta函数,非空单元格的个数。

    历史index相关的文章:

    在Excel表格中按一定条件进行归类整理,index+small+if,offset+small+if

    其他count函数相关的文章:

    【Excel函数】COUNT包含数字、参数数字的单元格个数

    countif函数

    【Excel函数】COUNTIF计算区域内符合条件的单元格个数

    19885b4316de96c22bd7a592c02b7a98.gif制作表格有难题扫码来帮你b18b3141e952c8ff6e7b191b29db5e70.png长按咨询客服

    展开全文
  • VB6提供了一个很好用的函数叫IsMissing,可以用来判断用户是否对缺省参数赋值,比如有以下一个函数体: 代码如下: Public Property Get Item(Optional ByRef Index As Integer, Optional ByRef Name As ...

     在VB6中提供了一个很好用的函数叫IsMissing,可以用来判断用户是否对缺省参数赋值,比如有以下一个函数体:

    代码如下:

    Public Property Get Item(Optional ByRef Index As Integer, Optional ByRef Name As String) As TDMAttachment
        Dim i As Long
        Dim lngIndex As Long
        Dim strName As String

        If Not IsMissing(Index) Then '如果输入了索引
            If Not IsNumeric(Index) Then Exit Property
            lngIndex = Val(Index)
            If lngIndex >= 0 And lngIndex < m_lngCount Then
                Set Item = m_objAttachments(lngIndex)
            End If
        ElseIf Not IsMissing(Name) Then '如果输入了名称
            strName = CStr(Name)
            For i = 0 To m_lngCount - 1
                If m_objAttachments(i).Name = strName Then
                    Set Item = m_objAttachments(i)
                    Exit Property
                End If
            Next
        End If
    End Property

    此函数是一个父类的属性,可以根据用户输入的索引或者名称来返回一个子类。从代码上看似乎没有什么问题,但是,当用户使用Set objChild=Item("名称")来获得子类对象时,返回的结果是不正确的。为什么会这样呢?原来,在VB里,除了VARIANT类型外,其它数据类型都被赋了初始值,比如所有的Byt、Integer、Long、Double等数值型初始始为0,String的初始值为""(注意,""并不是vbNullString),Object的初始值为Nothing,而IsMissing函数在判断时,是无法区分参数变量的值是VB设定的初始值还是用户赋予的值,因此检测结果始终为True,从而导致ElseIf Not IsMissing(Name) Then这一条分支代码根本不会运行。那么,如何避免这种情况呢?

    其实,只要把数据类型改为Variant就可以了,修改后的代码如下:

    Public Property Get Item(Optional ByRef Index As Variant, Optional ByRef Name As Variant) As TDMAttachment
        Dim i As Long
        Dim lngIndex As Long
        Dim strName As String
           
        If Not IsMissing(Index) Then '如果输入了索引
            If Not IsNumeric(Index) Then Exit Property
            lngIndex = Val(Index)
            If lngIndex >= 0 And lngIndex < m_lngCount Then
                Set Item = m_objAttachments(lngIndex)
            End If
        ElseIf Not IsMissing(Name) Then '如果输入了名称
            strName = CStr(Name)
            For i = 0 To m_lngCount - 1
                If m_objAttachments(i).Name = strName Then
                    Set Item = m_objAttachments(i)
                    Exit Property
                End If
            Next
        End If
    End Property

     虽然为了提供代码的健壮性,我一般主张尽量少使用Variant类型,但合理使用它,往往会起到一些良好的效果,但前提必须是——合理使用。

    摘自:谨慎使用IsMissing函数


    展开全文
  • VB6转换C#2010函数替换

    2011-12-08 17:14:00
    VB6转换C#2010函数替换 VB6 ---------------->C#2010 1、InStr(strKey, " ")-->strKey.IndexOf(" ") InStr([start, ]string1, string2[, compare]) 返回指定一字符串在另一字符串最先出现的位置。在字符...
  • 学习Excel技术,关注微信公众号:excelperfect在《Excel实战技巧15:在工作表查找图片》,我们使用名称和INDEX/MATCH函数组合,在工作表显示与所选择名称相对应的图片。在《Excel实战技巧21:在工作表查找...
  • VB中,将非Access数据库称为外来数据库。对于FoxPro、dBASE、Paradox等外来数据库。虽然借助VB的Data Manager 能够对这些数据库进行NEW、OPEN、DESIGN、DELETE等操作,但在应用程序的运行状态中并不能从底层真正...
  • 没有想到shell32.dll还隐藏着很多实用的功能函数,比如打开文件夹,查找电脑,最小化所有窗体等等,这个shell32.dll既是一个标准的COM,还是一个可以作为普通的DLL进行函数引用。引用:Ms Shell Con... Option ...
  • 本次选用某学校九三班成绩表作为操作实例,其中的分数就是利用随机生成函数生成的(日常工作以实际数值为基础)。此处介绍3种类型的随机数生成方法,即小数、整数、字母。(1)随机生成小数方法:在目标...
  • 小伙伴们好啊,今天老祝和大家分享一个...函数控们的方法是这样的:在D2单元格输入一大串公式,按住Ctrl+Shift不放,按回车,然后下拉公式。=IFERROR(INDEX(A:A,SMALL(IF(B$2:B$8>=COLUMN(A:Z),ROW($2:$8)),RO...
  • 需要提取出http://www.515800.cn/blog/这个路径出来,这个如果在VB/VBS,使用InStrRev函数,很容易就可以实现,但在Delphi,虽然经常用Pos来判断字符的的位置,但从来没有看到过PosRev之类的函数,查了帮助也没....
  • VB与Flash交互

    2013-05-19 00:17:31
    VB调用FLASH函数 Private Sub but1_Click(Index As Integer) MYFLASH.CallFunction "" End Sub //下面是AS2.0的 function win():Void{ gotoAndPlay(2);//跳到第二帧 stop(); }; flash.
  • vb控件开发 开发ocx

    热门讨论 2011-02-28 16:12:16
    FSO对象模型在VB中的应用 10 , 10.txt MsComm 控件的文字传输范例 11 , 11.txt Office或IE4风格的ToolBar 12 , 12.txt Regsvr32.exe注册控件的具体用法 13 , 13.txt TextBox的自动调节 14 , 14.txt TextBox实现...
  • vb Script参考文档

    2009-07-28 22:13:02
    InputBox 函数 在对话框显示提示,等待用户输入文本或者单击按钮,并返回文本框的内容。 InStr 函数 返回一个字符串在另一个字符串第一次出现的位置。 InStrRev 函数 返回一个字符串在另一个字符串出现的...
  • 字符串处理函数大家肯定都经常用,甭管你用什么语言,这一块还是不能少的。一直以来都把python的strip理解成了去掉收尾的空格,因为用过java或者VB的程序员应该知道,有个trim可以去掉首尾的空格。不过,这次我就没...
  • VB版机房管理系统-登录窗体

    热门讨论 2017-12-05 21:27:47
    这是因为VB版本的问题,VB版本间的代码是不兼容的,若你的是VB6,它的Command的Click函数是不支持参数的,也就是不能有(Index As Integer),若是教程的程序,必须要有它的环境的 二、用户定义类型未定义 ...
  • 谨慎使用IsMissing函数

    千次阅读 2009-11-15 15:25:00
    VB6提供了一个很好用的函数叫IsMissing,可以用来判断用户是否对缺省参数赋值,比如有以下一个函数体: Public Property Get Item(Optional ByRef Index As Integer, Optional ByRef Name As String) As ...
  • 第六章 VB的过程设计

    2007-11-23 16:16:00
    轉自:http://wwww.hyit.edu.cn/edu/vb/study/index.htm ...2.VB中的自定义过程分类 (1)以“Sub”保留字开始的子程序过程 (包括事件过程和通用过程),不返回值; (2)以“Function” 保留字开始的函数过程...
  • 在修改 Combo 或 Listview 的ListIndex 时, 会发生 Click 事件, 下面的函数可以阻止该事件…… 对ListView的列排序,设置 ListView 控件到 report 视图。下面的代码允许你使用 任何的列进行排序,主要在列头上...
  • VB资源文件的使用

    2008-10-18 14:27:00
    调用资源文件资源的函数有: LoadResString 返回一个文本字符串。语法:LoadResString(index) index必需是一个整数,它用来指定资源文件数据的标识符(即经常提到的ID号),如果ID号为1的资源保留给应用程序图标...
  • vb学生成绩管理系统

    2013-06-28 08:55:24
    或者称为VB程序的逻辑数据库,通过它可以非常方便地访问其中的数据。换句话说,ADOcn是VB程序的后台数据库交互的通道。 2.设置窗体间的调用关系 2.设置窗体间的调用关系 ’调用增加课程窗体 Private ...
  • vb贪食蛇源代码

    2012-04-21 16:52:54
    vb小游戏定义蛇的运动速度枚举值 Private Enum tpsSpeed QUICKLY = 0 SLOWLY = 1 End Enum '定义蛇的运动方向枚举值 Private Enum tpsDirection D_UP = 38 D_DOWN = 40 D_LEFT = 37 D_RIGHT = 39 End Enum '...
  • str1 = lstbus.List(lstbus.ListIndex) '获取列表框的选中项(可介绍一下列表框) cnn.ConnectionString = Conn '设置数据库连接字符串 cnn.Open '打开数据库连接 Set rst.ActiveConnection = cnn '设置记录...
  • 事件委托支持为同一个DOM元素注册多个同类型事件可将事件分为事件捕获和事件冒泡机制事件委托的作用通过事件委托我们可以减少页面的事件监听函数,提升性能例子解析注册多个事件用以往注册事件的方法,如果存在多个...
  • 将sms.dll文件拷贝到系统安装目录的system32文件夹,然后再根据以下接口函数说明和提供的例程源码开发 接口函数: 1、Sms_Connection(Com_Port As Integer,Com_BaudRate As Integer, Mobile_Type As String)...
  • 在Form的Resize事件调用函数Resize_All就能实现控件自动调整大小,如: Private Sub Form_Resize() Dim H, i As Integer On Error Resume Next Resize_ALL Me 'Me是窗体名,Form1,Form2等等都可以 End Sub 在...
  • 处理EXCEL的FIND时,找到自己以前的日记,发现各种语言FIND得都很不一样,做为娱乐,展示一下:都在“abcde”找“b" EXCEL:用find,子串在前,母串在后,返回值以1开始 VB6:用instr,母串在前,子串在后,...
  • 1、CHOOSE函数函数CHOOSE是指按给定的索引值,返回引用数据对应的数值。语法结构为CHOOSE(Index_num,value1,value2,...) ,也就是CHOOSE(序号,数值1是,数值2......)。其中:Index_num 用以指明待选参数序号的...

空空如也

空空如也

1 2 3 4
收藏数 66
精华内容 26
关键字:

vb中index函数