下列程序段的功能为:单击窗体后,在D盘Temp目录下address.txt 文件中输入“张三,20,Male”。请填空。Private Sub form_ click()Dim name As StringDim age As IntegerDim sex As Stringname = "张三": age = 20: sex = "Male"Open "D:\temp\CodE.txt" For Append As 1______1, name, age, sex______End Sub

题目

下列程序段的功能为:单击窗体后,在D盘Temp目录下address.txt 文件中输入“张三,20,Male”。请填空。

Private Sub form_ click()

Dim name As String

Dim age As Integer

Dim sex As String

name = "张三": age = 20: sex = "Male"

Open "D:\temp\CodE.txt" For Append As 1

______1, name, age, sex

______

End Sub


相似考题
更多“下列程序段的功能为:单击窗体后,在D盘Temp目录下address.txt 文件中输入“张三,20,Male”。请填空。P ”相关问题
  • 第1题:

    在考生文件夹下有“xx”数据库。

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


    正确答案:

  • 第2题:

    在窗体上画一个文本框,名称为Textl,然后编写如下程序:

    Private Sub Form_Load()

    Open”d:\temp\dat.txt”For Output As1

    Textl.Text=“”

    End Sub

    Private Sub Textl KeyPress(KeyAscii As Integer)

    IfKeyAscii=13 Then

    If UCase(Textl.Text)=【 】Then

    Close1

    End

    Else

    Write1,【 】

    Textl.Text=…

    End If

    End If

    End SUb

    以上程序的功能是:在D盘temp文件夹下建立一个名为dat.txt的文件,在文本框中输入字符,每次按回车键都把当前文本框中的内容写入文件dat.txt,并清除文本框中的内容;如果输入“END”,则不写入文件,直接结束程序。请填空。


    正确答案:“END”Text1.Text
    “END”,Text1.Text 解析:当输入值为“END”的时候,退出程序。当输入值不为“END”的时候,将Text1.Text中的内容写入磁盘保存。

  • 第3题:

    完成附件中后两个截图所示的程序。要求: 1.主程序启动后,姓名栏中输入姓名如:“张三”,单击“进入子页面”按钮后,在子页面的上部显示在主程序中输入的姓名。 2.单击“返回” 按钮。返回主程序。 3.提交程序运行视频及App文件夹。


    以附件的形式提交两个源程序(.c或者.cpp文件)

  • 第4题:

    在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click( ) x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为

    A.123

    B.456

    C.579

    D.123456


    正确答案:D
    解析:程序运行后,在文本框里输入的是“456”即Text1.Text的值是“456”,在输入对话框里输入“123”,则x的值为“123”,最后的x+Text1.Text即为“123”和“456”两个字符串的连接,故最后的显示结果为“12346”。

  • 第5题:

    下面一段程序的功能是,单击窗体弹出对话框。在对话框中输入一个文件名,窗体中输出该文件名的文件号。请填空。

    Private Sub Form_ click()

    filename = InputSox (“请输入文件名”)

    Filecode =

    Open filename For Output As Filecode

    Print filename; “的文件号是”; Filecode

    Close Filecode

    End Sub


    正确答案:FreeFile
    FreeFile