我想用vb做一个随机点名,获取了系统时间的秒,来当随机数。功能已经初步实现。
我打算继续完善一下,用一个数组存储学生姓名,再输出对应学生姓名。
目前还在测试阶段,代码一点都不完善。
以下是我的代码:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
getanum()
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Sub getanum()
Dim atime As String
atime = CStr(Now)
Dim asecond As String
asecond = Microsoft.VisualBasic.Right(atime, 2)
'MsgBox(asecond)
TextBox1.Text = asecond
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Loa
End Sub
End Class
我前天刚捡起来学习vb。所以有以下问题:
1.存学生名字的数组需要单独建立一个sub么?
2.如何再输出数组元素的时候,调用getanum()当中获得的数字
(3).学生名字数组只能一个一个添加么,能否添加一个excel表格 //这一天先不用管
点击按钮1 出现个随机数
点击按钮2 出现数组中对应的名字