精华内容
下载资源
问答
  • vbFOR循环语句的教学
  • 以百鸡百钱为载体,通过比较for语句和do语句,掌握这两种语句的异同。
  • vb for 循环语句

    2010-07-23 20:22:47
    vb for循环语句,初次提交不知感觉怎么样。望楼主见谅了。以后还会持续关注发帖字。
  • 浅析VB For Each.Next语句

    千次阅读 2016-11-14 17:12:45
    本文向大家介绍VB For Each.Next语句,可能好多人还不了解VB For Each.Next语句,没有关系,看完本文你肯定有不少收获,希望本文能教会你更多东西。 VB For Each.Next语句在数组中的使用: VB For Each.Next...

    本文向大家介绍VB For Each.Next语句,可能好多人还不了解VB For Each.Next语句,没有关系,看完本文你肯定有不少收获,希望本文能教会你更多东西。

    VB For Each.Next语句在数组中的使用:

    VB For Each.Next语句好像只是为二种数据类型专门度身定做的,其一就是集合,另外一个就是数组了。通过VB For Each.Next语句,可以十分方便的访问数组中的任一元素。请仔细分析一下下列代码:

    1. Dim arrString ( 2 ) As String = {"星期一","星期二","星期三"}  
    2. Dim Temp As String  
    3. For Each Temp In arrString  
    4. If Temp = "星期三" Then  
    5. MsgBox ( "在数组中寻找到""星期三""字符串")  
    6. Exit For  
    7. '退出For Each …. Next语句  
    8. End If  
    9. Next 


    上面代码的功能是通过VB For Each.Next语句访问arrString数组中各元素,如果发现有元素为字符串“星期三”,则弹出提示框,并退出循环。

    同样用For … Next语句也能够实现上面同样的功能,只是感觉有点不专业,并且有点繁琐,下面代码是用For … Next语句实现上面VB For Each.Next语句同等功能的代码:

    1. Dim i As Integer  
    2. For i = 0 To myString.Length - 1  
    3. If arrString ( i ) = "星期三" Then  
    4. MsgBox ( "在数组中寻找到""星期三""字符串" )  
    5. Exit For  
    6. End If  
    7. Next 
    展开全文
  • VB For 循环语句的用法

    万次阅读 2017-03-14 07:18:50
    For循环的格式: For 循环变量 = 初值 To 终值 [Step 步长] step 2 就是i=i+2 [循环体] Next [循环变量] 注意: 1) 当步长 > 0 时 循环执行的条件:循环变量 2) 当步长 循环执行的...

    For循环的格式:

    For 循环变量 = 初值 To 终值 [Step 步长]   step 2 就是i=i+2

    [循环体]

    Next [循环变量]

    注意:

    1) 当步长 > 0 时

    循环执行的条件:循环变量 <= 终值

    2) 当步长 < 0 时

    循环执行的条件:循环变量 >= 终值

    强行退出 For 循环,请使用 Exit For。


    举例1: 单击命令按钮 Command1 后,先后弹出很多消息框,消息内容一开始是 1,最后是 100,每弹出一次,消息内容加 1,也就是 1; 2; 3; ...; 98; 99; 100。

    VB 代码如下:

    Private Sub Command1_Click()

    Dim i As Long

    For i = 1 To 100

    MsgBox i

    Next

    End Sub


    如果使用 For 语句,代码如下:

    Private Sub Form_Load()

    For i = 1 To 100

    MsgBox i, vbInformation      /vbInformation 指显示图标,下同

    Next

    MsgBox "Finished", vbCritical

    End Sub


    举例2,While格式

    如果不用 For 语句,我们可以这样做:

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    While i <= 100 '使用 While 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Wend   '不能用end while

    MsgBox "Finished", vbCritical

    End Sub


    举例3,Do while

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    Do While i <= 100 '使用 Do While 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Loop

    MsgBox "Finished", vbCritical

    End Sub


    举例3 do until

    如果连 Do While 都不能用,我们还可以这样做:

    Private Sub Form_Load()

    Dim i As Long

    i = 1

    Do Until i > 100 '使用 Do Until 语句

    MsgBox i, vbInformation

    i = i + 1 '这句话千万不能少!否则会造成死循环!!

    Loop

    MsgBox "Finished", vbCritical

    End Sub



    展开全文
  • vb.net语句 The actual effect of the Imports statement in VB.NET is often a source of confusion for people learning the language. And the interaction with VB.NET References makes for even more ...

    vb.net语句

    The actual effect of the Imports statement in VB.NET is often a source of confusion for people learning the language. And the interaction with VB.NET References makes for even more confusion. We're going to clear that up in this Quick Tip.

    VB.NET中Imports语句的实际效果通常会使学习该语言的人感到困惑。 与VB.NET References的交互会带来更多混乱。 我们将在此快速提示中对此进行清理。

    Here's a brief summary of the whole story. Then we'll go over the details.

    这是整个故事的简短摘要。 然后,我们将详细介绍。

    A Reference to a VB.NET namespace is a requirement and must be added to a project before the objects in the namespace can be used. (A set of references is automatically added for the different templates in Visual Studio or VB.NET Express. Click "Show All Files" in Solution Explorer to see what they are.) But the Imports statement is not a requirement. Instead, it's simply a coding convenience that allows shorter names to be used.

    对VB.NET命名空间的引用是一项要求,必须先将其添加到项目中,然后才能使用该命名空间中的对象。 (将为Visual Studio或VB.NET Express中的不同模板自动添加一组引用。在解决方案资源管理器中单击“显示所有文件”以查看它们的含义。)但是,Imports语句不是必需的。 相反,它只是一种编码便利,允许使用较短的名称。

    Now let's look at an actual example. To illustrate this idea, we're going to use the System.Data namespace — which provides ADO.NET data technology.

    现在让我们看一个实际的例子。 为了说明这个想法,我们将使用System.Data命名空间-它提供ADO.NET数据技术。

    System.Data is added to Windows applications as a Reference by default using the VB.NET Windows Forms Application template.

    默认情况下,使用VB.NET Windows窗体应用程序模板将System.Data作为参考添加到Windows应用程序中。

    在引用集合中添加名称空间 ( Adding a Namespace in the References Collection )

    Adding a new namespace to the References collection in a project makes the objects in that namespace available to the project as well. The most visible effect of this is that the Visual Studio "Intellisense" will help you find the objects in popup menu boxes.

    在项目中的References集合中添加新的名称空间会使该名称空间中的对象也可用于项目。 最明显的效果是Visual Studio“ Intellisense”将帮助您在弹出菜单框中找到对象。

    If you attempt to use an object in your program without a Reference, the line of code generates an error.

    如果尝试在程序中使用没有引用的对象,则代码行将产生错误。

    The Imports statement, on the other hand, is never required. The only thing it does is allow the name to be resolved without being fully qualified. In other words (emphasis added to show the differences).

    另一方面,从不需要Imports语句。 唯一要做的是允许在不完全限定的情况下解析名称。 换句话说(加重以显示差异)。

     Imports System.Data
     Public Class Form1
        Inherits System.Windows.Forms.Form
        Private Sub Form1_Load( ...
           Dim Test As OleDb.OleDbCommand
        End Sub
     End Class 
    

    and

     Imports System.Data.OleDb
     Public Class Form1
        Inherits System.Windows.Forms.Form
        Private Sub Form1_Load( ...
           Dim Test As OleDbCommand
        End Sub
     End Class 
    

    are both equivalent. But ...

    都是等效的。 但是...

     Imports System.Data
     Public Class Form1
        Inherits System.Windows.Forms.Form
        Private Sub Form1_Load( ...
           Dim Test As OleDbCommand
        End Sub
     End Class 
    

    results in a syntax error ("Type 'OleDbCommand' is not defined") because of the Imports namespace qualification System.Data doesn't provide enough information to find the object OleDbCommand.

    导致语法错误(“类型'OleDbCommand'未定义”),原因是Imports命名空间限定System.Data没有提供足够的信息来查找对象OleDbCommand。

    Although the qualification of names in your program source code can be coordinated at any level in the 'apparent' hierarchy, you still have to pick the right namespace to reference. For example, .NET provides a System.Web namespace and a whole list of others starting with System.Web ...

    尽管可以在“表观”层次结构中的任何级别上协调程序源代码中名称的限定,但仍必须选择正确的命名空间进行引用。 例如,.NET提供了System.Web命名空间以及以System.Web开头的其他列表。

    注意 ( Note )

    There are two entirely different DLL files for the references. You DO have to pick the right one because WebService isn't a method in one of them.

    有两个完全不同的DLL文件供参考。 您必须选择正确的方法,因为WebService不是其中一种方法。

    翻译自: https://www.thoughtco.com/the-vbnet-imports-statement-3424234

    vb.net语句

    展开全文
  • 版权声明:本文为博vb.net教程 主原创文章,转载请在显著位置标明本文出处c#教程以及作者网名,未经作者允许不得用于商业目的。 for循环还可以指定循环的步长 For 初始值 To 结束python基础教程值 Step 增量 执行...

    版权声明:本文为博vb.net教程
    主原创文章,转载请在显著位置标明本文出处c#教程以及作者网名,未经作者允许不得用于商业目的。
    for循环还可以指定循环的步长

    For 初始值 To 结束python基础教程值 Step 增量
    执行语句块
    Next

    看下面的例子:

        Sub Main()
    
            Dim i As Integer
    
            Dim j As Integer = 0
    
            For i = 0 To 21 Step 3
    
                Console.WriteLine(i)
    
                j += 1
    
            Next
    
            Console.WriteLine("循环次数:" & j)
    
            Console.ReadKey()
    
        End Sub
    

    i=0执行一次,前进3个数,i=3执行,又前进3个数,i=6执行。。。,

    结果如下图:
    在这里插入图片描述

    另外一个例子,求1-99中奇数的和:

    Sub Main()
    
        Dim s As Integer
    
        s = 0
    
        For i As Integer = 1 To 99 Step 2
    
            s += i
    
        Next
    
        Console.WriteLine(s)
    
        s = 0
    
        For i As Integer = 1 To 99
    
            If i Mod 2 = 1 Then s += i
    
        Next
    
        Console.WriteLine(s)
    
        Console.ReadKey()
    
    End Sub
    

    运行结果如下:

    在这里插入图片描述

    由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

    转载自:https://blog.csdn.net/UruseiBest/article/details/65028546?ops_request_misc=%25257B%252522request%25255Fid%252522%25253A%252522160973065816780299046655%252522%25252C%252522scm%252522%25253A%25252220140713.130102334.pc%25255Fblog.%252522%25257D&request_id=160973065816780299046655&biz_id=0&utm_medium=distribute.pc_search_result.none-task-blog-2blogfirst_rank_v2~rank_v29-11-65028546.pc_v2_rank_blog_default&utm_term=VB.net

    作者:VB.Net

    展开全文
  • 当需要为集合或数组的每个元素重复执行一组语句时,可以使用 For Each...Next 循环,通过For Each遍历出每个元素。 还是采用《流程控制:循环语句 For...Next》中的题目 一组数按照由小到大的顺序进行排序: ...
  • 版权声明:本文为博主原创文章,转载请...For...Next 语句用于执行重复操作 最简单的结构: For 初始值 To 结束值 执行语句块 Next 例如下面的代码: Sub Main() Dim i As Integer Dim s As Integer = 0 ...
  • 求问各位了怎么运用vb6.0编程语言中的循环语句调用 for 语句的写法实现控件调用?for语句后面怎么加上控件的判断表达?
  • 使用vb6.0中文语言的循环语句for循环的功能怎么写代码判断每个控件的属性是否都调用到?怎么判断是否存在属性调用的情形?
  • vbfor循环

    2013-12-03 14:00:14
    1 FOR为循环说明语句 由它说明循环变量的初值 终值 2 FOR与NEXT之间的为循环体 表示重复执行的部分 3 NEXT为循环终端语句 程序每执行到此表示完成了一次循环 这时循环变量就要增 加一个步长值 直到当变量值超过...
  • VB6.0中For语句的两种用法,如何用第二种用法遍历一个数组?
  • VB循环语句: 经常地,当编写代码时,我们希望将一段代码执行若干次。我们可以在代码中使用循环语句来完成这项工作。 Private Sub Command1_Click() Fori = 1 To 10 Print i Nexti End Sub 具体请看视频...
  • 也就是说,for内的语句没有被执行。 代码如下: ``` Dim r(100) As String Dim rec As Integer Private Sub Form_Load() Open ("result.txt") For Input As #3 rec = 0 Do Until EOF(3) Line Input...
  • 5·6·7·8求解答,最好有详细过程,问这么简单的问题,怪不好意思的,求帮一帮我呗
  • VB和C#中循环语句

    千次阅读 热门讨论 2015-11-29 18:46:14
    引言:学习了C#的循环语句,让我觉得有点吃力,其实从原理上讲这些是学过的,只是没有对比着来...(1)VBfor...next 与 C#中的for  VB: For 循环变量=初值 to 终值 [step 步长]  循环体 Next 循环变量 例:求1
  • VB6.0 文件操作语句

    2019-09-26 04:10:12
    Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength] Open 语句的语法具有以下几个部分: 部分 描述 pathname 必要。字符串表达式,指定文件名,该文件名可能还包括目录...
  • VB循环语句的问题,for语句运行次数可以通过to控制,那么运行层次通过什么来确定呢?
  • 掌握使用For Next语句/Do Until Loop语句/Do While Loop语句进行循环控制 用循环语句打印数学乘法表 编写实验报告。 实验环境 Windows7,Office、VB开发环境。 实验运行结果 点击“打印”后的效果: 点击“清屏”...
  • VB6断点语句

    2011-08-18 10:42:17
    通常我们让软件调试的时候中途停止,是在IDE中设置断点....但是有些特殊时候,比如 for i = 1 to 10000 时,希望在i=900的时候中断运行, 那么可以这样实现:   方法1: If (i=900) Then Debug.Print 1 / 0 方法2:
  • VBfor循环语句编写的解决百鸡百钱的小小程序,适合初学者使用。
  • vb 循环 Do While 语句

    2019-10-01 16:41:17
    Do While (i > 0) i = i -1 Loop 先判断 ,当条件为 True 时,运行 ... For Each ref_row As DataGridViewRow In ExcelProcesses Next 转载于:https://www.cnblogs.com/IRIS-TK1/archi...
  • VB6 执行String语句

    2013-12-15 16:05:27
    For i = 0 To UBound(dm) If Len(dm(i)) <> 0 Then Dim Result As Boolean Result = ExecuteLine(dm(i)) If Result = False Then Debug.Print(i + 1 & vbTab & "行执行错误") Else Debug.Print(i + 1 & vbTab...
  • 请问怎么利用vb6.0编程的语言的for循环功能语句实现对控件属性的判断和赋值调用?控件属性和别的控件的比较怎么做?
  • vb.net的循环语句

    千次阅读 2011-10-06 08:42:23
    For...Next循环在事件过程中重复执行指定的一组语句,直到达到指定的执行次数为止。当要执行几个相关的运算、操作屏幕上的多个元素或者处理几段用户输入时,这种方法就十分有用了。For...Next循环实际上是一大串程序...
  • C#代码: int count = 10; for(int i=1; i { count = 5; MessageBox.Show("i = " + i.ToString()); } VB.net代码: Dim i As Int32, count As Int32 = 10 For i = 1 To count count = 5 

空空如也

空空如也

1 2 3 4 5 ... 13
收藏数 250
精华内容 100
关键字:

vb语句for