首页 > 大学专科> 电子信息

题目内容（请给出正确答案）

[主观题]

窗体上有一个命令按钮，数据文件data.txt的内容如下： "语文" "2001", 87 "数学"

"2002", 75 "英语" "2003", 92 "体育" "2004", 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click(Dim xs As bs Dim fl As Integer fl = FreeFile Open "d:\data.txt" For Input As fl Do While Not EOF(fl) Input fl, xs.aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop Print EOF(fl) Close End Sub 问：在列表框中第一行、第三行、第四行的内容是【】、【】、【】。窗体上打印出的是【】。

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“窗体上有一个命令按钮，数据文件data.txt的内容如下： …”相关的问题

第1题

在考生文件夹下有一个工程文件sjt3．vbp，窗体上有一个标题为“计算”的命令按钮，1个标题为“1!＋2!＋…＋

在考生文件夹下有一个工程文件sjt3．vbp，窗体上有一个标题为“计算”的命令按钮，1个标题为“1!+2!+…+10!=”的标签。请画1个名称为Text1，初始内容为空的文本框，如图所示。程序功能：单击“计算”命令按钮，则计算“l!+2!+…+10!”的值，并将结果显示在Textl文本框中。请将“计算”命令按钮的Click事件过程中的注释符去掉，把？改为正确的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程序，最后，程序按原文件名存盘。

在考生文件夹下有一个工程文件sjt3．vbp，窗体上有一个标题为“计算”的命令按钮，1个标题为“1!

点击查看答案

第2题

在一个窗体上有一个命令按钮，CmdMax。单击CmdMax时，窗体上显示“字体由小变大”，字号每次增加2。请填

空。 Private Sub Form_Load() Form1.Caption=“字体变化示范” CmdMax.Caption=“字体变大” End Sub Private Sub CmdMax_Click() 【】 Form1.Print“字体由小变大” End Sub

点击查看答案

第3题

在窗体上有一个命令按钮和一个文本框，其名称分别为Command1和text1，把文本框的Text属性设置为空白，然后编写如下事件过程：PrivatesubCommand1_click()A=inputbox(“Enteraninteger”)B=inputbox(“Enteraninteger”)Text1.text=b+aEndsub程序运行后，单击命令按钮，如果在输入对话框里输入8和10，则文本框中显示的内容是()。

A.108

B.18

C.810

D.出错

点击查看答案

第4题

在窗体上有一个命令按钮，然后编写如下程序： Function Trans（ByVal num As Long) As Long D

在窗体上有一个命令按钮，然后编写如下程序： Function Trans(ByVal num As Long) As Long Dim k As Long k=l Do While num k=k * (num Mod 10) num=num\10 Loop Trans=k Print Trans End Function Private Sub Commandl_Click() Dim m As Long Dim s As Long m=InputBox("请输入一个数") s=Trans(m) End Sub 程序运行时，单击命令按钮，在输入对话框中输入“789”，输出结果为【】，在输入对话框中输入“987”输出【】，在输入对话框中输入“879”，输出结果为【】。

点击查看答案

第5题

窗体上有4个文本框控件数组text1（)和一个命令按钮，程序运行前如左图所示，程序运行后如右图所示。

窗体上有4个文本框控件数组text1()和一个命令按钮，程序运行前如左图所示，程序运行后如右图所示。给定的程序不完整，将程序补充完整。

窗体上有4个文本框控件数组text1（)和一个命令按钮，程序运行前如左图所示，程序运行后如右图所示。 Dim x(3)As Integer Private Sub Command1_Click () For i = 0 To 3 x(i)=【】 Next i For i = 0 To UBound(x)- 1 For j = i To UBound(x) If【】Then t = x(i) x(i)= x(j) x(j)= t End If Next j Next i For i = 0 To 3 Text1(i) .Text = Str(x(i)) Next i End Sub

点击查看答案

第6题

在Visual Basic工程prjl中包含有两个窗体，窗体form1（主窗体)上有两个命令按钮command1和 command

在Visual Basic工程prjl中包含有两个窗体，窗体form1(主窗体)上有两个命令按钮command1和 command2，一个文本控件text1；窗体dialog是一个对话窗体，窗体包含两个命令按钮OK和Cancel，一个文本控件text1和一个标签控件labe11。编写程序要求实现的功能为：窗体form. 1上command1的caption属性值为name，程序运行后，当单击 eommand1时，弹出对话窗体dialog，其labe11控件中的提示信息为“please input your name：”，要求用户输入自己的姓名。如果单击OK按钮，保存当前输入的内容并返回form1界面，command1的caption属性值为email。若再次单击command1命令按钮，仍然出现dialog对话窗体，此时dialog的labe11提示用户输入自己的email，当用户输入email后，单击“确定”按钮，保存当前输入的内容并返回form1界面；如果单击Cancel按钮，则输入内容无效并返回form1。 Private Sub Command1_Click() Dialog. Text1. Text = "" Dialog. Show End Sub Private Sub Command2_Click() Text1. Text = "email: "+ Dialog. email +" name: "+ Dialog. fname End Sub Private Sub Form_ Load() Command1. Caption = "name" 【】. Caption = "please input your name: Dialog. i = 0 End Sub Option Explicit Public i As Integer Public email As String Public fname As String Private Sub CancelButton_Click() i=0 email = "" fname = "" Forml. Command1. Capt ion = "name" Dialog. Hide Form1. Show End Sub Private Sub OKButton_ Click() 【】 Select Case i Case 1: email = Text1. Text Labe11. Caption = "please input your email:" 【】. Caption = "email" Case 2: fname = Text1. Text 【】. Caption = "name" i=0 End Select Dialog. Hide Form1. Show End Sub

点击查看答案

第7题

在一个窗体上有两个命令按钮，cmdMax 和 cmdMin。单击cmdMax时，窗体上显示“字体由小变大”，字号每次

增加2；单击cmdMin时，窗体上显示“字体由大变小”，字号每次减小2。请填空。 Private Sub Form_Load() Forml．Caption =“字体变化示范” cmdMax．Caption=“字体变大” cmdMin．Caption=“字体变小” End Sub Private Sub cmdMax_Click() 【】 Forml．Print”字体由小变大” End Sub Private Sub cmdMin_Click() 【】 Forml．Print“字体由大变小” End Sub

点击查看答案

第8题

窗体上有命令按钮OK,它的单击事件过程为CmdOK__Click（），该按钮的Name和Caption属性分别为

A.OK,Cmd

B.md,OK

C.mdOK,OK

D.OK，CmdOK

点击查看答案

第9题

窗体上有命令按钮OK,它的单击事件过程为CmdOK__Click（），则该按钮的Name和Caption属性分别为

A.OK,Cmd

B.md,OK

C.mdOK,OK

D.OK，CmdOK

点击查看答案

第10题

一个窗体中可用有多个文本框,但是最多可能有一个命令按钮（）

点击查看答案

湖南中本聪区块链科技有限公司版权所有 ©2024

湘ICP备20004669号-2 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）