vb转换为C#

来源：百度知道 编辑：UC知道 时间：2024/06/18 16:55:22
Public Function s7200_M2_set(MSComm1 As Object, Mx As Byte, My As Byte, Mv As Byte)
Dim str_write(0 To 37) As Byte
Dim str_val(0 To 5) As Byte
Dim Temp_FCS As Variant
Dim i As Long

str_write(0) = &H68
str_write(1) = &H20
str_write(2) = &H20
str_write(3) = &H68
str_write(4) = &H2
str_write(5) = &H0
str_write(6) = &H7C
str_write(7) = &H32
str_write(8) = &H1
str_write(9) = &H0
str_write(10) = &H0
str_write(11) = &H43
str_write(12) = &H1
str_write(13) = &H0
str_write(14) = &HE
str_write(15) = &H0
str_write(16) = &H5
str_write(17) = &H5
str_write(18) = &H1
str_write(19) = &H12
str_write(20) = &HA
str_write(21) = &H10
str_write(22) = &H1
str_write(23) = &H0
str_write(24) = &H1
str_write(25) = &H0

你函数都错了吧,有function的是有返回值的函数,sub是无返回值的

Public void s7200_M2_set(Object MSComm1 ,Byte Mx ,Byte My ,Byte Mv )
Byte[] str_write=new Byte[37] ;
Byte[] str_val()=new Byte[5] ;
Variant Temp_FCS ;
Long i;

str_write[0] = &H68 ;
str_write[1] = &H20 ;
str_write[2] = &H20 ;
str_write[3] = &H68 ;
str_write[4] = &H2 ;
str_write[5] = &H0 ;
str_write[6] = &H7C ;
str_write[7] = &H32 ;
str_write[8] = &H1 ;
str_write[9] = &H0 ;
str_write[10] = &H0 ;
str_write[11] = &H43 ;
str_write[12] = &H1 ;
str_write[13] = &H0 ;
str_write[14]= &HE ;
str_write[15] = &H0 ;
str_write[16] = &H5 ;
str_write[17] = &H5 ;
str_write[18] = &H1 ;
str_write[19] = &H12 ;
str_write[20] = &HA ;
str_write[21]= &H10 ;
str_write[22] = &H1 ;
str_write[23] = &H0 ;
str_write[24] = &H1 ;
str_write[25] = &H0 ;
str_write[26] = &H0 ;
str_write[27] = &H83 ;<