急求VB答案。。谢谢！！

2010-04-21 10:00:48 174 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【网络课】VB.NET程序设计作业答案选择题： ACDBC DAADD BDCDD CDCCB ABDCB DBAAC BACAB CCBCD DAAAA ADAAA DCCCA BBCAA ADDBB DDCDA BCAAB BCAAB DCDDC AAADD CDDCC ABBBA 填空题第02章 1、使对象获得焦点的属性是_SetFocus_ 阅读详情

单击窗体，实现下述功能：
利用随机函数Rnd产生n个随机两位数（整数），显示在窗体上（一行），然后再第二行输出这10个数中的最大值和平均值。（利用InputBox函数输入n）

...全文

vb.net面试_VB.Net面试问答 vb.net面试Here are 45+ frequently asked VB.Net interview questions and answers which will definitely help you out to crack one of the toughest interviews. 这里有45多个VB.Net面试常见问题和答案，这些绝对可以帮助您破解最艰难的面试之一。 1... 阅读详情

xie0307

控件 1,453 成员 41,351 内容

+ 关注 + 加入社区

切换为时间正序

dl20070302 2010-04-29

打赏
举报

先看书.看了语法后就找例子做.

xie0307 2010-04-27

打赏
举报

能告诉我VB该怎样学吗？我的确是菜鸟，什么都不懂，但我想把它学好。

myy168 2010-04-27

打赏
举报

并不太难啊。。。

chinaboyzyq 2010-04-25

打赏
举报



Private Sub Command1_Click()

   Dim n As Integer, i As Integer

   Dim tmp1 As Integer, tmp2 As Integer

   Dim maxNum As Integer, avgNum As Single

   n = Val(InputBox("请输入个数"))

   For i = 1 To n

       tmp1 = Int(Rnd * 100) + 10

       Print tmp1;

       If maxNum < tmp1 Then maxNum = tmp1

       tmp2 = tmp2 + tmp1

   Next

   avgNum = tmp2 / n

   Print: Print maxNum; avgNum

   

End Sub

threenewbee 2010-04-24

打赏
举报

Private Sub Command1_Click()

    Dim n  As Long

    Dim na() As Long

    Dim max As Long

    Dim avg As Double

    n = InputBox("please input n")

    If n = 0 Then Exit Sub

    ReDim na(1 To n)

    Randomize

    For i = 1 To n

        na(i) = Int(Rnd * 90) + 10

        If na(i) > max Then max = na(i)

        avg = avg + na(i)

    Next

    avg = avg / n

    For i = 1 To n

        Print na(i);

    Next

    MsgBox "max is " & max & vbCrLf & "avg is " & avg

End Sub

熊孩子开学喽 2010-04-22

打赏
举报

挺简单的,建议楼主自己解决吧,遇到不会的语句再问也不迟

xie0307 2010-04-22

打赏
举报

我才学习VB，什么都不懂，编程有点困难。。。帮帮我吧。。。

i1u0i1u0 2010-04-22

打赏
举报

楼主要加强学习啊，这样简单的问题还是自己解决好

无·法 2010-04-22

打赏
举报

作业？

chinaboyzyq 2010-04-22

打赏
举报

产生随机数装入数组，然后去做你想要的。

threenewbee 2010-04-22

打赏
举报

挺简单的,建议楼主自己解决吧
LZ自己已经把思路说完了。

急求VB答案。。谢谢！！

相关推荐