把你的问题放到一个数组里面，然后随机生成，你可以参考下面的代码
创新互联是专业的易门网站建设公司，易门接单;提供成都网站设计、网站建设、外贸网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行易门网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str As String
Dim sp() As String
Dim rnd = New System.Random()
str = "1+1=? 1+2=? 1+3=?"
sp = Split(str, " ")
Me.Text = sp(rnd.Next(0, 2))
End Sub
一、下面的 _A___ 是合法的变量名。
A) X_yz
B) 123abc
C) Integer
D) X-Y
二、下面的 __A__ 是合法的单精度型变量。
A) num!
B) sum%
C) xinte$
D) mm#
三、下列可以作为变量名的是 _A___。
A) Chinese$
B) X(X+Y)
C) 123BOOK
D) BOOK-1
四、以下各项，可以作为变量名的是 __A__。
A) English
B) 11_English
C) 123.45
D) English-1
五、在 VB.NET 中，认为 __B__ 中的两个变量名是相同的。
A) English 和 EngUsh
B) English 和 ENGLish
C) English 和 Engl
D) English 和 England
六、语句 Dim MyVar 定义的变量 MyVar 为 __D__ 类型的变量。
A) Integer
B) String
C) Boolean
D) Object
七、语句 Dim intX，intY As Double 中所定义的变量 intX 是 __B__ 变量。
A) String
B) Object
C) Single
D) Double
八、下列符号常量的声明中，不合法的是 _B___。
A) Const A As Single = 1.5
B) Const A As Double = Sin(1)
C) Const A = "OK"
D) Const A As Integer = 1.5
九、在默认的状态下，系统对使用的变量要求显式声明，若要对变量不声明而直接使用（隐式声明），须在模块中所有程序代码的最前面加入语句 _B___。
A) Option Base 0
B) Option Explicit Off
C) Option Explicit On
D) Option Compare
十、下述说法不正确的是 __B__。
A) 变量名的长度不能超过1023个字符
B) 变量名可以包含小数点或者内嵌的类型声明字符
C) 变量名不能使用关键字
D) 变量名的第一个字符必须是字母或汉字
asp:RadioButton ID="RadioButton1" runat="server" Text="A." GroupName="group1"/
asp:RadioButton ID="RadioButton2" runat="server" Text="B." GroupName="group1" /
asp:RadioButton ID="RadioButton3" runat="server" Text="C." GroupName="group1" /
asp:RadioButton ID="RadioButton4" runat="server" Text="D." GroupName="group1" /
div
asp:CheckBox ID="CheckBox1" runat="server" Text ="A." /
asp:CheckBox ID="CheckBox2" runat="server" Text ="B." /
asp:CheckBox ID="CheckBox3" runat="server" Text ="C." /
asp:CheckBox ID="CheckBox4" runat="server" Text ="D." /
/div
额 这 我倒是知道一款asp.net的=。 =叫KesionIexam它可以实现单选题多选题和简答题，还有填空题判断题等等，只要按格式把试题编写好整卷录入就可以在前台看到它咯！
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
MessageBox.Show(ListBox1.SelectedItem.ToString)
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
For i As Integer = 0 To 10
ListBox1.Items.Add(i.ToString)
Next
End Sub
'''''''选择多项
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
For i As Integer = 0 To 10
ListBox1.Items.Add(i.ToString)
Next
ListBox1.SelectionMode = SelectionMode.MultiSimple
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim item
For Each item In ListBox1.SelectedItems
MessageBox.Show(item.ToString)
Next
End Sub
1。当进入VB.NET集成环境，发现没有显示“工具箱”窗口，应选择 （视图）菜单的 选项，使“工具箱”窗口显示，并最好将其窗口的属性设置为（visable可见的 ）。
2.对象的属性是指对象的背景色,长度,名称等；对象的方法是指对属性所进行的操作，就是一个对象自己所属的函数，如对对象取整，使对象获得焦点，使对象获得个随机数等等一系列操作。
3.当对命令按钮的Image属性装入.bmp图形文件后，按钮上并没有显示所需的图形，原因是没有对STYLE属性设为1(Graphical).
