vb for循环变量与字符串组合

VB中的for循环
比如一个字符串s="asdfadsfasdfasdfadsf"for i = 0 to s.lenght-1 k = s.substring(i,1)console.write(k)next 这样就可以一个字符一个字符打印出来

vb6.0 FOR循环语句
Dim Str1 As String Dim Str2() As String Private Sub Form_Load()Command1.Caption = "随机0,1字符"Command2.Caption = "计算"End Sub Private Sub Command1_Click() '随机出一个由0和1组成长度为21的字符串 Randomize Str1 = ""For I = 0 To 20 Str1 = Str1 & Math.Round(Rnd)...

VB中的For语句
private Sub Form_Click() ’当窗体单击时触发此过程 Dim i,j as Integer ’声明默认类型变量i（变体型）和长整型变量j print ’在窗体上打印空白的一行 For i=1 To 9 ’设置循环 i 每次循环从1到9 默认步长1（每次循环加1）’完整： for i = 1 to 9 step 1 For j=1 To ...

VB.NET 变量和字符串组成控件名
直接For就行了 Dim ctl As Control Dim lbl as Label For Each ctl In Me.Controls If ctl.GetType.ToString = "System.Windows.Forms.Label" Then lbl = CType(ctl,Label)'得到一个Label,可以对它进行赋值操作了 Msgbox lbl.Name End If Next ...

vb 用for循环输出s=11 22 33 44 … 99
for i=1 to 9 print string(2,str(i));space(1); '直接输出 s=s & string(2,str(i)) & " " '或存入字符串变量 next print s '最后输出变量

VB for循环
加for循环的话表示LAD189A0和s2的前八个字符都要相同才会继续，要是这样的话，要循环干什么 直接 If Mid(s2,1，8）<>"LAD189A0" then msgbox“你的VINtage有错” : Exit Sub 就可以了！这个LAD189A0的引号是一定要的，不然就不是字符串 而是变量了，相信你没有这个变量，导致即使s2="LAD189...

vb里面那几个表示循环的函数怎么用
Text1.Text = n n = Val(n) (因为条件表达式是数值比较，所以要把InputBox得到的 Loop 字符串数字转为数值类型，例如：”100”100)For k = 1 To n S = S + 1 \/ k 循环求S=1+1\/2+1\/3+…+1\/n Next k Text2.Text = S 3、两种循环结构语句的格式：(1) For语句的一...

关于VB的循环及函数(与mid函数有关)
Dim s As String '定义一个s变量 Private Sub Command1_Click()s = InputBox("输入字符串") '为s赋值(输入要颠倒的字母)Label3.Caption = s '将标签显示你的要颠倒的 End Sub Private Sub Command2_Click()l = Len(s) '取字母的总个数 For i = 1 To l '从1 循环到 字母的总...

在VB的for循环语句中的step有什么作用,我每次看到这里都不明白step到...
步长，你循环从1to10， 每次加多少呢 step就是 每次加多少 不写 就是 默认加1

VB字符型变量怎么组合起来,用什么符号?
不过vb里确实可以把string类型变量和字节数组直接转换的，但你要做字符串连接的话还是得转成string。如果你是要拼接数组的话，可以这样 dim stra as string,strb as strin dim c as string stra =a strb =b c=a&b 如果要的是数值的话就是val(c)dim c() as byte redim c(0 to ubound(a)...