d=cint(str(a)&str(b)&str(c))
最好在合并前判断a,b,c是否为数字。

解决方案 »

  1.   

    str(A)&str(B)&str(C)
    数字a*100+b*10+c
      

  2.   

    你所说的肯定是数字就可以m=a*100+b*10+c
      

  3.   

    “&”能自动进行类型转换啊
    2 & 3 & 4
    不过要注意空格。
      

  4.   

    顺便说一句(回答20分的问题的习惯):
    If 你不知道怎样给分 Then 去看:http://www.csdn.net/expert/faq.shtm
      

  5.   

    我所说的a,b,c是三个不固定的变量!
      

  6.   

    a & b & c
    这样就可以了
      

  7.   

    用一个看不到的TEXT控件,
    text1 =""
    text1= text1 & a
    text1= text1 & b
    text1= text1 & c
    对不起这个东东我没有经过测试(我现在的机器上没有VB),不对就笑笑算了!
      

  8.   

    '经过测试输出结果为正确的如下
    Private Sub Command2_Click()
    Dim a As Integer
    Dim b As Integer
    Dim c As Integer
        a = 2
        b = 3
        c = 4
        Text1.Text = ""
        Text1.Text = Text1.Text & a
        Text1.Text = Text1.Text & b
        Text1.Text = Text1.Text & c '234
        Print Text1.Text '234
        Print Trim(Str(a)) & Trim(Str(b)) & Trim(Str(c)) '234
        Print Trim(Str(a * 100 + b * 10 + c)) '234
        Print a & b & c ' 234
    End Sub
      

  9.   

    建议用 cy_nwau(阿东) 的简单
      

  10.   

    val(a & b & c)
      

  11.   

    trim(str(a))+trim(str(b))+trim(Str(c))