niusouti.com

（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 F

题目

（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

相似考题

1.选取号码(PhoneNumPicker)控件可以获取手机通讯录中的联系人信息,这些信息包括联系人的()。A、姓名B、头像C、电子邮件地址D、电话号码

2.下列程序段的执行结果为 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

3.在考生的文件夹下有一个工程文件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)用原来的文件名保存工程文件和窗体文件。

4.在考生文件夹下有“xx”数据库。在“窗体1”窗体中添加标签和名称相同的文本框“请输入学号”和“学生姓名”，添加“显示学生姓名”按钮，编写程序实现输入学号后单击“显示学生姓名”按钮后显示学生姓名。要求用Dlookup()函数实现。窗体设计如图所示。

更多“(11)建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单 ”相关问题

  • 第1题：

    网汇e汇款：客户必须填写“中国邮政储蓄银行网上支付汇款单”，柜员审核后输入收款人姓名、（），客户输入取款密码，其他同按址汇款处理。

    A汇款金额（两遍）

    B汇款人邮编

    C汇款人姓名

    D地址和电话


    A,B,C,D
    略

  • 第2题：

    11、要验证文本框中输入的数据是否为合法的邮编，需要使用（）验证控件。

    A．RequiredFieldValidator

    B．RangeValidator

    C．CompareValidator

    D．RegularExpressionValidator


    RequiredFieldValidator 控件

  • 第3题：

    2、以下哪些属于发货地址要填的内容（）

    A．国家

    B．地址和邮编

    C．姓名

    D．身份证号


    国家;地址和邮编;身份证号

  • 第4题：

    假设在D盘驱动器上已建立了一个通信录文件（Txl.txt），文件中的每个记录包括编号、用户名、电话号码和地址等4项内容。试编写一个程序，实现能按用户名查找，并在文本框中显示查找结果，如下图所示。设“查找”按钮的名称定义为cmdFindname，查找输入名称和结果文本框的名称分别定义为txtName和txtCount，记录条数标签的名称定义为lblCount。

    略

  • 第5题：

    11、如果要修改幻灯片中文本框内的内容，应该（）

    A．首先删除文本框，然后重新插入一个文本框；

    B．选择该文本框中所要修改的内容，然后重新输入文字；

    C．重新选择带有文本框的版式，然后向文本框内输入文字；

    D．用新插入的文本框覆盖原文本框


    B

相关内容