首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。 Private T
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。 Private T
admin
2013-04-11
74
问题
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。
Private Type PerData
Name1 As String
Phon As String * 11
Address As String * 10
Posted As String * 6
End Type
___________________________’定义PerData类型的变量xData
Private Sub Form_Load()
Open "C:\phonBook.txt"For Random As 1
End Sub
Private Sub Command1_Click()
xData. Name1=Text1.Text
xData. Phon=Text2.Text
________=Text3.Text ’地址
xData. PostCd=Text4.Text
Put #1, 1, xData
Text1.Text=" ":Text2.Text=""
Text3.Text="":Text4.Text=""
End Sub
Private Sub Command2_Click()
reno=LOF(1)/Len(xData)
i=1
Do While i<= reno
Get #1, i, xData
Debug.Print xData.Name 1,______, xData. Address, xData. PostCd
i=i+1
Loop
End Sub
选项
答案
Dim xData As PerData ,xData.Address ,xData.Phon
解析
声明用户定义类型的变量格式为:Dim变量名as用户定义类型名:定义了记录类型后,给该类型变量赋值时用“变量名.元素-要赋的值”的格式进行赋值。第3个空是引用变量的元素,应使用“变量名.元素”的格式。
转载请注明原文地址:https://kaotiyun.com/show/PsQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()DimArr1(10)AsInteger,arr2(10)AsIntegern=3
程序执行结果s的值是【】。PrivateSubsub1(ByvalpAsInteger)p=p*2EndSubPrivateSubCommand1_Click()DimiAsI
为了选择多个控件,可以按住【】键,然后单击每个控件。
软件结构是软件模块间关系的表示,软件模块之间的关系可以有多种,以下选项中,______不是其最基础的关系。
如果一个工程含有多个窗体及标准漠块,则以下叙述中错误的是______。
在结构化方法中,软件功能分解属于软件开发中的______阶段。
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,标题分别为“操作系统”和“帮助”,名称分别为vbOS和vbHelp,其中“操作系统”菜单包括“Windows’’、“unix”和“AppleMacOS”三个子菜单,名称分别为vbOSl、v
(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.frm。其功能是产生40个0~800的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击名称为Commandl的命令按钮,标题为“输出最小值”,即可求出其最小值,并在T
计算机算法指的是______。
在深度为5的满二叉树中,叶子节点的个数为______。
随机试题
BrightonisapopularseasidetownonthesouthcoastofEngland.Notlongago,somepolicemenwerevery【21】.There【22】severals
A.白秃癣B.肥疮C.鹅掌风D.脚湿气E.圆癣皮损以发于趾缝间的皮下水泡,趾间浸润糜烂,渗流滋水,角化过度,脱屑为特征,夏重冬轻,属于()
在下列方法中,属于精神分析治疗常用的是
孙某因犯抢劫罪被甲县人民法院判处有期徒刑6年,判决生效后被送至乙县监狱服刑。第二年5月6日,孙某越狱脱逃。孙某的同监犯人张某向监狱告发:孙某跟他说过其在丙县强奸一女青年,经查属实。孙某越狱后在丁县抢劫某饭店过程中被捕获归案。本案最后归哪个法院管辖?(
证券自营业务买卖对象除了上市证券外,还包括非上市证券。( )
企业法人的内部单位均不得申请开立基本存款账户。()
简述语言的特征。
求
Hemusthavecomehereyesterdayevening,______he?
A、Heshouldoftendosunbathing.B、Heshouldoftentakehotbaths.C、Heshouldwarmhimselfupbysittingbythestove.D、Hesho
最新回复
(
0
)