VB里定义一个变量a为字符串型,怎么能实现a的值等于字母前缀+数字编号递增,并且都是字符串型。

例如:Private Sub Command_Click()
Dim a AS String

点击一次按钮,a = “Text1"
再击一次按钮,a = “Text2"
再击一次按钮,a = “Text3"



需要每次生成的均为字符串型,要用它们给不同的控件命名。

Dim x As Long
Private Sub Command1_Click()
    Dim a As String
    x = x + 1
    a = "text" & x
    Print a
End Sub

 ç¬¬äºŒç§å˜é‡å®šä¹‰ï¼š

Private Sub Command1_Click()
    Dim a As String
    Static x As Long
    x = x + 1
    a = "text" & x
    Print a
End Sub
温馨提示:内容为网友见解,仅供参考
无其他回答

VB里定义一个变量a为字符串型,怎么能实现a的值等于字母前缀+数字编号...
Dim x As LongPrivate Sub Command1_Click() Dim a As String x = x + 1 a = "text" & x Print aEnd Sub 第二种变量定义:Private Sub Command1_Click() Dim a As String Static x As Long x = x + 1 a = "text" & x Print aEnd Sub ...

VB怎么使一个字符串按要求排序?就是字符串里面有数字和字母。先按字母...
s1 = Text1.Text s_num = "" '用来存放数字的字符串变量 s_uchar = "" '用来存放大写字母的字符串变量 s_lchar = "" '用来存放小写字母的字符串变量 length = Len(s1)For i = 1 To length a = Mid(s1, i, 1)value = Asc(a)Text2.Text = value If value >= 48 An...

VB中怎么给字符型变量赋值
更广泛的说,定义变量在VB中通常通过“Dim”语句配合“As”关键字来实现。例如,定义一个名为s的整型变量可以通过“Dim s As Integer”来实现。这里,“s”是变量名,“As Integer”指明了变量s的数据类型为整型。字符型变量在VB中则是用双引号来包围的文本字符串,如“1sd”或“zxfg”。每个这样...

VB中声明变量或常量的问题。
就是只能在一个Sub里面使用的Private a as integer 声明一个能在一个窗体中共同使用的变量Public a as integer 声明一个能在所有窗体和模块中使用的变量Private Const a=1 声明一个能在一个窗体中使用的常量并且值为1Public Const a=1 声明一个能在所有窗体和模块中使用的常量并且值为1 ...

vb中怎样声明一个字符串的名称
vb中声明一个字符串变量的名称使用str前缀标注属字符串变量,后接有意义的变量名组成。变量命名约定,出于易读和一致性的目的,请在 VB代码中使用以下变量命名约定:有意义的变量名可以是英语或者汉语拼音等。声明变量,声明变量就是事先将变量通知程序。要用 Dim 语句声明变量,Dim 语句提供了变量名。变...

vb DIM A$,B%?
1、显式定义:Dim 变量名 As 类型 2、隐式定义:使用类型说明符 类型说明符如下:——整型 &——长整型 !——单精度浮点数 ——双精度浮点数 ——货币型 ——字符串型 楼主的情况就属于第二种——隐式定义。DIM A$表示定义一个变量A,类型为字符串型。

VB编写一个程序,统计输入的字符串中小写字母、大写字母、数字及其他符...
If 48 < Asc(Mid(Text1, i, 1)) And Asc(Mid(Text1, i, 1)) < 57 Then c = c + 1 '数字 End If Print d Next i Print "小写字母" & a & "个"Print "大写字母" & b & "个"Print "数字" & c & "个"Print "其它(包括空格)" & s - a - b - c & "个"Print...

用VB怎么把输入的数值相加起来,代码哦
1、首先开始编写代码,定义变量,如下图所示。2、这是一个累加程序,所以会用到相关的累加语句,此题使用For-Next循环语句。具体编写如下图所示。3、不仅仅需要一个For-Next循环语句,还需要在里面嵌套一个For-Next循环语句。4、最后将剩下的代码补齐,编写完整的代码如下图所示。5、然后运行程序,输入...

VB中如何将字符串和数字相加? "A0001" + 1=A0002 ???
Private Function AddStr(str1, str2)AddStr = Left(str1, 1) & Format(Mid(str1, 2, Len(str1) - 1) + Val(str2), "0000")End Function Private Sub Form_Click()a = "A0001"b = 1 MsgBox AddStr(a, b)End Sub 经过验证通过,可直接调用addstr函数实现所需要的功能 ...

VB 怎样将字符串转化为数值
\\x0d\\x0a比如:数值变量=Val(字符串)\\x0d\\x0a例:\\x0d\\x0an = Val("3.5") ' 变量n赋值为3.5\\x0d\\x0a\\x0d\\x0a或者使用取整函数,也可以转换。\\x0d\\x0a比如:数值变量=Int(字符串) 或者 数值变量=CInt(字符串)\\x0d\\x0a例:\\x0d\\x0an = Int("3.5") ' 取...

相似回答