正在加载图片...
7.1If语句 「例7.1输入 开始 编写代码 Private sub comm dim max as single Dim max As single Dim min As Single t max=Val(TextIText min= Val(Text2 Text) If max min then max min Label. Caption=”较大值为&mmx End sub 注意: 令块if语句中的 end if能否省略? 将块if语句改为单行i语句怎么改?例7.1 输入两个数,输出较大的数。 ▪ 编写代码: Private Sub Command1_Click() Dim max As Single Dim min As Single max = Val(Text1.Text) min = Val(Text2.Text) If max < min Then max = min End If Label3.Caption = "较大值为" & max End Sub F T max=min max<min? 开始 dim max as single dim min as single max=val(text1.text) min=val(text2.text) 结束 注意:Label3.Caption = "较大值为" & max  块if语句中的end if能否省略? Dim max As Single Dim min As Single max = Val(Text1.Text) min = Val(Text2.Text) If max < min Then max = min Label3.Caption = "较大值为" & max 注意:  块if语句中的end if能否省略?  将块if语句改为单行if语句怎么改? If max < min Then max = min 7.1 If语句
<<向上翻页向下翻页>>
©2008-现在 cucdc.com 高等教育资讯网 版权所有