vb趣味程序集锦

教学进度表

周次 3 4 5 8、9 10 12 13 14 17 18 19 时间 9月16日 9月23日 9月28日 10月21日、28日 11月4日 11月18日 11月25日 12月2日 12月23日 12月30日 1月6日 教学内容 QQ登录窗口的制作——初步认识计算机语言 VB程序设计的过程 VB程序的数据与表达式 几何计算（2课时） 程序的选择结构 程序的循环结构 整人小程序 计时秒表 小球来回弹屏幕保护程序 期末考查 授课时间 课题 课型 2014年9月16日 第2周 星期2 总第1课时 QQ登录窗口的制作——初步认识计算机语言 新授课 教学时数 1课时 （一）知识与技能： 了解计算机语言； 熟悉VB开发环境 了解VB中的对象、属性、事件 教 学 学会编写窗体的设计代码，并能运行程序 目 标 （二）过程与方法： 通过QQ登陆窗体的制作了解并掌握程序编写的整个过程 （三）情感、态度与价值观： 通过制作学生最熟悉的QQ登录界面，使学生对VB程序设计产生浓厚的兴趣。 教材分析 重点 属性、方法和事件 难点 VB的集成开发环境 讲授法、演示法、练习法、任务驱动法 教

标准

教学进度表

周次 3 4 5 8、9 10 12 13 14 17 18 19 时间 9月16日 9月23日 9月28日 10月21日、28日 11月4日 11月18日 11月25日 12月2日 12月23日 12月30日 1月6日 教学内容 QQ登录窗口的制作——初步认识计算机语言 VB程序设计的过程 VB程序的数据与表达式 几何计算（2课时） 程序的选择结构 程序的循环结构 整人小程序 计时秒表 小球来回弹屏幕保护程序 期末考查 文案

标准

授课时间 课题 课型 2014年9月16日 第2周 星期2 总第1课时 QQ登录窗口的制作——初步认识计算机语言 新授课 教学时数 1课时 （一）知识与技能： 了解计算机语言； 熟悉VB开发环境 了解VB中的对象、属性、事件 教 学 学会编写窗体的设计代码，并能运行程序 目 标 （二）过程与方法： 通过QQ登陆窗体的制作了解并掌握程序编写的整个过程 （三）情感、态度与价值观： 通过制作学生最熟悉的QQ登录界面，使学生对VB程序设计产生浓厚的兴趣。 教材分析 重点 属性、方法和事件 难点 VB的集成开发环境 讲授法、演示法、练习

篇一：2016中秋节趣味灯谜精选(附答案)_中秋灯谜大全

2016中秋节趣味灯谜精选(附答案)_中秋灯谜大全

上海佳宗知道您一定在为中秋风俗之一的猜灯谜而烦恼，苦思什么样的灯谜更有趣味是吗？下面是上海音响租赁公司为您精选的中秋节趣味灯谜，包括了中秋节动物灯谜、中秋地名灯谜、中秋成语灯谜等，希望您喜欢。中秋将至，在这里上海佳宗也祝愿大家中秋快乐。

中秋节谜动物篇

1、耳朵长，尾巴短。只吃菜，不吃饭。(打一动物名)答案：兔子

2、粽子脸，梅花脚。前面喊叫，后面舞刀。(打一动物名)答案：狗

3、小姑娘，夜纳凉。带灯笼，闪闪亮。(打一动物名)答案：萤火虫

4、一支香，地里钻。弯身走，不会断。(打一动物名)答案：蚯蚓

5、一样物，花花绿。扑下台，跳上屋。(打一动物名)答案：猫

6、沟里走，沟里串。背了针，忘了线。(打一动物名)答案：刺猬

7、肥腿子，尖鼻子。穿裙子，背屋子。(打一动物名)答案：鳖

8、船板硬，船面高。四把桨，慢慢摇。(打一动物名)答案：乌龟

9、一把刀，顺水漂。有眼睛，没眉毛。(打一动物名)答案：鱼

10、一星星，一点点。走大路，钻小洞。(打一动物名)答案：蚂蚁

11、脚儿小，腿儿高。戴红帽，穿白袍。(打一动物名)答案：丹顶鹤

12、小小船，白布篷。头也红，桨也红。

趣味历史谜语集锦

（1）说尽心中无限事（打一近代皇帝） 道光 （2）夕照街（打一近代皇帝） 道光 （3）普遍富起来（打一近代皇帝） 咸丰 （4）会诊（打一近代皇帝） 同治 （5）陈玉成（打一字） 瑛 （6）天生丽质难自弃（打一近代人物） 杨秀清 （7）秋收暴动（打一历史名词） 金田起义 （8）爷爷奶奶爸妈我，全家都是营业员（打一历史名词） 五口通商 （9）指挥车辆停驶（打一历史名词） （10）正义的回答（打一历史人物）

VB程序设计结构：顺序结构、分支结构、循环结构。 二、分支结构：

