大家帮忙看下这代码有什么毛病

Question

本帖最后由 bcrun 于 2011-08-16 14:25:37 编辑

Answer 1

  A = CStr(Int(Rnd()*))
  B=CStr(Int(Rnd()*))
  C=CStr(Int(Rnd()*))Rnd()*    //错误表达式  正确的例子为Rnd()*10

Answer 2

    PictureBox1.Visible = False
    Dim A As String
    Dim B As String
    Dim C As String    A = CStr(Int(Rnd() * 10))
    B = CStr(Int(Rnd() * 10))
    C = CStr(Int(Rnd() * 10))    Label1.Caption = A
    Label2.Caption = B
    Label3.Caption = C
    If (A = "7") Or (B = "7") Or (C = "7") Then
        PictureBox1.Visible = True
        Beep
    End If
vb语法试验过了，但是我的机器没有音箱和耳机，楼主试试

Answer 3

楼主：这个代码的If条件部分VB2010说是有错误，VB2010说A,B,C的等号后面应该是表达式，怎么回事啊，求赐教

Answer 4

楼主：这个代码的If条件部分VB2010说是有错误，VB2010说A,B,C的等号后面应该是表达式，怎么回事啊，求赐教