vb试题程序怎么编写

VB Mscomm控件基本介绍

VB Mscomm控件

一、MSComm控件的主要属性、事件

1、MSComm的属性

Commport：设置或返回串口号。 如设成1（默认值），表示对Com1进行操作。 Settings：以字符串的形式设置或返回串口通信参数。包括串口通讯的比特率，奇偶校

验，数据位长度、停止位等。其默认值 是“9600,N,8,1”，表示串口比特率是

9600bit/s，不作奇偶校验，8位数据位，1个停止位。

Portopen：设置或返回串口状态。值为True时打开串口，值为False时关闭串口。 InputMode：设置或返回接收数据的类型。若值为0，则表示以文本形式读取；值为1，

则表示以 二进制形式读取。

Inputlen：设置或返回一次从接收缓冲区中读取字节数。 InBufferSize：设置或返回接收缓冲区的大小，缺省值为1024字节。

InBufferCount：设置或返回接收缓冲区中等待计算机接收的字符数。 当将其值设为0

时，则输入寄存器将被清空。

Input：从接收缓冲区中读取数据并清空该缓冲区，该属性设计时无效，运行时只读。

OutBufferSize：设置或返回发送缓冲区的大小，缺省值为512

modbus rtu协议可以算是一种事实上的工业标准协议，为许多仪表、PLC等所支持。以前有几个用户问如何使用VB编程来与我们的KND-K3系列PLC通讯，于是整了一个demo程序。这次把这个demo共享，希望能给大家一点帮助。

1） 模块文件：modCRC，其中包含了CRC校验的函数。

'data 待校验的数组名称 'no 数组中元素个数

'btLoCRC 算出的CRC高字节 'btHiCRC 算出的CRC低字节

Public Function CalCRC16Fast(data() As Byte, no As Integer, btLoCRC As Byte, btHiCRC As Byte) As String

Dim CL As Byte, CH As Byte '多项式码&HA001 Dim SaveHi As Byte, SaveLo As Byte Dim i As Integer Dim Flag As Integer

btHiCRC = &HFF btLoCRC = &HFF

modbus rtu协议可以算是一种事实上的工业标准协议，为许多仪表、PLC等所支持。以前有几个用户问如何使用VB编程来与我们的KND-K3系列PLC通讯，于是整了一个demo程序。这次把这个demo共享，希望能给大家一点帮助。

1） 模块文件：modCRC，其中包含了CRC校验的函数。

'data 待校验的数组名称 'no 数组中元素个数

'btLoCRC 算出的CRC高字节 'btHiCRC 算出的CRC低字节

Public Function CalCRC16Fast(data() As Byte, no As Integer, btLoCRC As Byte, btHiCRC As Byte) As String

Dim CL As Byte, CH As Byte '多项式码&HA001 Dim SaveHi As Byte, SaveLo As Byte Dim i As Integer Dim Flag As Integer

btHiCRC = &HFF btLoCRC = &HFF

《工业控制计算机》!""#年$%卷第#期#

用&’编写()*客户端程序的方法

刘

（!!+""$）莉淮安信息职业技术学院电气系

’()*+,-*

()*?10B;L34<46<5L<1L/016@320::95;2<6;0540/;5L9461;<7/;37L<??<1<694FM@;4?<?31;5610L92346@3632@5;2<720130/()*<5L@0N60L3B370?()*27;356<??7;2<6;05N;6@&’F

./012+3)O()*P27;356<??7;2<6;05P&’

摘

端程序。

客户端，

关键词：()*，&’

在工业自动化领域，以往应用软件开发商都要为每一硬件开发驱动程序，而由于硬件的种类繁多，特征各异，软件开发商的负担可想而知，尤其是如果硬件特征发生了变动，整个应用软件相应的驱动程序也要相应地改动，这对开发商，对整个工程都是很不利的。而且由于驱动程序的不同，不同应用程序访问同一硬件设备时常常产生冲突。()*,(-./01)102344*0561078技术正是在

用VB编写一个简单的电话号码查找程序

用VB编写一个简单的电话号码查找程序
（加入日期:2002-7-15）
【收藏文章】【对此文发表评论】【保存文章至硬盘】【打印文章】【字体：大 中 小】

