隔几秒出一个字隔几秒在出现下一个字,就象一个一个打出来的那样。谢谢!

解决方案 »

  1.   

    用timer控件吧。我想这是最简单的。再ontimer时间中加上
    if i<=len(SourceString)then   Label1.Caption=Left(SourceString,i)'i是一个外部变量,i<=len(SourceString)
       i=i+1                              '计数器加一end If
      

  2.   

    你可以用Timer 来设置它的间隔,然后在这里用lable.catption=lable.caption+str
      

  3.   

    Private Sub Timer1_Timer()End Sub
    设置它的时间间隔,
    用这个事件,lable.catption=lable.caption+str
      

  4.   

    请问str是什么,字是直接添在caption里还是填在str里?为什么不好使呢
      

  5.   

    Timer的时间间隔是以毫秒(ms)计算的。3毫秒的间隔你什么也看不出来。至少也设个1000什么的
      

  6.   

    Private Sub Timer1_Timer()
    Dim i As String
    str = 12
    lable1.Caption = lable1.Caption + str
    End Sub
    间隔设为3000,caption为空
    程序无效,请问是为什么
      

  7.   

    Private Sub Timer1_Timer()
    Dim i As String
        i = "hello"
        Label1.Caption = Label1.Caption & i
    End Sub
      

  8.   

    Str 函數
          傳回代表一數字的 Variant (String)。語法Str(number)number 引數為一 Long,所含為任何正確的數值運算式。請注意當一數字轉成字串,會保留一空位在前頭來表正負。如果 number 為正,其傳回的字串前頭會有一加號。使用 Format 函數可將數值轉成您要的格式,如日期、時間、貨幣、使用者自訂格式...等。與 Str 不同的是,Format 函數不會在前面預留正負號的位置。附註   Str 函數只視句點 (.) 為正確的小數點。如果有使用到不同的小數點 (例如,國際性的應用程式),可使用 CStr 將數字轉成字串。
      

  9.   

    除了楼上说的要用string类型给caption赋值外,你的Timer.enabled要为Ture
    另外,楼上的兄弟,如果他的str以赋值,编译器会将它作为一个变量处理呢还是认为它仍是函数,因为在我见过的代码中,str是可以被声明成变量的。如果编译器认为str是变量,那么他的程序似乎也可以用(如果不报错的话),因为caption本身是string类型,在赋值时,应该将所赋的内容隐式的转换为字符型。请赐教