首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。 Private T
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。 Private T
admin
2013-04-11
31
问题
建立一个通讯录的随机文件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://jikaoti.com/ti/BZ60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了暂时关闭计时器,应把计时器的某个属性设置为False,这个属性是______。
程序执行结果s的值是【】。PrivateSubsub1(ByvalpAsInteger)p=p*2EndSubPrivateSubCommand1_Click()DimiAsI
下列程序段的执行结果为n=0Fori=1To3Forj=5To1Step-1n=n+1Nextj,iPrintn;j;i
Sub过程与Function过程最根本的区别是
在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计一个子菜单项“增加菜单”(Name属性值为mnuAdD)另外设置一个标题为空的菜单项(控件数组),其Name属性值为mnuDyn,Index值为0,Visi
以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut但该语句的一个重要错误是没有______。
如果一个工程含有多个窗体及标准漠块,则以下叙述中错误的是______。
已知二叉树后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()x=Int(Val(
数据库的物理设计是为一个给定的逻辑结构选取一个适合应用环境的______的过程,包括确定数据库在物理设备上的存储结构和存取方法。
随机试题
关于静脉血栓栓塞症的继发性危险因素有
ζ1,ζ2都服从[0,1]上的均匀分布。则E(ζ1+ζ2)等于()。
我国缺水地区严格限制建设以()为主的产业。
业主对专有部分的所有权,即业主对建筑物内的住宅、经营性用房等专有部分享有所有权,有权对专有部分()。
受农村文化礼堂建设的启示,某县政府和企业把“文化车间”建设提上议事日程并积极推动企业文化建设。政府和企业这样做的理由是()。①“文化车间”建设能够丰富职工的精神世界②“文化车间”建设会直接影响企业的经济效益③人们的精神产品源自物质载体④文化
场独立性认知风格的学生一般喜欢听别人讨论,上课喜欢听老师讲。
某建筑工地负责人张某在前往工地检查时,未注意到升降梯下方有人即启动升降梯,造成正在维护升降梯的工人当场死亡。对于张某的行为,下列说法错误的是()
Whenyougotobed,isitbecauseyou’retiredorbecauseyouneedtogetupatacertaintimeandwanttomakesureyougeteno
Signsbarringcell-phoneuseareafamiliarsighttoanyonewhohaseversatinahospitalwaitingroom.Butthe【C1】______popula
A、Designingrobotsthatcanusetools.B、Designingrobotsthatcanholdthings.C、Designingrobothandsthatcanfeel.D、Designi
最新回复
(
0
)