文章分类 - VB.NET

VB.net 单实例运行

摘要：Imports System.Diagnostics Private Sub MenuForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If (UBound(Process.GetProcessesByName(Process.GetCurrentP... 阅读全文

posted @ 2007-07-06 16:21 将狼踩尽阅读(267) 评论(0) 推荐(0)

textbox中只能输入数字

摘要：Private Sub txtTransferAmount_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtTransferAmount.KeyPress If e.KeyChar >= "0" And e.KeyCh... 阅读全文

posted @ 2007-07-06 16:16 将狼踩尽阅读(95) 评论(0) 推荐(0)