(vb大一程序设计第八章习题答案1.docVIP

  1. 1、本文档共14页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
(vb大一程序设计第八章习题答案1

第八章 1.Sub过程与Function过程的主要区别是 B A.Sub过程可以通过Call语句调用,而Function过程不可以 B.Sub过程不能通过过程名返回值,而Function过程可以 C.Sub过程与Function过程的参数传递方式不一样 D.Function过程只能返回1个值,而Sub过程可以返回多个值 2.以下叙述中错误的是 C. 。 A.在Sub过程中可以调用Function过程 B.可以在程序的任何地方调用以Public声明的过程 C.在Sub过程中可以嵌套定义Function过程 D.用Static声明的过程中的局部变量都是Stati变量 3.以下关于函数过程的叙述中,正确的是A 。 A.函数过程虚参的类型与函数返回值的类型没有关系 B.在函数过程中,过程的返回值可以有多个 C.Sub过程中定义1个Function过程,但不能定义Sub过程 (D)Sub过程Function过程返回值 7.以下语句用来定义过程subP,其中正确的是 D 。 A.Dim Sub subP(x , y) B.Public subP(x , y) C.Private Sub subP(x , y) As Integer D.Sub subP(x , y) 8.在窗体上放置2个标签和一个命令按钮,其名称分别为Label1. 、Label2、command1 Private Sub Command1_Click() a = Val(Label2.Caption) Call func(Label1, a) Label2.Caption = a End Sub Private Sub Form_Load() Label1.Caption = ABCDE Label2.Caption = 10 End Sub Private Sub func(L As Label, ByVal X As Integer) L.Caption = 1234 a = a * a End Sub 程序运行后,单击命令按钮在2个标签中显示的内容分别是 1234 10 9. Option Base 1 Sub subp(b() As Integer) For i = 1 To 3 b(i) = 3 * i Next i End Sub Private Sub Command1_Click() Dim a(3) As Integer arr = Array(8, 4, 3) For i = 1 To 3 a(i) = arr(i) Next i subp a() For i = 1 To 3 Print a(i) Next i End Sub 运行程序后,在窗体上输出的内容为(A)? A)3 ?6? 9 ??B)8?4?3?? C)9?6?3? ?D)3?4?8 10. Function func(a As Integer, b As Integer) As Integer Static x As Integer, y As Integer x = 0: y = 2 y = y + x + 1: x = y + a + b func = x End Function Private Sub Command1_Click() Static k As Integer, m As Integer Dim p As Integer k = 5: m = 2 p = func(k, m) Print p p = func(k, m) Print p End Sub输出结果是 10 10 11. Sub s1(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t = x: x = y: y = t End Sub Private Sub Command1_Click() Dim a As Integer, b As Integer a = 10: b = 30 s1 a, b Print a=; a; b=; b End Sub 运行程序后,在窗体上输出的内容为(C) ?A)a?=?30?b?=?10??? ?B)a?=?30?b?=?30 ?C)a?=?10?b?=?30???? D)a?=?10??b?=?10 12. Sub s(x As Single, y As Single) t = x: x = t / y: y = t Mod y End Sub Private Sub Command1_Click() Dim a As Single, b As Single a = 5:

文档评论(0)

popo786 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档