题目

以下是某个窗体的模块代码,请分析单击窗体后程序运行至"*"号位置时变量X、Y和Z的值分别是【 】。

DIM X AS INTEGER

DIM Y AS INTEGER

PRIVATE SUB FORM_CLICK()

DIM X AS INTEGER

X=1

Y=1

CALL AA(Y+1)

Z=BB(X)

'* * * * * * *

MSGBOX "X="&X&"/Y="&Y&"/Z="&Z

END SUB

PRIVATE SUB AA(BYVAL Z AS INTEGER)

Y=Z+X

Z=X+Y

END SUB

PRIVATE FUNCTION BB(BYREF Y AS INTEGER

Y=Y+1

BB=X+Y

END FUNCTION

答案
查看答案
相关试题

【】与列表框类似,其主要区别是它同时具有文本框及一个下拉列表。它的一个优点是,它只需要在窗体上保留【】的一个值所占的空间。

当用户通过电话线路方式连接到ISP时,那么,在用户端和ISP端均需要通过一个称之为【】的设备与电话线路相连。

阅读下列说明,根据网页显示的效果图,回答问题1至问题7。

【说明】以下是用ASP实现了一个网络收藏夹网页,用于保存用户感兴趣的Web网页地址。用IE打开网页文件“index.asp”后的效果如图5-1所示。程序中使用的Access数据表结构如表5-1所示。

【index.asp文档的内容】

<%@LANGUAGE="VBSCRIPT" %>

<%

set conn=server. (5) ("Adodb.Connection")

provider = "Provider=Microsoft.Jet.OLEDB.4.0;"

path="Data Source=" & Server.MapPath("main.mdb"

connstr= provider & path

corm.open connstr

%>

<html>

<head><title>网络收藏夹</title></head>

(6)

<center>

<%

set rs=Server.CreateObject("Adodb.RecordSet")

sql="select * from address"

rs.open() sql,corm, 1,3

if Request("name") = "" or Request("url")="" then

Response.write ("内容填写不完整")

else

rs.addnew

rs(1) =request ("name")

rs(2) =request ("URL")

rs(3) =request ("category")

rs.update

end If

%>

<table bordercolor="FFCC00">

<tr><td>序号</td><td>名称</td><td>类别</td></tr>

<% rs.movefirst

for j=1 to rs. (7) %>

<tr>

<td><%=j%></td>

<td><a href="<%=rs("url")%>" target=" blank"><%=

rs("name")%></a></td>

<td><%=rs("category")%></td>

</tr>

<% rs.movenext

(8) %>

</table><br>

<form. action="index.asp" method="post" >

<table

bordercolor="FFCC00">

<tr>

<rd >名称</td>

<td ><input type="text"

></rd>

</tr>

<tr>

<td>超连接</td>

<rd ><input type="text" ></td>

</tr>

<tr>

<td colspan="2">类别</td>

</tr>

<tr>

<td colspan="2"><textarea rows="5" >

</textarea>

<br>*为必填项目</rd>

</tr>

</table>

<br>

(9)

</form>

<%

rs.close

conn.close

%>

</center>

</body>

</html>

ASP是(1)网页制作技术。

A.动态 B.静态

阅读以下说明,回答问题1至问题4。

【说明】

某办公室只有一台主机host1接入Internet,其TCP/IP协议属性如图1-1所示。

在没有增加公网IP地址的情况下,增加几台主机共享网络连接接入Internet,拓扑结构如图1-2所示,host1 eth0网卡的Internet协议属性如图1-3所示。

为了保证其他主机能接入Internet,在如图1-4所示的host1 eth1网卡“Internet连接共享”应如何选择?

命令?LEN("中国")<LEN("China")的结果为【】。

最新解答的试题
付款人在进行付款时无()

A.形式审查义务

B.实质审查义务

C.附带审查义务

D.票据外有关事项的审查义务
根据《公司法》的规定,有限责任公司下列人员中,可以提议召开股东会临时会议的是()。
A.总经理B.人数过半数的股东C.监事会主席D.人数为半数的董事
关于股份有限公司中的监事会,下列说法错误的是()

A.监事会负责提议聘请或更换外部审计机构B.监事会主席和副主席由全体监事过半数选举产生C.监事会中的职工代表的比例不得低于三分之一D.监事会应至少每6个月召开一次会议
三北精神的科学内涵
阿里巴巴提供了“企业名称认证”“企业身份认证”不同种类的认证,可以根据自身的