VB选择结构几个经典例子

作者&投稿:冉欣 (若有异议请与网页底部的电邮联系)
关于VB选择结构(嵌套)的问题~

If条件1 Then
语句块1
ElseIf 条件2 Then
语句块2
ElseIf 条件3 Then
语句块3
。。。。
ElseIf 条件n Then
语句块n
Else
语句块n+1
End If

明白了不?

通常叫做缩进格式!!!
If Then
If Then
.....
Else
......
End if
Else
If Then
.....
Else
......
End if
End If

1、
if x>3 then x=3
2、
if x>3 then x=3 else x=0
3、
if x>3 then 
 x=3
else
 x=0
endif
4、
if x>3 then 
 x=3
elseif x<3 then
 x=0
else
 x=-1
endif
5、
select case x
 case is>3
  x=3
 case is<3
  x=0
 case else
  x=-1
end select



VB编程,求教选择结构
窗体上放2个文本筐用于显示输入的数据和进行排序后的数据,1个标签,2个命令按纽 代码如下(直接拷贝),如下图所示 Option Explicit: Dim max As Double, max1 As Double, min As Double, a(2) As Double, i As Integer, str As String, t As Double Private Sub Command1_Click()For i ...

帮忙编2个选择结构的VB程序
1题 Private Sub Command1_Click()a = InputBox("输入上网时间")If a < 10 Then b = 30 If a >= 10 And a < 50 Then b = a * 2.5 If a >= 50 Then b = a * 2 If b > 150 Then b = 150 End If End If MsgBox "你当月的消费为:" & b End Sub 2题 Private Sub...

VB题目,选择结构
Private Sub Command1_Click()If Trim(Text1.Text) = "" Then MsgBox "正确填写数据"Exit Sub End If a = Val(Text1.Text)If a < 1000 Then b = a: s = "实付款"If a >= 1000 And a < 2000 Then b = a * 0.9: s = "按商品价9折付款"If a >= 2000 And a < 3000 ...

结构化程序设计的三种基本结构是什么。各有什么特点
图中的S1和S2表示;两个处理步骤,这些处理步骤可以是一个非转移操作或多个非转移操作,甚至可以是空操作,也可以是三种基本操作中的任意一种结构,整个顺序结构只有一个入口点a和一个出口点b。这种结构的特点是:程序从a出开始,按顺序执行所有操作,知道出口b处,所以称为顺序结构。第二种:选择结构...

计算机算法有哪几种基本结构?
2、条件结构:条件结构是指在算法中通过对条件的判断,根据条件是否成立而选择不同流向的算法结构。条件P是否成立而选择执行A框或B框。无论P条件是否成立,只能执行A框或B框之一,不可能同时执行A框和B框,也不可能A框、B框都不执行。一个判断结构可以有多个判断框。3、循环结构 在一些算法中,经常...

用传统流程图表示求解以下算法:1、有两个瓶子A和B,分别盛放醋和酱油...
开始 ↓ A=>i ↓ B=>t → t=>i ↓ | i=>t |(竖线全都连起来,在t=>i下面)↓ ←| 输出(可省略)↓ 结束 计算机语言只是一种工具。光学习语言的规则还不够,最重要的是学会针对各种类型的问题,拟定出有效的解决方法和步骤即算法。有了正确而有效的算法,可以利用任何一种计算机高级语言...

数据结构题。答案选择B,麻烦解释下。
首地址是BA 那么 A[1,1]地址就是BA 然后每个数组元素展3个字节即3个内存地址 以列为主 A[1,1] A[2,1] A[3,1] 同理一直到A[8,1] 然后下一个就是A[1,2] 一直到A[4,8]共60个数组元素(8*7+4=60) 下一个地址即是A[5,8]的地址 BA+3*60 就是答案B了 ...

c语言选择结构题
第二个if, || 运算, 从左向右计算, 只要满足一个条件, 判定终止. 首先判定c是否等于3, 失败(c的值是2, 不等于3), 从而判定第二个条件, 这个条件又是一个赋值表达式, d变成了-1, 不为0, 判定结果为真, 整个if的条件为真, 所以执行a=5 此时, a=5, b=1, c=2, d=-1 因此, 选...

