题库 题库

【单选题】

窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。
 
设有如下的类型声明
Type Person
name As String*8
major As String*20
End Type
当单击"保存"按钮时,将两个文本框中的内容写入一个随机文件Test29.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是

    参考答案

    查看答案

    相关试题

    单选题 以下关于窗体的描述中,错误的是 查看答案
    单选题 以下叙述中错误的是 查看答案
    单选题 以下关于过程及过程参数的描述中,错误的是 查看答案
    单选题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
    Private Sub Command1_Click()
    x = 0
    n = InputBox("")
    For i = 1 To n
    For j = 1 To i
    x = x + 1
    Next j
    Next i
    Print x
    End Sub
    程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是
    查看答案
    单选题 在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
    Option Base 0
    Private Sub Command1_Click()
    Dim city As Variant
    city = Array("北京", "上海", "天津", "重庆")
    Print city(1)
    End Sub
    程序运行后,如果单击命令按钮,则在窗体上显示的内容是
    查看答案
    单选题 在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程:
    Private Sub Command1_Click()
    a$ = "software and hardware"
    b$ = Right(a$, 8)
    c$ = Mid(a$, 1, 8)
    MsgBox a$, , b$, c$, 1
    End Sub
    则在弹出的信息框的标题栏中显示的信息是
    查看答案
    单选题 在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:
    Private Sub TxtA_KeyPress(keyascii as integer)
    ……
    End Sub
    若焦点位于文本框中,则能够触发KeyPress事件的操作是
    查看答案
    单选题 在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:
    Private X As Integer
    Private Sub Command1_Click()
    X = 5: Y = 3
    Call proc(X, Y)
    Label1.Caption = X
    Label2.Caption = Y
    End Sub
    Private Sub proc(ByVal a As Integer, ByVal b As Integer)
    X = a * a
    Y = b + b
    End Sub
    程序运行后,单击命令按钮,则两个标签中显示的内容分别是
    查看答案
    单选题 假定有以下函数过程:
    Function Fun(S As String) As String
    Dim s1 As String
    For i = 1 To Len(S)
    s1 = UCase(Mid(S, i, 1)) + s1
    Next i
    Fun = s1
    End Function
    在窗体上画一个命令按钮,然后编写如下事件过程:
    Private Sub Command1_Click()
    Dim Str1 As String, Str2 As String
    Str1 = InputBox("请输入一个字符串")
    Str2 = Fun(Str1)
    Print Str2
    End Sub
    程序运行后,单击命令按钮,如果在输入对话框中输入字符串"abcdefg",则单击"确定"按钮后在窗体上的输出结果为
    查看答案
    单选题 以下关于菜单的叙述中,错误的是 查看答案
    单选题 窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。
     
    设有如下的类型声明
    Type Person
    name As String*8
    major As String*20
    End Type
    当单击"保存"按钮时,将两个文本框中的内容写入一个随机文件Test29.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
    查看答案
    单选题 在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:
    Private Sub Command1_Click()
    s = 0
    For i = 1 To 15
    x = 2 * i - 1
    If x Mod 3 = 0 Then s = s + 1
    Next i
    Label1.Caption = s
    End Sub
    程序运行后,单击命令按钮,则标签中显示的内容是
    查看答案
    单选题 以下不能在"工程资源管理器"窗口中列出的文件类型是 查看答案
    单选题 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:
    Private Sub Command1_Click()
    Static b As Variant
    b= Array(1,3,5,7,9)
    ……
    End Sub
    此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是
    查看答案
    单选题 在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是 查看答案
    单选题 下列可作为Visual Basic变量名的是 查看答案
    单选题 一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为:
    Form1中定义的过程:
    Private Sub frmFunction1()
    ……
    End Sub
    Form2中定义的过程:
    Public Sub frmFunction2()
    ……
    End Sub
    mdlFunc中定义的过程:
    Public Sub mdlFunction()
    ……
    End Sub
    在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
    查看答案
    单选题 执行如下语句:
    a = InputBox("Today", "Tomorrow", "Yesterday", , , "Day before yesterday", 5)
    将显示一个输入对话框,在对话框的输入区中显示的信息是
    查看答案
    单选题 函数String(n, "str")的功能是 查看答案
    单选题 在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:
    Private x As Integer
    Private Sub Command1_Click()
    Static y As Integer
    Dim z As Integer
    n = 10
    z = n + z
    y = y + z
    x = x + z
    Label1.Caption = x
    Label2.Caption = y
    Label3.Caption = z
    End Sub
    运行程序,连续三次单击命令按钮后,则三个标签中显示的内容分别是
    查看答案