精品偷拍一区二区三区,亚洲精品永久 码,亚洲综合日韩精品欧美国产,亚洲国产日韩a在线亚洲

  • <center id="usuqs"></center>
  • 
    
  • 如何在VB6.0中生成10個20到50的隨機(jī)數(shù)(保留兩位小數(shù))

    如何在VB6.0中生成10個20到50的隨機(jī)數(shù)(保留兩位小數(shù))
    數(shù)學(xué)人氣:196 ℃時間:2020-06-15 07:15:57
    優(yōu)質(zhì)解答
    Private Sub Command1_Click()
    Dim a(10) As Single
    For i = 1 To 10
    a(i) = Rnd * 31 + 10
    Print Format(a(i),"0.00")
    Next
    End Sub怎么生成在文本框里呢?所有數(shù)字都生成在文本框?嗯,生成的隨機(jī)數(shù)都要在文本框。Private Sub Command1_Click() Dim a(10) As Single dim temp as string temp="" For i = 1 To 10 a(i) = Rnd * 31 + 10 temp=temp & " " & Format(a(i), "0.00") Next Text1.Text=temp End Sub
    我來回答
    類似推薦
    請使用1024x768 IE6.0或更高版本瀏覽器瀏覽本站點,以保證最佳閱讀效果。本頁提供作業(yè)小助手,一起搜作業(yè)以及作業(yè)好幫手最新版!
    版權(quán)所有 CopyRight © 2012-2024 作業(yè)小助手 All Rights Reserved. 手機(jī)版