17页a07中有 n=val(hscroll1.value) label2.caption=n 22页b10中有 label2.caption=vscroll1.value,此处为什么不加val?还是说加不加都可以？因为我试了一下好像没什么差别，这是为什么？？？a07的代码是不是有点啰嗦……

哪位朋友有ＶＢ的复习题，提供一下，谢谢

在使用Rnd函数时，如果没有执行过Randomize命令， 则产生的随机数总下面的序列： .7055475 .533424 .5795186 .2895625 .301948 ...... 为了能产生真正意义上的随机数，就需要在使用Rnd之前，执行一次Randomize命令。因为Form_Load过程是在窗体装入是就执行的过程，所以Randomize常常写在这个过程里。 Randomize称为随机种子命令，它实际上是用计算机内部时钟的毫秒数当种子，因为各台电脑里时钟毫秒数相同的可能性很小，并且每台电脑的时钟都是在不停的

Timer1.Enabled = Not Enabled 不管用啊

不要把VB想得很难，VB其实就是一个人机对话的过程。你所要输入的代码只是告诉计算机当发生这个事件的时候他需要做什么，不要去生背代码，要自己去写

电脑可以显示16777216种不同的颜色。 这些颜色是有由红、绿、蓝三种颜色组成的。 颜色函数RGB()需要三个参数， 第一个参数表示红色的量（0～255之间）， 第二个参数表示绿色的量（0～255之间）， 第三个参数表示蓝色的量（0～255之间）。 所以其完整格式为：RGB(r,g,b) 要产生随机颜色，就要让三个参数在0～255之间变化， 以改变Form的背景色为例： r=Fix(Rnd*256) g=Fix(Rnd*256) b=Fix(Rnd*256) Form1.BackColor＝RGB(r,g,b) 每一种颜色的量用计算机

关于成绩评定大家说法不一，请问下老师拉~~~~~~~~~~

来灌会儿水~~嘿嘿~~ 我最后都没时间了~~ 哎~~~悲~ 啊啊啊~~ 请问一下老师~ 那个30分是怎么算的阿~ 总成绩只分及和不及么？ 还是有优？

B11题.它分别在change和scroll下写了相同的代码,但是如果只是在其中任何一个里面编写代码,运行效果差不多.请问老师,为什么或者说一定要在这2个下面都编写代码么?这2个分别有什么意义.

每行输入的指令前,是都要摁TAB键么.一些在窗口旁就设的属性,比如说CAPTION什么的,还用在FORM_LOAD中打出来它们的CAPTION什么的么?

我最后那道题是鼠标点击画正弦函数图象,但是它的例子里那个图象是一点点出来的,我想应该用到TIMER,但是怎么都编不出来~

For i = 1 To 1000 If i / 3 = i \ 3 Then a = a + 1 If i / 7 = i \ 7 Then b = b + 1 Next i 为什么没有用 End If 啊?

设计一个计算等差数列前N项和的程序，等差数列的首项为100，公差为1， 最大项的值为1000；N的取值通过滚动条来确定。

form1.scalewidth(scaleheight)

b13中没有给出……

同上

rnd 是（0，1）间的随机数还是[0，1]间的？ 若是[0，1]间的，是否应该选D？ 无比感谢答者~

如题

读不太懂——返回鼠标当前位置？ 老师给讲下，无比感谢ING~

fix(rnd*451)+50是什么原理啊？

d07中 if a<b then t=a:a=b:b=t 能否写成 if a<b then label1.caption=b label2.caption=a else label1.caption=a label2.caption=b 谢谢老师

40.发现_______现象，表明计算机可能感染病毒。A B C (A) 文件莫名其妙丢失(B) 运行速度比平时慢 (C) 系统异常死机次数增加 (D) 文件日期发生变化 为什么D不对

vb部分选择题 5．在VB系统中，一个对象内部的函数或过程，称为该对象的 。 A．代码 B．属性 C．方法 D．事件 给的答案是B 但考试系统却说答案是C，而且书上没找到 哪个是对得啊？

请问form的scalewidth和scaleheight与width和heiget在应用上有什么区别 因为我分别试用这两种 编出来的效果差别很小 那什么时候该用什么呢

在VB系统中，一个对象内部的函数或过程，称为该对象的_______。 (A) 代码 (B) 属性 (C) 方法 (D) 事件 复习资料上答案是属性,而考通的答案是方法

比如使图片随机出现使用Rnd*scalewidth而不用width 多谢解答者！

C11,我点了很多次,但是不记数,哪里出了问题? Private Sub Command1_Click() n = n + 1 Label2.Caption = Str$(n) End Sub Private Sub Form_Load() Randomize x = Fix(Rnd * (Form1.ScaleWidth - Command1.Width)) y = Fix(Rnd * (Form1.ScaleHeight - Command1.Height)) Command1.Move x, y End Sub Private Sub Timer1_Timer() x = Fix(Rnd * (Form1.ScaleWidth - Command1.Width)) y = Fix(Rnd * (Form1.ScaleHeight - Command1.Height)) Command1.Move x, y End Sub

一只小鸟从窗体的左边向右移动。当小鸟的位置到达窗体右边时，小鸟停止移 动；单击“重新开始”按钮，小鸟直接回到初始位置然后再向右移动。

同题

Private Sub Form_Load() Randomize Form1.DrawWidth = 5 End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) n = n + 1 Label1.Caption = n r = Fix(Rnd * 255) g = Fix(Rnd * 255) b = Fix(Rnd * 255) PSet (X, Y), RGB(r, g, b) End Sub 为什么label里面只显示1，而没有后面画的点数

要不要打“if k = vbno then 打什么？？？？？？？

随便用哪个都行吗？

这些代码写在form_load里和改在属性栏里有区别吗？ 写这些代码太麻烦了，若无区别皆不必写了吧？

老师辛苦了！！！

还有 密码的那道题。 怎么才能if else then end啊…… 出了口令外，输入其它的就自动退出…… 还有from1的backcolor怎么射程随机的啊？

“您点中0次”干吗使？？？？？？？？？？？

为什么要在属性中写vscroll1。value=22？？？？？？？？