VB与三菱FX全系列PLC通迅程序

工控常用的函数列表,功能十分全面,可以读取fx内部所有资源,x，y，m，d，t，c等寄存器,并有非常多的例程供大家学习.
对串口的操作非常的简单，mscomm控件，采用最传统的发送超时接收.可以改为用中断接收。
function send_recieve$(sxd$)
form1.mscomm1.output = sxd$
call delay(1000) 
form1.mscomm1.inputlen = resp_length%
rxd$ = form1.mscomm1.input
send_recieve$ = rxd$
end function
功能函数库如下，只要在vb工程中引用即可，所有功能都已经过测试。
fx2lib.bas
grpaddr.bas
devaddr.bas
例程

将8個位元(binary)值的字串转成10进制整数值
function bin8_to_dec%(binary_data$)
将8個位元(binary)值的字串转成2位hex码字串
function bin8_to_hex2$(binary_data$)
计算sum校验码
function chksum$(t$)
将十进制数转换成七段led码
function dec_to_7segment$(digit1$)
延时功能
sub delay(delay_n%)
强制位元为on或off
function force_bit$(relay$, value%)
将二位的十六进制转换成8位的二进制
function hex2_to_bin8$(hex_2digit$)
将二位十六进制进制数转换成十进制数
function hex2_to_dec%(hex_2digit$)
将四位十六进制数转换成十进制数
function hex4_to_dec&(hex_4digit$)
读取16位定时器值
function read_16bit_tc&(tc_no$)
读取32位计数器值
function read_32bit_cnt&(cnt_no$)
读取位元状态如x0，m0，y0
function read_bit$(relay$)
读取通道值
function read_nch$(relay$, nch%)
读取定时器或计数器值
function read_tc_coil$(tc_no$, out_rst_type$)
发送请求到plc并接收回应
function send_recieve$(sxd$)
写入位元状态
function write_bit$(relay$, value%)
写入通道值
function write_nch$(ch_no$, out_data$)
写入定时器计数器值
function write_tc_coil$(tc_no$, out_rst_type$, value%)
function group_data_addr$(b1$, ch_base%)
function group_address$(a$)
function tc_coil_group_address$(a$, out_rst%)
function tc_value_group_address$(a$)
function group_tcms_addr$(b1$, ch_base%)
function group_xy_addr$(b1$, ch_base%)
function device_address$(a$)
function device_xy_addr$(b1$, ch_base%)
function device_tcms_addr$(b1$, ch_base%)
代码下载:
http://www.promcu.com/
----------------------------------------------
此篇文章从博客转发
原文地址： Http://blog.gkong.com/more.asp?id=64957&Name=jiayoua