一、顺序结构题： 1、以下程序段的执行结果是?

A=1

b=5

c=4

a=b

b=c

c=a

Print a;b;c 3、下面程序段的划线部分应是? A=356 b=214 t=a a=b print a;b 运行结果 214356

5、经过几下几条语句，A和B的 值分别为多少？ A=6 B=7 C=A A=B B=C

2、该程序段运行后， 变量b的值为 ? a=7 b=8 a=a+b b=a-b 4、该程序段运行后，变量a的值为 ? a=8 b=7 z=a a=b b=z 6、Text1和Text2中分别输入5，6，求Labe7l中值？ Dim X AS Single, Y AS Single, Z AS Single X=Val（Text1.text） Y=Val（Text2.text） Z=X*Y／10 Label7.caption=Z

IF <条件> Then 当条件满足时，执行语句组1 <语句组1> 当条件不满足时，执行

3.1 编写一个程序，判断用户输入的字符是数字字符、字母字符还是其他字符。

3.6编写一个“猜猜看”程序。即给定一个样板数，例如：3, 让用户从键盘输入整数，将其与样板数比较。如果相等，输出“正确”字样，否则输出太大或太小的信息。如此直到用户猜到为止。

3.9从键盘输入若干个学生的成绩，打印输出最高成绩和最低成绩。当输入负数时结束输入。 #include void main() { int a,max,min;

printf(\请输入成绩：\\n\ scanf(\

max=min=a; /*max、min一定要赋初值*/ while(a>=0)

{if(a>max) max=a; if(a

printf(\继续输入成绩：\\n\

scanf(\ }

printf(\最高成绩是%d\\n\ printf(\最低成绩是%d\\n\}

3.14 输入一个正整型x，若x满足0

4.1从键盘输入8个字符，用冒泡法对其进行排序。 #include int main() { char R[8]; int i, j; char temp; printf(\排序前: \ scanf(\ printf(

北京航空航天大学vb程序设计

摘要

VisualBasic 6.0 是一款可视化的，面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发windows 环境下的种类应用程序。它简单易学，效率高，且功能强大，可以与Windows专业开发工具相媲美。在VisualBasic环境下，利用事出有因件驱动的编程机制，新颖易用的可视化工具，使用Windows内部的广泛应用程序接口(API)函数，运用动态链接库（DLL），对象的链接与嵌入（OLE）,开放式数据连接（ODBC）等技术，可以高效，可以快速地开发Windows环境不功能强大，图形界面丰富的程序。

为了适应信息化时代的需求，各高校对大多数专业都开设了一定的计算机语言课程，有的讲授VisualBasic语言。VisualBasic以其语法简单，可视化设计，功能强大，为许多学校计算机语言课程的首选语言。

目前国内各出版了大量的VisualBasic语言教程，它们都具有同样的特点：介绍语言的语法等基本知识，再辅助一些简单的示例。学生通过学习，可能能够考一个不错的成绩，但所掌握的仍然是一些支离破碎的知识，不能将所有的知识融会贯通，遇到具体的程序设计，还是无从下手。

这次我要做的是计算器，通过这样

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

1. 时钟。程序运行后，每隔2秒命令按钮Command1向右移动100

个单位。

Option Explicit

Private Sub Form_Load() Timer1.Interval = 2000 End Sub

Private Sub Timer1_Timer() Call mymove End Sub Sub mymove()

Command1.Left = Command1.Left + 100 End Sub

2.滚动条。水平滚动条HScroll1的数值范围0～100，LargeChange设置为10，SmallChange设置为5，水平滚动条HScroll1的值(Value)代表正方形的边长，当水平滚动条的滑块变化时，标签Label1中正方形边长随之改变，文本框Text1中正方形面

积也随之改变

Option Explicit

Private Sub Form_Load() HScroll1.Min = 0 HScroll1.Max = 100 HScroll1.SmallChange = 5 HScroll1.LargeChange = 10 End Sub

Private Sub hscroll1_change() Cal

VB科期中试卷

班级： 姓名： 座号： 成绩：

一、选择题（每题1分，共35分）

1．以下4个选项中，属性窗口未包含的是（ ）。

A、对象列表 B、工具箱 C、属性列表 D、信息栏 2．事件的名称（ ）。

A、都是由系统预先定义 B、都要由用户定义 C、有的由用户定义，有的由系统定义 D、是不固定的 3．窗体的caption属性值是（ ）类型的数据。 A、整型 B、字符型 C、逻辑型 D、实型

4．．改变控件在窗体中的左右位置应修改该控件的（ ）属性。 A、Top B、Left C、Width D、Right 5．为了装入一个VB应用程序，应当（ ）。 A、分别装入工程文件和标准模块文件 B、只装入窗体模块文件

C、只装入工程文件

D、分别工程文件、窗体文件和标准模块文件 6．以下进入代码窗口的方法中错误的是（ ）