华南俳烁实业有限公司

考試首頁 | 考試用書 | 培訓課程 | 模擬考場 | 考試論壇  
全國  |             |          |          |          |          |         
  當前位置:計算機等級 > 二級考試 > Visual Basic > VB模擬試題 > 文章內(nèi)容
  

全國計算機等級考試二級VB程序設(shè)計模擬試題二【程序題】

中華IT學院   【 】  [ 2016年7月21日 ]
寫出下列程序的正確運行結(jié)果(每題5分,共10分)

  1. Private Sub Command1_Click( )

  x=Int(Rnd)+3

  If x^2>8 Then y=x^2+1

  If x^2=9 Then y=x^2-2

  If x^2<8 Then y=x^3

  Print “y=”;y

  End Sub

  2. Public Sub Swap(ByVal x As Integer, 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=30: b=20

  Swap a ,b

  Print “a=”; a ;”b=”; b

  End Sub

1. y=  7

2. a=  30  b=30

 

分享到:
本文糾錯】【告訴好友】【打印此文】【返回頂部
將考試網(wǎng)添加到收藏夾 | 每次上網(wǎng)自動訪問考試網(wǎng) | 復(fù)制本頁地址,傳給QQ/MSN上的好友 | 申請鏈接 | 意見留言 TOP
關(guān)于本站  網(wǎng)站聲明  廣告服務(wù)  聯(lián)系方式  站內(nèi)導航  考試論壇
Copyright © 2006-2017 中華考試網(wǎng)(Examw.com) All Rights Reserved  營業(yè)執(zhí)照
肇源县| 维西| 湄潭县| 泊头市| 尚志市| 敖汉旗| 噶尔县| 长武县| 宜君县| 饶河县| 伊金霍洛旗| 弥渡县| 东阳市| 穆棱市| 四会市| 南漳县| 西宁市| 库车县| 平陆县| 丰县| 当涂县| 蒙阴县| 临洮县| 安塞县| 安顺市| 荆门市| 河津市| 吉安县| 思南县| 广河县| 彭州市| 中江县| 雷州市| 义马市| 台湾省| 和政县| 岑巩县| 宜阳县| 赤壁市| 义马市| 淮阳县|