题目

某仓库对货物的编码规则为：货物类型（4-8位英文字母）货物编码（4-8位数字）货物校验码。货物编码的每一位数除以2产生的余数，倒序输出即是货物正确的校验码，现编写如下VB程序，如图在Text1中输入货物完整编码后，判定校验码是否符合标准，并在Label1中输出结果。 （1） 由程序可知，此程序中按钮的名称为。 （2） 请在划线处填入合适的代码。 Private Sub check_Click()     Dim s as string, ss as string, s1 as string, s2 as string     Dim i as integer, bz as integer         bz = 0     For i = 1 To Len(s)         ss = Mid(s, i, 1)         If ss = "-" Then             bz = bz + 1         ElseIf bz = 1 Then             s1 = CStr() + s1      ‘Cstr函数是在str的基础上去除前导空格         ElseIf bz = 2 Then             s2 = s2 + ss         End If     Next i     If  Then         Label1.Caption = "符合标准"     Else         Label1.Caption = "不符合标准"     End If End Sub 答案： 【1】check 【1】s=text1.text【2】val(ss) mod 2【3】s1=s2

查看本题答案和解析