首页 > > 程序设计 > VB >

vb高手搜集-常见问题总结(2)

2008-02-23 06:39:28来源：互联网阅读 ()

1 2 3 下一页

　　如何让程序在 Windows 启动时自动执行

　　有以下二个方法：

　　方法1: 直接将快捷方式放到启动群组中。

　　方法2:
　　在注册档 HKEY_LOCAL_MACHINE 中找到以下机码：\Software\Microsoft\Windows\CurrentVersion\Run
新增一个字串值，包括二个部份：

　　1. 名称部份：自己取名，可设定为 AP 名称。

　　2. 资料部份：则是包含 '全路径档案名称' 及 '执行参数'

　　例如：

　　Value Name = Notepad
　　Value Data = c:\windows\notepad.exe

　　在 TextBox 中如何限制只能输入数字

　　参考下列程序：

　　Sub Text1_KeyPress(KeyAscii As Integer)
　　If KeyAscii < 48 Or KeyAscii > 57 Then
　　KeyAscii = 0
　　End If
　　End Sub

　　TextBox 中能不接受某些特定字符(如 '@#$%")

　　方法有好几种, 以下列举二种：

　　方法1: 可以使用 IF 或 Select Case 一个个判断, 但如果不接受的字符多时, 较麻烦!

　　方法2: 将要剔除的字符统统放在一个字串中，只要一个 IF 判断即可 !! 如下：

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim sTemplate As String
sTemplate = "!@#$%^&*()_ -=" '用来存放不接受的字符
If InStr(1, sTemplate, Chr(KeyAscii)) > 0 Then
KeyAscii = 0
End If
End Sub

　　如何让鼠标进入 TextBox 时自动选定 TextBox 中之整串文字

　　这个自动选定反白整串文字的动作，会使得输入的资料完全取代之前在 TextBox 中的所有字符。

Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1)
End Sub

上一篇：利用vb实现“绿色”软件
下一篇： Visual Basic编程常见问题及解答

1 2 3 下一页

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有