vb的操作题(有答案)

来源:网络收集 打印文章内容   下载WORD版到本地  

1.(1)在考生文件夹中有工程文件sj126.vbp,其中的窗体 如图所示。

程序刚运行时,会生成一个有10个元素的整型数 组。

若选中"查找最大值"(或"查找最小值")单选按钮,再 单击"查找"按钮,则找出数组中的最大值(或最小值),并 显示在标签Label2中。

请去掉程序中的注释符,把程序中 的 ?改为正确的内容。

注意: 考生不得修改窗体文件中已经存在的程序。

最后把 修改后的文件按原文 件名存盘。

Private Sub Command1_Click() x = a(1) y = a(1) For i = 2 To 10 If Option1.Value = True Then If a(i) > x Then x End If = a(i)

ElseIf a(i) < y Then y End If Next = a(i) If Option1.Value = True Then Label2.Caption = x Else Label2.Caption = y End If End Sub 2.(2)在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口其 设置为圆形。

画一个名称为List1的列表框,并在属性窗口中设置列表项的 值分别为1、2、3、4、5。

将窗体的标题设为"图形控件"。

单击列表框中 的某一项,则将所选的值作为形状控件的填充参数。

例如,选择3,则形状 控件中被竖线填充。

如图所示。

要求: 程序中不得使用变量,每个过程中只能写一条语句。

存盘时必须存 放在考生文件夹下,工程文件名为sj107.vbp,窗体文件名为sj107.frm。

在 Shape 控件中,可以用 FillStyle 属性设置图形的填充图案,0:透明,2:虚线,3: 点线,4:点划线,5:双点划线,6:内实线。

List控件的Click过程为: Private Sub List1_Click() Shape1.FillStyle = List1.Text End Sub 3. (1) 在名称为Form1的窗体上画一个文本框, 名称为Text1;

再画二个命令按钮,名称分别为C1、C2,标题分别为"隐藏"、 "显示"(如图所示)。

请编写适当的过程,使得在运行 时,如果单击"隐藏"按钮,则文本框消失,而如果单击"显 示"按钮,则文本框显示出来。

程序中不得使用任何变量。

*注意: 存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp, 窗体文件名为sjt3.frm。

隐藏:text1.visible=false 显示:text1.visible=true 4. 在窗体上画二个文本框,名称分别为Text1、Text2。

请设 置适当的控件属性, 并编写适当的过程, 使得在运行时, 如果在Text1中每输入一个字符,则显示一个"*",同时在 Text2中显示输入的内容(如图所示)。

程序中不得使用任 何变量。

*注意: 存盘时必须存放在考生文件夹下,工程文件名为sjt4.vbp, 窗体文件名为sjt4.frm。

答案:将 Text1 的文本框的 PasswordChar 属性为"*"。

