大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
凤县网站建设公司创新互联公司,凤县网站设计制作,有大型网站制作公司丰富经验。已为凤县上千家提供企业网站建设服务。企业网站搭建\成都外贸网站制作要多少钱,请找那个售后服务好的凤县做网站的公司定做!
If TextBox1.Focus Then : TextBox1.Text = Val(TextBox1.Text) * 10 + 1 : Else : TextBox3.Text = Val(TextBox3.Text) * 10 + 1 : End If
End Sub
或
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Focus Then
TextBox1.Text = Val(TextBox1.Text) * 10 + 1
Else
TextBox3.Text = Val(TextBox3.Text) * 10 + 1
End If
End Sub
楼主只是单纯的格式错误而已。
If...Then... 是可以
If...Then...Else 是不存在的
需要一行内用到的话,必须还要跟个End If,也就是
If...Then...Else...End If
当然最好还是分行写,自己以后修改也容易看
If 条件1 Then
' 代码
ElseIf 条件2 Then
' 代码
ElseIf 条件2 Then
' 代码
Else
' 代码
End If
其中ElseIf行与Else行,在不需要时都可以不写。
1、语言之间具有互通性(这是一个前提基调);
2、比如在java或者c/c++中,在循环中进行一个判断,如果判断成功或者不成功,那么就可以设置一个关键字break来跳出这个循环哦;
3、这个break的作用的就是当你判断实现或者未实现这个判断语句时,你像不需要再进行循环或者判断,那么可以用这个break关键字来发挥作用哦。
while为条件循环,for为计数循环。一般情况下,WHILE可替代FOR,反之则不然。