vb.net套循环 vbs循环嵌套

vb.net 循环结构嵌套

Public Class Form1

        For i = 1 To 9

            For j = 1 To 9

                If j = i Then

                    Label1.Text = Label1.Text  " "  i  "*"  j  "="  IIf(i * j  9, i * j, i * j  " ")

                End If

            Next

            Label1.Text = Label1.Text  vbCrLf

        Next

    End Sub

End Class

label属性设置：AutoSize设置为F，Size设置为440，190，BACKCOLOR设置为WHITE

相关问答

Q1: vb.net for循环

dim i

for i=2 to 1

msgbox("*")

next

语法没问题，这应该在winform里面能够调试成功，显示运行框，但是在web application里面就不能出现弹出信息框了，在网页上要出现，建议用response.write("scriptalert（'***'）/script").

for i=100 to 1 这样的语句在VB9.0后是支持的。楼下的，不要天天抱着VB6啃。

Q2: VB.net 运行多个循环

用 timer 控件，按钮被按下的时候把 timer 的 .enabled 改为 true

timer 控件会发生 tick 事件，你可以让第一次 tick 执行 A，第二次 tick 执行 B,等等...

Q3: vb.net 关于循环语句

我写了一段代码，注意你读取的方法，我改进了一下 Imports System.IO ‘代码窗体的最上端一定要声明

Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim sr As StreamReader Dim TextBox As Control

Dim i As Integer

i = 1

For Each TextBox In Me.Controls

If TypeName(TextBox) = "TextBox" Then sr = New StreamReader("c:\save\" i ".ini", System.Text.Encoding.Default) ’注意选择编码方式，按你原来的方法，未设置编码，显示的是乱码！路径请按你的情况改！ TextBox.Text = sr.ReadToEnd()

i += 1 End If

Next

MsgBox("已经载入" i - 1 "个文件") End Sub注意：这样的代码是倒序的，第一个文本框显示的是最后一个文件的内容！请酌情处理！

关于vb.net套循环和vbs循环嵌套的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。