UC知道VB简单小程序~求详细的编辑代码!
来源：百度知道 编辑：UC知道 时间：2024/05/04 20:56:47
B2. 编程实现：程序运行后，窗体背景色每隔0.1秒自动改变一次，颜色随机；单击“结束”按钮，结束程序。
B3. 编程实现：程序运行后，单击“变大”按钮，图片尺寸变大；单击“变小”按钮，图片尺寸变小。
B4.编程实现：程序运行后，单击窗体，窗体背景色随机改变：单击“结束”按钮，结束程序。
B5.编程实现：在窗体的任意位置单击鼠标左键时，在鼠标单击处画一个半径为500、颜色随机的圆；要求画图前清屏幕。
B6. 编程实现：在窗体的任意位置单击鼠标左键时，在窗体上以（800，200）为左上角，以鼠标单击位置为右下角，画一个颜色随机的矩形。
B7.编程实现：在窗体中每隔0.1秒随机画出一颗颜色随机的星星，画笔的宽度为5。
B8.制作一个拖动水平滚动条设置年份的程序。要求：程序运行开始，“出生年份”框为空；当拖动水平滚动条时，“出生年份”框中显示水平滚动条的当前值；单击“结束”按钮退出程序。
B9. 已知某日外汇牌价：1美元＝8.27元人民币，1欧元＝10.46元人民币。设计程序，使之能根据用户输入的人民币数额，计算出其相对应的外币数额。
B10. 编程实现：程序运行后，在图片上每单击一次，图片在窗体中的位置就随机变化一次。
B11. 编一个移动图片程序，每间隔0.1秒使图片从窗口左边向右边水平移动100个单位。
B12. 编一个移动图片程序，每间隔0.1秒使图片从窗口下边向上边垂直移动100个单位。
B13. 编一个移动图片程序，单击“移动”按钮使图片向右水平移动100个单位。
B14. 编程实现：程序运行后，单击“显示”按钮，窗体显示图片，同时“显示”按钮变成不可用，“隐藏”按钮变成可用；单击“隐藏”按钮，窗体中不显示图片，同时“显示”按钮变成可用，“隐藏”按钮变成不可用。
B15. 编一个计算水果价钱的程序。在文本框中输入水果的购买量（单位：kg），单击“一级”按钮，按2.5元/kg计价，并在价钱框中显示出价钱；单击“二级”按钮，按2元/kg计价，并在价钱框中显示出价钱。单击“清除”按钮，清除各框中的数据；单击“退出”按钮，退出程序。
B16. 编程实现：用垂直滚动条表示字号大小（1-48，单位：磅），通过拖动滑块改变文本框中文
B3. 编程实现：程序运行后，单击“变大”按钮，图片尺寸变大；单击“变小”按钮，图片尺寸变小。
B4.编程实现：程序运行后，单击窗体，窗体背景色随机改变：单击“结束”按钮，结束程序。
B5.编程实现：在窗体的任意位置单击鼠标左键时，在鼠标单击处画一个半径为500、颜色随机的圆；要求画图前清屏幕。
B6. 编程实现：在窗体的任意位置单击鼠标左键时，在窗体上以（800，200）为左上角，以鼠标单击位置为右下角，画一个颜色随机的矩形。
B7.编程实现：在窗体中每隔0.1秒随机画出一颗颜色随机的星星，画笔的宽度为5。
B8.制作一个拖动水平滚动条设置年份的程序。要求：程序运行开始，“出生年份”框为空；当拖动水平滚动条时，“出生年份”框中显示水平滚动条的当前值；单击“结束”按钮退出程序。
B9. 已知某日外汇牌价：1美元＝8.27元人民币，1欧元＝10.46元人民币。设计程序，使之能根据用户输入的人民币数额，计算出其相对应的外币数额。
B10. 编程实现：程序运行后，在图片上每单击一次，图片在窗体中的位置就随机变化一次。
B11. 编一个移动图片程序，每间隔0.1秒使图片从窗口左边向右边水平移动100个单位。
B12. 编一个移动图片程序，每间隔0.1秒使图片从窗口下边向上边垂直移动100个单位。
B13. 编一个移动图片程序，单击“移动”按钮使图片向右水平移动100个单位。
B14. 编程实现：程序运行后，单击“显示”按钮，窗体显示图片，同时“显示”按钮变成不可用，“隐藏”按钮变成可用；单击“隐藏”按钮，窗体中不显示图片，同时“显示”按钮变成可用，“隐藏”按钮变成不可用。
B15. 编一个计算水果价钱的程序。在文本框中输入水果的购买量（单位：kg），单击“一级”按钮，按2.5元/kg计价，并在价钱框中显示出价钱；单击“二级”按钮，按2元/kg计价，并在价钱框中显示出价钱。单击“清除”按钮，清除各框中的数据；单击“退出”按钮，退出程序。
B16. 编程实现：用垂直滚动条表示字号大小（1-48，单位：磅），通过拖动滑块改变文本框中文
1. 使用整数（Integer）和长整数（Long）
提高代码运行速度最简单的方法莫过于使用正确的数据类型了。也许你不相信，但是正确地选择数据类型可以大幅度提升代码的性能。在大多数情况下，程序员可以将Single，Double和Currency类型的变量替换为Integer或Long类型的变量，因为VB处理Integer和Long的能力远远高于处理其它几种数据类型。
在大多数情况下，程序员选择使用Single或Double的原因是因为它们能够保存小数。但是小数也可以保存在Integer类型的变量中。例如程序中约定有三位小数，那么只需要将保存在Integer变量中的数值除以1000就可以得到结果。根据我的经验，使用Integer和Long替代Single，Double和Currency后，代码的运行速度可以提高将近10倍。
2. 避免使用变体
对于一个VB程序员来说，这是再明显不过的事情了。变体类型的变量需要16个字节的空间来保存数据，而一个整数（Integer）只需要2个字节。通常使用变体类型的目的是为了减少设计的工4作量和代码量，也有的程序员图个省事而使用它。但是如果一个软件经过了严格设计和按照规范编码的话，完全可以避免使用变体类型。
在这里顺带提一句，对于Object对象也存在同样的问题。请看下面的代码：
Dim FSO
Set FSO = New Scripting.FileSystemObject
或
Dim FSO as object
Set FSO = New Scripting.FileSystemObject