全选文本框的内容
 
VB6
 

 
 
TextBox1.SetFocus    '获得焦点
TextBox1.SelStart = 0    '选取的起始位置设为0，即从头开始进行文本框内容的选取
TextBox1.SelLength = Len(txtUserName.Text)    '选取内容的长度为文本框已经接受的文本长度
 
 
 
VB.NET
 

 
 
TextBox1.Focus()        '文本框获得焦点
TextBox1.SelectionStart = 0     '选取的起始位置设为0，即从头开始进行文本框内容的选取
TextBox1.SelectionLength = Len(TextBox1.Text)       '选取内容的长度为文本框已经接受的文本长度
 
 
 
比较
 
 

     函数在VB和VB.NET中的功能是一样的，只不过是换了个名字。
 

  
 
感谢您的宝贵时间，祝生活愉快，谢谢~~
 
 
                                           —joker
 
 
 

 
关于同花顺等软件中部分汉字显示成方框的问题
 
1.有可能是输入法出现了问题，特别是搜狗拼音输入法运行过程中往往与其他软件不兼容(在其他软件运行时往往提示该软件遇到问题需要关闭)，但重新下载安装后，就有可能解决问题的。
 
2.极可能是你的机器中的系统自带的部分字体坏掉了，解决方案有两个：
 
(1)、进入同花顺软件的“系统设置”-->颜色字体，把“页面”、“表格”、“窗口”、“图形”、“标签”中的凡是字体名称为Arial及“Times news Roman”的分别替换回“Tohoma”及“宋体”。
 
(2)、第二个方案是重装操作系统。
 
3. 出现乱码可能是以下几点原因:
 
一、消除Windows系统乱码
 
如果Windows注册表中字体部分的配置不正常，就会导致系统乱码，例如Windows桌面、菜单、对话框等出现乱码，“写字板”、中文应用软件的界面和菜单也会乱码。对付这类乱码，你用内码翻译软件(如南极星、MagicWin98等)是无法消除的，建议采用以下两种方法消除:
 
1、导入注册表法
 
找到一台无乱码电脑(要求其上的Windows版本与乱码电脑相同)，在无乱码电脑上单击菜单“开始”/运行，键入REGEDIT打开注册表;定位到关于系统字体的项目处HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FontAssoc，单击“文件”菜单下的“导出”，导出范围选择“分支”(图1)，把该分支注册表信息导出到文件(例如LI.REG)中;
 
接下来把LI.REG文件COPY到乱码电脑上，然后在乱码电脑上打开注册表，选择“文件”/“导入”，把LI.REG文件导入注册表中，最后重启电脑即可。
 
2、手工修复注册表法
 
如果找不到无乱码电脑可以利用，你可以手工恢复乱码电脑的注册表，只需恢复字体部分注册表项即可，操作步骤如下:
 
在乱码电脑上单击菜单“开始”/运行，键入REGEDIT打开注册表;定位到HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FontAssoc，正常情况下，会有Associated
 
Charset、Associated
 
DefaultFonts两个目录，当出现汉字乱码时，下表两个目录中内容就会不完整，有的没有Associated
 
Charset目录、或其中内容残缺不全;有的Associated
 
DefaultFonts下内容残缺。只要你检查下表中的两个目录，根据表中的正确数据恢复注册表即可。
 
Associated Charset目录 Associated DefaultFonts目录
 
中文WinXP或Win2K
 
下正确内容
 
ANSI(00)="yes"
 
OEM(FF)="yes"
 
SYMBOL(02)="no"
 
AssocSystemFont="simsun.ttf"
 
FontPackage="新宋体"
 
FontPackageDecorative="新宋体"
 
FontPackageDontcare="新宋体"
 
FontPackageModern="新宋体"
 
FontPackageRoman="新宋体"
 
FontPackageScript="新宋体"
 
FontPackageSwiss="新宋体"
 
中文Win98
 
下正确内容
 
ANSI(00)="yes"
 
GB2312(86)="yes"
 
DEN(FF)="yes"
 
SYMBOL(02)="no"
 
AssocSystemFont="simsun.ttf"
 
FontPackageDecorative="宋体"
 
FontPackageDontcare="宋体"
 
FontPackageModern="宋体"
 
FontPackageRoman="宋体"
 
FontPackageScript="宋体"
 
FontPackageSwiss="宋体"
 
还有种可能就是Windows系统语系设定不正确，在控制面板里的语言选项里面改成中文，这样应该就好了。
 
二、消除应用程序(包括游戏)乱码
 
当你运行某些中文软件时，假如菜单等显示界面上出现乱码，你用上面的方法却不能消除，那就可能是软件的中文链接库被英文链接库覆盖引起的，这类乱码经常发生在用微软开发工具(例如VB、VC)开发的中文软件上。
 
