| 查看: 8529 | 回复: 145 | |||
| 本帖产生 1 个 程序强帖 ，点击这里进行查看 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
【交流】VC++, C#, VB答疑专贴 已有69人参与
|
|||
[ Last edited by 波不动 on 2010-1-8 at 19:44 ] |
回复此楼» 本帖已获得的红花（最新10朵）
飞虎» 猜你喜欢
药学硕士，第一、第二作者已发表6 篇 SCI，药理方向及相关方向2026年/2027年博士申请
已经有4人回复
-
26年博士申请自荐-电催化
已经有3人回复
-
中国地质大学（北京）博士招生补录，数理学院材料科学与工程专业和材料与化工专业
已经有6人回复
-
收到国自然专家邀请后几年才会有本子送过来评
已经有4人回复
-
考博
已经有5人回复
-
26年申博自荐-计算机视觉
已经有4人回复
-
药化及相关博士的申请
已经有3人回复
-
一篇MDPI论文改变了学习工作和生活
已经有4人回复
libralibra
至尊木虫 (著名写手)
骠骑将军
- 程序强帖: 40
- 应助: 817 (博后)
- 金币: 12914.1
- 红花: 64
- 帖子: 2238
- 在线: 287.3小时
- 虫号: 696514
- 注册: 2009-02-05
- 专业: 计算机软件
★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+3): 谢谢参与应助！ 2011-01-21 13:34:53
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+3): 谢谢参与应助！ 2011-01-21 13:34:53
|
冒泡好基础,好好看 Private Sub form_click() Dim num(1 To 4) As Integer num(1) = InputBox("a"  num(2) = InputBox("b" num(3) = InputBox("c" num(4) = InputBox("d" For i = 1 To 4 For j = i + 1 To 4 If num(i) > num(j) Then temp = num(i) num(i) = num(j) num(j) = temp End If Next j Next i Form1.Cls For i = 1 To 4 Print num(i), Next i End Sub |
81楼2011-01-20 01:43:02
3楼2009-11-20 15:21:38
4楼2009-11-20 15:26:06
senlia
木虫 (小有名气)
- 应助: 2 (幼儿园)
- 贵宾: 3.521
- 金币: 2178.1
- 红花: 1
- 帖子: 223
- 在线: 6.7小时
- 虫号: 849005
- 注册: 2009-09-16
- 性别: GG
- 专业: 计算数学与科学工程计算
5楼2009-11-22 19:48:23