分享到：
-
南京电视台 张阳

---- 本人供职于南京电视台播控中心。在日常播出过程中有时会遇到一些突发事件，需要及时向有关部门和有关领导请示，常为找不到电话号码而着急。为此，本人用Visual Basic编写了一个简单的应用程序，运行该程序即可方便、快捷地查找到相关的电话号码。

---- 首先将该程序的运行界面介绍给读者(图略)。

---- 运行该程序时首先出现图一所示的界面。如果要查找有关单位的电话号码，我们只需在有关单位右边的组合框的向下箭头上用鼠标点一下，这时出现图二。用鼠标拖动滚动条找到相关单位的名称再点一下，这时出现图三。看！我们需要的电话号码这么简单就找到了！如果我们要查找有关领导的电话号码操作步骤同上，这时屏幕上还会显示其相应的寻呼及手机号码。

---- 下面向读者简单介绍一下该程序的Visual Basic代码。我们首先进行界面的设计。这一步工作主要是为了给读者一个良好的视觉效果，一个友好的程序运行界面，使读者操作起来感到方便、快捷。我们只要将

VB编写上位机实例 用VB编写上位机实例

16:14:22 UTC+0800Sun Apr 1 2007 用VB6.0编写第一个串口通信上位机程序

Visual Basic6.0是一个可视化窗口环境的编程软件，目前使用Visual Basic6.0可以快速简单编写单片机中的串口通信上位机程序。 电子制作 HPOO

下面我们以一个完整的通信试验为例子完成如何用Visual Basic6.0编写单片机串口通信程序。

打开安装好后的Visual Basic6.0主程序界面。选择“标准EXE”。如图1显示，建立Visual Basic的编程环境。

图1

在菜单的[工程]选项中选择[部件]，如图2。把Visual Basic的串口通信控件Microsoft Comm control 6.0调入工作菜单。

图2

在打开[部件]对话框中，选择Microsoft Comm control 6.0的选项框，点击[确定]。图3

图3

可以在图示3中可以看通信控件Microsoft Comm control 6.0的文件是在C:\\WINNT\\system32\\MSCOMM32.OCX文件。

如果大家在首次调用通信控件Microsoft Comm

1.要使一个标签能够显示所需要的文本，应设置该标签的( )属性的值(单) A.Caption B.Name C.Text D.AutoSize

2.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为( )(单)

A.5 B.300 C.500 D.5000

3.下列的( )对象支持KeyPress事件(单)

A.文本框 B.命令按钮 C.标签框 D.图像框 4.确定一个控件在窗体上的位置的属性是( )(单)

A.Width或Height B.Top和Height C.Top或Width D.Top和Left 5.确定一个窗体或控件的大小的属性是( )(单)

A.Width或Height B.Top和Width C.Top或Left D.Top和Left

6.用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，这称为( )(单)

A.面向对象的程序设计 B.结构化程序设计 C.事件驱动的编程机制 D.程序设计 7.在VB中，工程文件的扩展名是( )(单) A..fr

模拟试题二

一、单选题

1. 以下关于Visual Basic特点的叙述中，错误的是 B 。 (A) 构成Visual Basic程序的多个过程没有固定的执行顺序 (B) Visual Basic程序只能编译运行

(C) Visual Basic是采用事件驱动编程机制的语言

(D) Visual Basic是结构化程序，具备结构化程序的三种基本结构 2. 有程序代码如下:C

Tex1.Text=\

则Tex1、Text、\分别代表

(A) 对象、值、属性 (B) 对象、方法、属性

(C) 对象、属性、值 (D) 属性、对象、值 3. 下面关于对象的描述中， B 是错误的。

(A) 在Visual Basic中，对象所能响应的事件是由系统定义的

(B) 对象的任何属性既可以通过“属性”窗口设定，也可以通过程序语句设定 (C) Visual Basic中允许不同对象具有相同属性和方法 (D) Visual Basic中的对象具有自己的属性和方法

第一套试题

一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C )

（A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量 （B）事件 （C）属性 （D）方法 3. \\、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\\ （B）/ （C）Mod （D）*

4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置 （A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption

6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢

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> 当条件不满足时，执行