Private Sub Text1_Change() Text2.Text = Text1.Text End Sub 5. (1)在考生文件夹中有工程文件wy69.vbp及其窗体文件 wy69.frm,该程序是不完整的,请在有?号的地方填入正确 内容,然后删除?及所有注释符(即'号)但不能修改其他 部分。

存盘时不得改变文件名和文件夹。

本题描述如下:在窗体上有一个列表框,名称为List1,一 个文本框,名称为Text1,和一个命令按钮,名称为 C1,标 题为"复制"。

要求程序运行后,在列表框中自动建立四个列表项,分别为 "Item1"、"Item2"、"Item3"、"Item4"如果选择列表框中的 一项, 则单击"复制"按钮时, 可以把该项复制到文本框中 (如 图所示)。

Private Sub Command1_Click() Dim i As Integer For i = 0 To 3 Text1.Text = List1 Next i End Sub 6 在考生文件夹下有一个工程文件sj31.vbp,相应的窗 体文件为sj31.frm,此 外还有一个名为datain.txt的文本文件,其内容如下: 32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35 46 57 68 79 80 59 37 程序运行后,单击窗体,将把文件datain.txt中的数据 输入到二维数组 Mat 中,在窗体上按5行、5列的矩阵形式显示出来,并输出 矩阵左上-右下对角线 上的数据,如图所示。

在窗体的代码窗口中,已给出 了部分程序,这个程序 不完整,请把它补充完整,并能正确运行。

要求: 去掉程序中的注释符,把程序中的 ? 改为正确的内 容,使其实现上述功

能,但不能修改程序中的其他部分。

最后把修改后的 文件按原文件名存盘。

解题方法: 打开sjt5.vbp中的Form1窗体,打开代码窗口,修改后的代 码如下: Option Base 1 Private Sub Form_Click() Const N = 5 Const M = 5 Dim Mat(M, N) Dim i, j Open App.Path & "\" & "datain.txt" For Input As #1 For i = 1 To N For j = 1 To M Input #1, Mat(i, j) Next j Next i Close #1

  • vb操作题答案

    vb操作题答案

    vb操作题答案...

    贡献者:网络收集
    370672
  • vb操作选择题及答案

    vb操作选择题及答案

    vb操作选择题及答案...

    贡献者:网络收集
    659481
  • VB操作题

    VB操作题

    VB操作题...

    贡献者:网络收集
    137364
  • vb24题操作答案

    vb24题操作答案

    vb24题操作答案...

    贡献者:网络收集
    893652
  • VB作业第三章习题答案

    VB作业第三章习题答案

    VB作业第三章习题答案...

    贡献者:网络收集
    844564
  • 2013计算机二级vb操作题答案-题库版(二)

    2013计算机二级vb操作题答案-题库版(二)

    2013计算机二级vb操作题答案-题库版(二)...

    贡献者:网络收集
    201812
  • VB上机操作练习题

    VB上机操作练习题

    VB上机操作练习题...

    贡献者:网络收集
    379459
  • vb作业题1—参考答案

    vb作业题1—参考答案

    vb作业题1—参考答案...

    贡献者:网络收集
    411313
  • 200901-VB操作题

    200901-VB操作题

    200901-VB操作题...

    贡献者:网络收集
    986563
  • VB国家计算机考试操作题

    VB国家计算机考试操作题

    VB国家计算机考试操作题...

    贡献者:网络收集
    912492
  • 网友在搜
    韩国隐身战机 zol 驱动 洛奇的生活技能在哪学 2017马友友音乐会 白色门徒 白色童梦 new surface pro 128g 青岛高中生物兼职家教 god bless什么牌子 凤子进城 阅读理解 window system函数 洛奇英雄传ap最快 脱身者演员表最新 jq根据class 清空 div straight up anal 04 c 实践之路 怎么样 大风车币股园有风险吗 从众效应实验 Somataform disorder quick time for win10 阴阳师以津真天御魂图 高傲魔法师百度网盘 潜水泵与离心泵的区别 i140 i485 z370支持sli a little braver的伴奏 avr 程序跳转 avidolzvideo空姐 the ginza隔离日本 ned kelly短视频 斯托伊奇科夫 windowsupdate文件夹 上汽通用金融初审通过 有货New era旧 附近的hyper sound 三冰现在在哪 matlab logical 交通银行香港分行历史 美国selleck公司怎么样 agent provocateur破产 md 格斗游戏 贴吧 女士们先生们 德语 we built this city lancelot王牌特工 硬件工程师入门书籍 新东方考研培训班时间 闫寒 虎扑 mac power cycles ajax action 返回值 率土之滨五星关羽 游戏成就系统 菠萝牛奶能一起吃吗 同济大学国家一级学科 mysql slow query log 茶花股份 创始人 瑞芯微 3328 3368 儿童衣服淘宝网 刘力行 爱股轩 嘴唇画法素描

    声明:本站内容源于网络,出于传递更多信息之目的,并不意味着赞同其观点或证实其描述。文章内容仅供参考,请咨询相关专业人士。

    如果无意之中侵犯了您的版权,或有意见、反馈或投诉等情况, 联系我们:shnews500#tom.com

    All Rights Reserved 爱问通 手机站 网站地图 网站栏目