结构化设计方法及编程语言有何特点?它们有哪几种基本控制结构?
由图中可见,在结构的入口点a处是一个判断框,表示程序流程出现了两个可供选择的分支,如果条件满足执行s1处理,否则执行s2处理。值得注意的是,在这两个分支中只能选择一条且必须选择一条执行,但不论选择了哪一条分支执行,最后流程都一定到达结构的出口点b处。前面的图1-3中就采用了双选择结构流程图。当s1和s2中...

c\/s,b\/s,c\/中间层\/s比较
B\/S结构的软件所有的维护、升级工作都只在服务器上进行,而客户端就能获得最新版本的软件。 相对于C\/S结构,尽管C\/S结构相对于更早的文件服务器来说,有了很大的进步,但与B\/S相比,缺点和不足是很明显的。 首先,B\/S比C\/S的维护工作量大大减少了。C\/S结构的每一个客户端都必须安装和配置软件。假如一个企业...

突泉县18094511678: VB选择结构几个经典例子 -
翠睿丁克: 1、 if x>3 then x=32、 if x>3 then x=3 else x=03、 if x>3 thenx=3 else x=0 endif4、 if x>3 thenx=3 elseif x x=0 else x=-1 endif5、 select case x case is>3 x=3 case is x=0 case else x=-1 end select

突泉县18094511678: VB6.0. 写出几种常用选择结构的语句格式 -
翠睿丁克: 1. If Then2. If Then(Else) End If3. Select Case 变量名 Case Is Case a To b...Case Else End Select4. IIf(条件,a,b) 若条件为真则a,条件为假则b

突泉县18094511678: VB试题 8.请写出几种常用选择结构的语句格式? -
翠睿丁克: 1、 if …… then分支结构 if condition then 单行形式 或者: if condition then statements end if 2、 if …… then …… else 分支结构if condition then else statement 单行形式 或者: if condition then statements1 else statements2 end if 3、switch语...

突泉县18094511678: 选择结构案例编辑有哪些?
翠睿丁克: 选择结构案例编辑例如:C语言的选择结构为:if(条件表达式1){语句块1;}elseif(条件表达式2){语句块2;}elseif(条件表达式3){语句块3;}...else{语句块n;}VB中...

突泉县18094511678: vb选择结构,四则运算 -
翠睿丁克: vb写的四则运算如下: Private Sub Command1_Click() On Error GoTo errDim s As Object Dim Bds As String '表达式Set s = CreateObject("MSScriptControl.ScriptControl") s.Language = "VBScript" Bds = Text1Text2 = s.Eval(Bds) Exit Suberr: Text2 = err.DescriptionEnd Sub

突泉县18094511678: VB中选择结构是如何使用的 -
翠睿丁克: 选择结构??SELECT CASE? Private Sub Form_Load() Text1 = "1" End Sub Private Sub Command1_click() select case text1 case "1" msgbox "a" Case "2" Msgbox "b" End Select End Sub

突泉县18094511678: 求VB所有语言及其结构(举个例子哦,我才初一) -
翠睿丁克: 顺序结构都一样,都是线形的 选择结构? 汇编: cmp ax,** je a1 ****** jmp over a1: j** a2 *** jmp over a2: ................. over: vb: select case * case 1 case 2 ... end select 循环: 汇编: mov cx,次数 s loop s vb: for i=1 to 次数 next

突泉县18094511678: vb求一个选择法排序的实例,最好有详细说明和解释. -
翠睿丁克: Private Sub Command1_Click() Dim x(1 To 5) As Integer Dim n, i, j As Integer n = 5 For i = 1 To nx(i) = Val(InputBox("请输入")) Next For i = 1 To n - 1For j = i + 1 To nIf x(i) > x(j) Thentemp = x(i): x(i) = x(j): x(j) = tempEnd IfNext j Next i For i = 1 To 5Print x(i); Next End Sub

突泉县18094511678: vb如何利用选择法排序?请例举例子
翠睿丁克: a = Array(12, 32, 23, 14, 59, 41) b = UBound(a) For i = 0 To b - 1 For j = 0 To b - 1 - i If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t Next j Next i For i = 0 To b Print a(i); Next i

突泉县18094511678: vb选择结构 -
翠睿丁克: 写了一个函数,用来判断是否是三角形以及返回三角形的类型.你在应用程序里面调用这个函数就应该没有问题了.Private Function makeTriangle(ByVal a As Double, ByVal b As Double, ByVal c As Double, ByRef TriangelType As Short) As ...

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网