在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

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

如题所示，本文是使用VHDL语言编写的IIC 总线的24C02的读写例程，程序加了中文注释便于想我一样的初学者理解，写使用的写一个字节，读使用的随机读，具体参考24c02的手册

library IEEE;

use IEEE.std_logic_1164.all; use IEEE.std_logic_arith.all; use IEEE.std_logic_unsigned.all;

entity iic_com is port( clk: in STD_LOGIC; rst_n: in STD_LOGIC; sw1_en: in STD_LOGIC; --读使能 sw2_en: in STD_LOGIC; --写使能 scl: out STD_LOGIC; sda: inout STD_LOGIC; dis_data: out STD_LOGIC_VECTOR (7 downto 0) );

end entity iic_com;

architecture iic_communication of iic_com is signal sw_state: STD_LOGIC; signal cnt

mathematics

Basic Matrix Operations

>> a=[1 2 3 4 5]生成矩阵； >> b=a+2矩阵加上数字 >> plot(b)画三点图 >> grid on生成网格 >> bar(b)生成条状图

>> xlabel('sample#') 给X轴加标注 >> ylabel('pound') 给Y轴加标注 >> title('bar plot')加标题 >> plot(b,'*')用*表示点

>> axis([0 10 10 20 0 20])各个轴的范围 >> A = [1 2 0; 2 5 -1; 4 10 -1] >> B=A'转置 >> C=A*B矩阵相乘 >> C=A.*B数组相乘 >> X=inv(A)逆 >> I=inv(A)*A单位矩阵 >> eig(A)特征值

>> svd(A) the singular value decomposition. 奇异值分解

>> p = round(poly(A))生成特征多项式的系数 >> roots(p) 特征多项式的根，即矩阵的特征值 >> q = conv(p,p) 向量的卷积 >> r = conv(p,q) 再向量的卷积 >

VC控件MSComm编写串口通信程序（转）

博客分类：

?

C++

VC++编程数据结构MFCMicrosoft

在众多网友的支持下，串口调试助手从2001年5月21日发布至今，短短一个月，在全国各地累计下载量近5000人次，在近200多个电子邮件中，20多人提供了使用测试意见，更有50多位朋友提出要串口调试助手的源代码，为了答谢谢朋友们的支持，公开推出我最初用VC控件MSComm编写串口通信程序的源代码，并写出详细的编程过程，姑且叫串口调试助手源程序V1.0或VC串口通讯源程序吧，我相信，如果你用VC编程，那么有了这个代码，就可以轻而易举地完成串口编程任务了。（也许本文过于详细，高手就不用看） 开始吧：

1.建立项目：打开VC＋＋6.0，建立一个基于对话框的MFC应用程序SCommTest（与我源代码一致，等会你会方便一点）；

2.在项目中插入MSComm控件 选择Project菜单下Add To Project子菜单中的 Components and Controls?选项，在弹出的对话框中双击Registered ActiveX Controls项（稍等一会，这个过程较慢），则所有注册过的ActiveX控件出现在列表框中。选择