在窗体上画一个命令按钮,然后编写如下代码:Private Type RecordR_ID As IntegerR_Name As String * 20Ene TypePrivate Sub Commandl_Click( )Dim M _Sise, N_Char, M_CharOpen" c: \file. txt" For Input As 1M_sise=LOF(1)For N_Char = M_Sise To 1 Step - 1Seek1, Next CharM_char = Input(1 ,1)NextPrint EOF(1)Close1End Sub程序运行后,单击命令按钮,其输出结果为【 】。

在窗体上画一个命令按钮,然后编写如下代码:

Private Type Record

R_ID As Integer

R_Name As String * 20

Ene Type

Private Sub Commandl_Click( )

Dim M _Sise, N_Char, M_Char

Open" c: \file. txt" For Input As 1

M_sise=LOF(1)

For N_Char = M_Sise To 1 Step - 1

Seek1, Next Char

M_char = Input(1 ,1)

Next

Print EOF(1)

Close1

End Sub

程序运行后,单击命令按钮,其输出结果为【 】。


相关考题:

在窗体上画一个命令按钮,然后编写如下代码:Private Sub Commandl_Click()Dim M(10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Msgbox M(2+M(x))End Sub程序运行后,单击命令按钮,消息框显示的是______。

在窗体上画一个命令按钮,然后编写如下代码:Private Sub Command1_Click()Dim M (10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Msgbox M(2+M(x))End Sub程序运行后,单击命令按钮,消息框显示的是【 】。

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,其输出结果为__________。

在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Sub Command1_Click()Text 1="VB programming"Text 2=Text 1Text 1="ABCD"End Sub程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。

在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是__________。

在窗体上画一个命令按钮,然后编写如下代码:Private Sub Command1_C1ick()Dim M (10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Msgbox M(2+M(x))End Sub程序运行后,单击命令按钮,消息框显示的是【 】。

在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。

在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.D.

在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A)机床B)车床C)钻床D)轴承