更多"假定在工程文件中有一个标准模块,其中定义了如下记录类型: Type "的相关试题:
[填空题]假定在工程文件中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String * 10
TelNum As String * 20
End Type
要求在执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。将经下程序补充完整。
Private Sub Command1_Clickk( )
Dim B As Books
open "c: /person. txt" For output As #1
B. Name = InputBox ("请输入姓名t" )
B. TelNum = InputBox("请输入电话号码" )
write #1, 【15】
close #1
End Sub
[填空题]假定在工程文件中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10
TelNum As String*20
End Type
要求在执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。将以下程序补充完整。
Private Sub Command1_Click( )
Dim B As Books
open "c:/person.txt"For output As#1
B.Name=InputBox(“请输入姓名”)
B.TeINum=InputBoxt“请输入电话号码“)
write#1, (13)
close#1
End Sub
[单项选择]假定在工程文件中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String*10
TelNum As String *20
End Type
要求在执行事件过程Command1_Click时,在C盘目录下的顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
A) Private Sub Command1_Click( )
Dint B As Books
Open"c: /Person.txt" For Output As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Write#1 ,B.Name,B.TelNum
Close#1
End Sub
B) Private Sub Command1_Click( )
Dim B As Books
Open"C:/Person.txt" For Input As#1
B.Name=InputBox("输入姓名")
B.TelNum=InputBox("输入电话号码")
Print#1,B.Name,B.TelNum
Close#1
End Sub
C) Private Sub Command1_Click( )
Dim B As Books
Open"c:/Person.txt" For Output As#1
Name=InputBox("输入姓名")
TelNom=InputBox("输入电话号码")
Write #1,B
Close#1
End Sub
D) Private Sub Command1_Click( )
Dim B As Book
O
A. A
B. B
C. C
D. D
[单项选择]设在工程文件中有一个标准模块,其中定义了下列记录类型:
Type Books
Name As String*10
TelNum As String*20
End Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1 Click时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是( )
A. Private Sub Command1_Click()
B. Private Sub Command1_Click()
C. Private Sub Command1_Click()
D. Private Sub Command1_Click()
[单项选择]设在工程文件中有—个标准模块,其中定义了如下记录类型:
Type Books
Name As String *10
TelNum As String*20
End Type
在窗体上画—个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Petson.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是 ______。
A) Private Sub Command1_ Click( )
Dim B As Books
Open "Person.txt" For Output As #1
B. Name=InputBox(“输入姓名”)
B. TelNum=InputBox(“输入电话号码”)
Write #1, B. Name, B. TelNum
Close #1
End Sub
B) Private Sub Command1_ Click( )
Dim B As Books
Open "Person.txt" For Input As #1
B. Name=InputBox(“输入姓名”)
B.TelNum=InputBox(“输入电话号码”).
Print #1, B. Name, B.TelNum
Close #1
End Sub
C) Private Sub Command1_Click( )
Dim B As Books
Open "Person.txt" For Output As #1
B.Name= InputBox(“输入姓名”)
B.TelNum=InputBox(“输入电话号码”)
Write #1,B
Close #1
End Sub
D) Private Sub Command1_ Click( )
Open "Person. txt" For Input As #1
Name=InputBox(“输入姓名”)
TelNum=InputBox(“输入电话号码”)
Print #1, Nam
[单项选择]设在工程中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String* 10
TelNum As String * 20
End Type
在窗体上画一个名为 Command1的命令按钮,要求当执行事件过程Command1 Click时,
在顺序文件Person.txt中写入一条记录。 下列能够完成该操作的事件过程是 ______。
A. Private Sub Command1_Click( )
B. Private Sub Command1_Click( )
C. Private Sub Command1_Click( )
D. Private Sub Command1_Click( )
[填空题]设在工程中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String*10
telNum As String*20
End Type
在窗体上添加一个名为Command1的命名按钮,要求当执行事件过程Command1_Click时,在顺序文件 Person.txt中写入一条记录。请在 【14】 中填入适当的内容,将程序被补充完整。
Private Sub Command1_Click( )
Dim B As 【14】
Open"c:/person.txt"For Output As #1
B.Name=Input Box(“输入姓名”)
B.TelNum=InputBox(“输入学号”)
Write#I,B,Name,B.TelNum
Close #1
End Sub
[单项选择]设在工程中有一个标准模块,其中定义了如下记录类型
Type Books
Name As String*10
TelNum As String*20
End Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是______。
A. Private Sub Command1_Click()
B. Private Sub Command1_Click()
C. Private Sub Command1_Click()
D. Private Sub Command1_Click()
[单项选择]设在工程中有一个标准模块,其中定义了如下记录类型:
Type Books
Name As String * 10
TelNum As String * 20
EndType
在窗体中添加一个名为Commandl的命令按钮,要求单击命令按钮时,在顺序文件 P1. txt中写入一条记录。下列能够完成该操作的程序段是 ( )
A) Private Sub Commandl_Click( )
Dim B As Books
Open"d:/P1.txt"For Output As
#1
B. Name=InputBox( "姓名")
B. TelNum=InputBox("电话号码")
Write #1,B. Name,B. TelNum
Close #1
EndSub
B) Private Sub Commandl_Click( )
Dim B As Books
Open" d:/Pl.txt" For Input As
B. Name=InputBox ("姓名")
B. TelNum=InputBox ("电话号码")
Print #1,B. Name,B. TelNum
Close #1
EndSub
C) Private Sub Commandl_Click( )
Dim B As Books
Open"d:/P1. txt"For Output As
B. Name=InputBox("姓名")
B. TelNum=InputBox ("电话号码")
Write #1,B
Close #1
EndSub
D) Private Sub Commandl Cliek( )
Open"d:/P1.txt" For Input As
Name=InputBox("姓名")
TelNum=InputBox ("电话号码")
Print #1,Name,TelNum
Close #1
EndSub
[简答题]
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示存标签中,否则本题无成绩。最后把修改后的文件按原文件名存盘。
[单项选择]一个工程中包含两个名称分别为Forml、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程,其定义格式为:
Form1中定义的过程:
Private Sub frmFunctionl( )
...
End Sub
Form2中定义的过程:
Public Sub frmFunction2( )
...
End Sub
md1Func中定义的过程:
Public Sub mdlFunction( )
...
End Sub
在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFune的标准模块。假定在 Forml、Form2和mdlFunc中分别建立了自定义过程,其定义格式为:
Forml中定义的过程:
Privme Sub frmFunction1( )
……
End Sub
Form2中定义的过程:
Public Sub frmFunction2( )
End Sub
mdlFunc 中定义的过程:
PubHc Sub mdl Function( )
End Sub
在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
A. 上述三个过程都可以在工程中的任何窗体或模块中被调用
B. frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C. 上述三个过程都只能在各自被定义的模块中调用
D. 只有mdlFunction过程能够被工程中各个窗体或模块调用
[单项选择]一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为Func的标准模块。假定在Form1和Func中分别建立了自定义过程,其定义格式为:
Form1中定义的过程:
Private Sub Fun1( )
......
End Sub
Func中定义的过程:
Public Sub Fun2( )
......
End Sub
若要在窗体For2g调用Porm1和Func中分别建立的自定义过程,则调用格式正确的是 ( )
A. Call Form1. Funl()
B. Call Form1. Fun1()
C. Form1. Fun1()
D. Fun1()
[单项选择]设当前表文件中含有字段 NAME,系统中有一内存变量的名称也为 NAME,下面命令 NAME 显示的结果是______。
A. 内存变量 NAME 的值
B. 字段变量 NAME 的值
C. 与该命令之前的状态有关
D. 错误信息
[单项选择]一个建设工程由多个单位工程组成时,工程文件按( )立卷。
A. 单位工程
B. 分部工程
C. 分项工程
D. 检验批
[单项选择]假定在窗体上建立了一个通用对话框,其名称为Cd1,用下面的语句可以建立一个对话框:
Cdl. ShowPrinter
与该语句等价的语句是 ( )
A. Cd1. Action=2
B. Cd1. Action=3
C. Cd1 Action=4
D. Cd1. Action=5
[单项选择]一个建设工程由多个单位工程组成时,工程文件应按( )组卷。
A. 建设程序
B. 分部工程
C. 单位工程
D. 阶段