2014 年 2月 20 日随笔档案 - vinsonLu

2014年2月20日

摘要： ```vbnet Private Sub random(ByVal num As Integer, ByVal min As Integer, ByVal max As Integer) Dim i As Integer = 1 Dim number As Integer Dim numbers As String = "" While i 0 number = CInt(Rnd() * (max - min + 1) + 1) End While numb... 阅读全文

posted @ 2014-02-20 11:43 vinsonLu 阅读(530) 评论(0) 推荐(0)

vb 取得桌面路径

摘要： ```vbnettxtPath.Text = System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)``` 阅读全文

posted @ 2014-02-20 11:24 vinsonLu 阅读(1952) 评论(0) 推荐(0)