Vb.net 无法在vb中验证我的数据 Dim cel作为整数=0,fah作为整数=32 如果Len(cel)=3,则 当cel

Vb.net 无法在vb中验证我的数据 Dim cel作为整数=0,fah作为整数=32 如果Len(cel)=3,则 当cel,vb.net,Vb.net,你把cel=0放在。然后检查Len(cel)=3。在我的脑海里,我想不是。你用的是VB6还是VBA?这两种方法都不允许在声明变量时对其进行初始化,因此代码甚至不应在visual basic中编译。对不起,我在程序领域是个新手。确定您使用的语言是有用的第一步:)。然后适当地标记你的问题。在VBA中,您肯定需要将cel=0放在比Dim cel作为整数更晚的单独代码行上。除非使用VB.Net,否则不能在一条语句中同时执行这两项操作。请去掉“If Len(cel)=3 Then”和匹配的“End If”

你把
cel=0
放在。然后检查
Len(cel)=3
。在我的脑海里,我想不是。你用的是VB6还是VBA?这两种方法都不允许在声明变量时对其进行初始化,因此代码甚至不应在visual basic中编译。对不起,我在程序领域是个新手。确定您使用的语言是有用的第一步:)。然后适当地标记你的问题。在VBA中,您肯定需要将
cel=0
放在比
Dim cel作为整数更晚的单独代码行上。除非使用VB.Net,否则不能在一条语句中同时执行这两项操作。请去掉“If Len(cel)=3 Then”和匹配的“End If”,否则任何代码都不会运行。
  Dim cel As Integer = 0, fah As Integer = 32
    If Len(cel) = 3 Then
        Do While cel <= 100 And fah <= 212
            lblCel.Text = lblCel.Text & vbCrLf & cel
            cel = cel + 5
            lblFah.Text = CStr(HorizontalAlignment.Right)
            lblFah.Text = lblFah.Text & vbCrLf & fah
            fah = CInt(9 / 5 * cel + 32)
        Loop
    End If