因为你开发的这类软件，菜单等显示界面上的汉字都是受一个动态链接库(DLL文件)控制，这个动态链接库一般安装在Windows\System目录下，如果你以后安装了某个英文软件也使用同名的动态链接库，则英文软件的动态链接库就会覆盖原来的中文动态链接库，这样，运行中文软件时就会调用英文的动态链接库，因此出现乱码。解决办法是:重新安装一下中文软件，恢复中文动态链接库即可。
 
如果以上方法也无济于事，那就说明软件使用的内码与系统的语言编码不一致，对于Win9X/ME系统，只需安装MagicWin98(下载地址http://www.skycn.com/soft/3047.html)、南极星等内码转换软件，即可消除乱码;对于WinXP系统，建议你使用微软多语言支持工具MicrosoftAppLocale(下载地址http://www.skycn.com/soft/12582.html)，利用它为指定程序设置相应的语言区域，这样你同时执行简繁体、日文软件也不会发生冲突。
 
三、消除网页上的乱码
 
如果网页上出现乱码，那可能是浏览器(如IE)对网页语种辨认错误造成的。例如明明是中文网页，IE却选择了“欧洲语系”编码，因此网页上乱码就出现了，解决办法是:
 
在IE中点击“查看”菜单下的“编码”，选择“简体中文(GB2312)”，或者其他编码的简体中文;如果是繁体网页，则改为“繁体中文(BIG5)”，如果是其他语言，在“其他”菜单项下选择相应的编码。
 
四、消除链接Access文件的乱码
 
由于国外的免费主页空间容量大、而且支持ASP，于是许多朋友都使用这类主页空间，不过国外的ASP服务器一般不支持中文数据库，因此假如你的网页上有一个链接指向Access数据库文件，当你点击该链接打开Access文件时，文件中的中文内容就会显示乱码。
 
为了消除这种乱码，你可以在链接数据的那个文件中加入下面的句子:
 
＜%@ language="vbscript" codepage="936" %＞
 
假如还不能消除乱码，请将你的数据库版本改为Access97，这样即可让国外ASP服务器支持中文数据库，从而消除乱码了。
 
五、消除电子邮件乱码
 
收到对方编码后的信件，如果你使用的EMAIL软件(如OUTLOOK、Foxmail等)不能识别出信件所用的编码方法，自然就无法自动解码，这样就会出现邮件乱码。
 
解决办法:在Outlook2003/XP中，你可以选择“视图”菜单下的“编码”，随后出现的菜单中会有全部的汉字编码标准，你可以选择一种，顺序单击选择、直到邮件正文显示正确为止;Foxmail中，你可以点击菜单“查看”/编码，操作方法类似。
 
如果对方使用非中文Windows，你要给他发中文邮件，希望对方能看到你写的中文、而非乱码，可以这样操作:用画笔等绘图软件书写中文邮件，在图片中输入文字，将属性置为黑白模式(以减少图片体积)，然后用GIF格式保存，用WINZIP把它压缩成ZIP格式，作为附件在邮件中发送，这样不管对方在何语言平台下，都不会出现乱码。

 
文本框是一个文本编辑区。可以在设计阶段或运行期间在这个区域中输入、编辑、修改和显示文本，类似于一个简单的文本编辑器。
 
l-常用属性
 
文本框基本属性：
 
Name、text、：Height、Width、Top、Left、Enabled、Visible、FontName、FontSize、FontBold、FontItalic、FontUnderline、A
 
lignment、BorderStyle等。
 
文本框特有属性：
 
(1)Text文本属性
 
在文本框中显示正文的内容存放在Text属性中。
 
(2)．MaxI~ength属性
 
设置文本框中能够输入的正文内容的最大长度。0：缺省值，为系统允许的最长度；非零值：文本框中的字符数的最大值，一个英文字符与一个汉字都为1，整理发布。
 
(3)MultiI,ine属性
 
True：则可使用多行文本，即在文本框中输入或显示文本时可换行。按crtl+Enter键可以插入一个空行；False：则在文本框中只能输入单行文本。
 
(4)PasswordChar属性
 
该属性可用于口令输入。在默认状态下，该属性被设置为空字符串(不是空格)，当用户从键盘上输入时，每个字符都可以在文本框中显示出来。如果把PasswordChar属性设置为一个字符，例如星号(★)，则在文本框中输入字符时，显示的不是输入的字符，而是被设置的字符(如星号)。不过文本框中的实际内容仍是输入的文本，只是显示结果改变了。利用这一特性，可以用作设置口令的输入，，www.
 
。
 
(5)ScrollBars属性
 
该属性用来确定文本框中是否有滚动条。O—None：无滚动条；1一Hotizontal：加水平滚动条；2一Vertical：加垂直滚动条；3一Both：同时加水平和垂直滚动条。
 
说明：
 
当MuhiI,ine多行属性为True时，ScrollBars属性才有效。当文本框具有水平或垂直滚动条后，文本框中文本的自动换行功能不起作用，只能通过回车键换行。
 
(6)I,ocked属性
 
False：表示可以编辑，默认值为False；Tme：文本控件相当于标签的作用，不能被编辑。
 
(7)SelStart、SelLength、SelText属性
 
在程序中，对文本内容进行选择时，这3个属性用来标识用户选中的正文。
 
SelStart：选定正文的开始位置，第一个字符的位置是0。
 
Selcength：选定正文长度。
 
SelText：选定正文内容。
 
设置了SelStarl和SelI~ength属性后，VB会自动将设定的正文送入SelText属性存放。这些属性一般用于在文本编辑中设置插入点及范围，选择字符串，清除文本等，并且经常与剪贴板一起使用，完成文本信息的剪切、拷贝、粘贴等功能

在Visual Basic中，文本框（TextBox）是最常用的控件，熟练运用文本框是开发出高质量的应用程序的基础。笔者在从事应用程序开发中，摸索出有关文本框的应用技巧，写出来与VB爱好者共享。 
　　1、设置只读文本框
 
　　有些时候在窗口显示一段信息，但又不希望用户去改变它，怎样实现文本的只读呢？首先，我们可以利用标签框（label）的只读属性，以标签来代替文本框以实现只读属性，但也可以用小程序实现真正的文本框的只读。
 
 
  　　
Sub Text1_KeyPress (keyascii As Integer) 
　　keyascii = 0
 
　　End Sub
 
　　或者也可以用sendkey方法使文本框失去焦点，如以下程序：
 
　　Sub Text1_KeyDown (KeyCode As Integer, Shift As Integer)
 
　　SendKeys "{tab}"
 
　　End Sub
 
         或者直接设置控件的属性来实现，具体操作如下：
 
             设置Text1.Enabled=True，这样设置后Text1无法获得焦点
 
             设置Text1.Locked=True,这样设置后Text1可以获得焦点
 
        2、限定文本框的输入内容和格式
 
　　以下程序可以实现限定文本框只能输入数字：
 
 
        
 Private Sub Text1_KeyPress(KeyAscii As Integer) 
         If KeyAscii < Asc(0) Or KeyAscii > Asc(9) Then 
             KeyAscii = 0 
             MsgBox "请输入数字" 
         End If 
      End Sub 
　　若想限定文本框输入格式，可以使用VB的FORMAT函数，也可以使用专业版的屏蔽控件(Masked Edit)，通过设定屏蔽控件的Mask属性可以对文本框的输入格式作精确控制。
 
　　3、为TextBox创建快捷键
 
　　VB规定，添加在窗体上的控件均在其Tabindex属性中记载其加载顺序，程序运行时焦点按Tabindex属性规定的顺序在控件间跳转。而为了简化操作，可VB中为任何具有caption的属性的控制创建快捷键，这通过caption属性中在想作为快捷键的字母前加&号实现。但有一个问题值得注意，而类似文本框这样的控件无caption这样的属性，这时可将标签与文本框同时使用。为lable创建快捷键，标签Tabindex属性设置比文本框小1，又因为label不能接收按点，焦点会自动跳至文本框。这相当于为文本框创建了快捷键。具体步骤如下：
 
　　（1）首先绘制标签，再绘制文本框。或随意绘制各种控制，将标签Tabindex属性设置比文本框小1
 
　　（2）在标签的caption属性中使用“&”号设定快捷键
 
　　这样就相当于为文本框设定了快捷键，当你按下标签框的快捷键时，焦点就会跳至文本框上。
 
　　4、在设计时实现文本框换行
 
　　对于文本框，在设计属性窗口不能输入换行符，但可以再程序执行时用代码来换行，即使用ASCII字符的13和10，如下列小程序就可将两行文本放入文本框：
 
 
  　　
Sub form_load( ) 
　　NL=chr(13)+chr(10)
 
　　text1.text=“my name is”& NL &“liu qiang”
 
　　End sub
 
　　5、创建口令文本框
 
　　创建口令文本框可用设置属性的方法，也可以通过调用WINDOWS的API应用函数接口来实现。首先，文本框的属性Passwordchar和maxlength可用来设置口令框。其中Passwordchar指定文本框显示的字符，如指定“*”，则在文本框内显示“*”，Maxlength确定文本框中能输入几个字符。超过Maxlength以后，文本框发出警告声，不能接收更多的字符。若使用WINDOWS应用函数接口，可用GetWindowLong、SetWindowsLong和SendMessage等接口函数来实现，有兴趣的读者可查阅Windows API函数手册或VB的联机帮助文件，这里就不一一赘述了。