'//给你一个例子 '//周杰伦的回到过去 Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Form_Load() playsnd 587, 100: playsnd 784, 100: playsnd 880, 100: playsnd 988, 100:: playsnd 988, 200: playsnd 0, 100 playsnd 988, 100: playsnd 880, 100: playsnd 988, 100: playsnd 1047, 200: playsnd 988, 100: playsnd 988, 100 playsnd 880, 100: playsnd 100, 150: playsnd 880, 100: playsnd 784, 100:: playsnd 988, 100: playsnd 0, (5) playsnd 988, 100: playsnd 0, (5)::: playsnd 988, 100: playsnd 0, (5):::: playsnd 988, 100: playsnd 880, 100 playsnd 784, 100: playsnd 740, 100: playsnd 784, 200: playsnd 100, 200:: playsnd 784, 100: playsnd 880, 100 playsnd 784, 100: playsnd 988, 100: playsnd 0, (5)::: playsnd 988, 100:: playsnd 0, (5)::: playsnd 988, 100 playsnd 0, (5)::: playsnd 988, 100: playsnd 100, 100: playsnd 587, 100:: playsnd 784, 100: playsnd 1175, 100 playsnd 0, (5)::: playsnd 1175, 99: playsnd 988, 100: playsnd 0, (5):::: playsnd 988, 100: playsnd 0, (5) playsnd 987, 100: playsnd 100, 100: playsnd 784, 100: playsnd 0, (5):::: playsnd 784, 100: playsnd 880, 200 playsnd 784, 100: playsnd 0, (5)::: playsnd 784, 100: playsnd 0, (5):::: playsnd 784, 50:: playsnd 659, (50) playsnd 784, 100: playsnd 659, 100: playsnd 784, 100: playsnd 880, 100:: playsnd 100, 100: playsnd 587, 110 playsnd 784, 120: playsnd 880, 130: playsnd 740, 140: playsnd 784, 200:: playsnd 1, 1::::: playsnd 1, 1 End Sub Function playsnd(ByVal x As Long, y As Long) Beep x, y * 3 DoEvents End Function

原理都明白 不过这个东西真让人服啊

你现在学vb呢么？

我现在乱的不知道应该学什么 乱学呢 感觉哪个都会点 还得请教请教你跟我说我应该按啥顺序学 我现在没别的 就是有时间

时间就是财富。利用好就是财富。学什么都可以，精通了都是财富。

我现在正在学sql server 呢，也不太了解什么适合你呢？反正我喜欢编程，你的优点挺多，歌唱的挺好，写作也不错，游戏也玩得很精，你计算机方面也不错，不过你可能把这些当作一个业余爱好。不过总之，这些方面或其它方面的某一方面得非常非常的精通，作为自己的立足之本，其它的只能作为点缀。当然这些道理大家都懂，我也不多说，关键要快点选择，选对，选完，行动就可以了。很简单。简单得谁都懂。

我看看学哪个 这几天又有面试机会了 嘎嘎…… 欢迎挫我 mlbd