问一个关于选择结构的VB习题

1你说大于100,没说等于,那应该是 x > 100 And x Mod 5 = 0 吧

20

3Len(Text1Text)

4Text1SelText

SelStart 和 SelLength 是属性,在ActiveX中既有Property Get 也有 Property Let 即既能获得属性值 也可以对属性赋值

i = Text1SelStart '得到选定开始位置

Text1SelStart = i '设定选定开始处为i

点击命令按钮，可以把文本框1中的百分成绩，转换为“及格”或“不及格”显示在文本框2中：

Private Sub Command1_Click()

If Val(Text1) >= 60 Then text2 = "及格" Else text2 = "不及格"

End Sub

随机产生10个50-200的整数求其中最大值VB程序，需要采用的程序结构是：顺序结构、选择结构和循环结构都是需要的。

Private Sub Command1_Click()

Print "产生的50个随机整数是："

Randomize

For i = 1 To 50

x = Int(Rnd 151) + 50

Print x;

If x > Max Then Max = x

If i Mod 10 = 0 Then Print

Next i

Print: Print "最大数="; Max

End Sub

以上就是关于问一个关于选择结构的VB习题全部的内容，包括:问一个关于选择结构的VB习题、VB中怎样用选择结构设计按不同的按钮使文本框显示不同的内容、随机产生10个50-200的整数求其中最大值VB哪种程序结构顺序结构选择结构等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！