（11）建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编，用文本框输入数据。单击“添加主记录”按钮Command1时，将文本框数据写入文件，单击“显示按钮”Command2时，将文本中所有内容显示在立即窗口。Private Type PerDate Name1 As String Phon As String*11 Address As String*10 PostCd As String*6 End Type定义PerData类型的变量xDataPrivate Sub Form_Click() Open"C:\PhonBook.txt"For Random As 1End SubPrivate 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.Name1,______,xData.Address,xData.PostCd i=i+1 LoopEnd Sub
（11）建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编，用文本框输入数据。单击“添加主记录”按钮Command1时，将文本框数据写入文件，单击“显示按钮”Command2时，将文本中所有内容显示在立即窗口。Private Type PerDate Name1 As String Phon As String*11 Address As String*10 PostCd As String*6 End Type定义PerData类型的变量xDataPrivate Sub Form_Click() Open"C:\PhonBook.txt"For Random As 1End SubPrivate 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.Name1,______,xData.Address,xData.PostCd i=i+1 LoopEnd Sub
相关考题：
在考生文件夹下有“xx”数据库。在“窗体1”窗体中添加标签和名称相同的文本框“请输入学号”和“学生姓名”，添加“显示学生姓名”按钮，编写程序实现输入学号后单击“显示学生姓名”按钮后显示学生姓名。要求用Dlookup()函数实现。窗体设计如图所示。
下列程序段的执行结果为 Private Sub Command1_Click() a=InputBox("请输入a值") c="您要查询的是" IIf(a＞0，"天气"，" ") IIf(a＜0，"电话号码"，" ") IIf(a=0，"邮编"，" ") Text1.Text=c End Sub程序运行后，如果从键盘上输入"16"，则在文本框显示的内容是______。A．您要查询的是天气B．您要查询的是邮编C．您要查询的是电话号码D．False
在考生的文件夹下有一个工程文件execise57.vbp，相应的窗体文件为execise57.frm。在窗体Form1上有两个命令按钮，其名称分别为Cmd1和Cmd2，标题分别为“文件写入”和“文件读出”，如下图所示。其中“文件写入”命令按钮事件过程用来建立一个通讯录，以随机存取方式保存到文件out57.txt中；而“文件读出”命令按钮事件过程用来读出文件out57.txt中的每个记录，并在窗体上显示出来。通讯录中的每个记录由3个字段组成，结构如下：姓名(Name) 电话(Tel) 邮政编码(Pos)Abcd (010)51688765 100065┆ ┆ ┆各字段的类型和长度为：姓名(Name)： 字符串 15电话(Tel)： 字符串 15邮政编码(Pos) 长整型(Long)程序运行后，如果单击“文件写入”命令按钮，则可以随机存取方式打开文件out57.txt，并根据提示向文件中添加记录，每写入一个记录后，都要询问是否再输入新记录，回答“Y” (或“y”)则输入新记录，回答“N” (或“n”)则停止输入；如果单击“文件读出”命令按钮，则可以随机存取方式打开文件out57.txt，读出文件中的全部记录，并在窗体上显示出来。该程序不完整，请把它补充完整。要求：(1)去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。(2)文件out57.txt中已有3个记录，请运行程序，单击“文件写入”命令按钮，向文件out57.txt中添加以下2个记录(全部采用西文方式)，如下图所示。Abcd (010)51688765 100065Efgh (010)51684321 100044(3)运行程序，单击“文件读出”命令按钮，在窗体上显示全部记录。(4)用原来的文件名保存工程文件和窗体文件。
假设在D盘驱动器上已建立了一个通信录文件（Txl.txt），文件中的每个记录包括编号、用户名、电话号码和地址等4项内容。试编写一个程序，实现能按用户名查找，并在文本框中显示查找结果，如下图所示。设“查找”按钮的名称定义为cmdFindname，查找输入名称和结果文本框的名称分别定义为txtName和txtCount，记录条数标签的名称定义为lblCount。
11、要验证文本框中输入的数据是否为合法的邮编，需要使用（）验证控件。A．RequiredFieldValidatorB．RangeValidatorC．CompareValidatorD．RegularExpressionValidator
11、如果要修改幻灯片中文本框内的内容，应该（）A．首先删除文本框，然后重新插入一个文本框；B．选择该文本框中所要修改的内容，然后重新输入文字；C．重新选择带有文本框的版式，然后向文本框内输入文字；D．用新插入的文本框覆盖原文本框
2、以下哪些属于发货地址要填的内容（）A．国家B．地址和邮编C．姓名D．身份证号