搜索
首页 教育/科学 理工学科 数学

随即生成十个三位数,由大到小排列

编写一vb程序随即生成十个三位数,由大到小排列

全部回答

2010-08-11

0 0
    Private Sub Command1_Click() Dim iIndex As Byte Dim Rs As Object Set Rs = CreateObject("Adodb。
  Recordset") elds。  append "A", 200, 8 Rs。
    open For iIndex = 1 To 10 dnew elds("A") = 100 + Int(Rnd * 900) Next rt = "A DESC" MsgBox tstring End Sub。

类似问题换一批

热点推荐

热度TOP

相关推荐
加载中...

热点搜索 换一换

教育/科学
数学
院校信息
升学入学
理工学科
出国/留学
职业教育
人文学科
外语学习
学习帮助
K12
理工学科
数学
农业科学
生物学
建筑学
心理学
天文学
工程技术科学
化学
环境学
地球科学
生态学
物理学
数学
数学
举报
举报原因(必选):
取消确定举报