vb中界面设计之Frame控件和TextBox的部分使用方法
2010-11-16 16:04
1461 查看
程序要求:设计一个运行界面如上图所示,当用户在“操作选项”框架中选定操作后,文本框发生相应的变化,同时在“操作说明”框架中的标签上显示有关的操作说明
现在开始:
1.设置属性值:
Private Sub Form_Load()
Option1.ToolTipText = "光标在文本的开始"
Option2.ToolTipText = "光标在文本的结尾"
Option3.ToolTipText = "光标在第三行的开始"
Option4.ToolTipText = "选定第三行"
Option5.ToolTipText = "选定所有文本"
End Sub
ToolTipText只是个起着帮助或提醒一样的作用,就是鼠标停在控件上时会显示一段文字的功能。
当点击Option控件时,激发Label控件显示相关的操作说明,代码如下(只列出一个,其他的类似):
Private Sub Option1_Click() '光标在文本的开始
Label1.Caption = "选定了光标在文本的开始"
Label1.ToolTipText = "选定了光标在文本的开始"
'此处还要写其他的代码,先空着
End Sub
2.根据程序的要求,可以利用 TextBox 的 SelStart和SelLength 属性,可以控制 TextBox 的插入点和选择行为(这些属性仅能在运行时使用)。首先,为了在 TextBox 控件中显示多行文本,要将 MultiLine 属性设置为 True。
获得焦点,即显示光标在文本框中用Text1.SetFocus
再选择光标位置,Text1.SelStart = 0,表示光标在文本框开头;Text1.SelStart = Len(Text1.Text),表示光标在文本框末尾。
那么如何让光标跳到第三行呢?那就得知道一行能输入多少个字节,我找了好久不知道用什么函数或方法求出一行能输入的字节数,所以我就用了一个愚笨的方法求出来了,代码如下(如果你们知道有什么其他的方法请告诉我下哈,先谢谢啦!):
Private Sub Option3_Click()
Dim x As Integer
x = Len(Text1.Text)
Text1.Text = x’我求出来的是57
End Sub
然后就把代码修改好如下(把刚才多余的代码注释掉):
Private Sub Option3_Click()
'Dim x As Integer
Label1.Caption = "选定了光标在第三行的开始"
Label1.ToolTipText = "选定了光标在第三行的开始"
Text1.SetFocus
'x = Len(Text1.Text)
'Text1.Text = x
Text1.SelStart = 57 * 2
End Sub
算出了一行所能输入的字节数,下面的步骤也就好做了,代码如下:
Private Sub Option4_Click()
Label1.Caption = "选定了第三行的所有字符"
Label1.ToolTipText = "选定了第三行的所有字符"
Text1.SetFocus
Text1.SelStart = 57 * 2
Text1.SelLength = 57
End Sub
Private Sub Option5_Click()
Label1.Caption = "选定了所有文本"
Label1.ToolTipText = "选定了所有文本"
Text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
那个windows live write还没弄好,代码就没那么好加亮。好了,就这样吧。
奇了怪了,下面没有vb这类编程语言。就放在‘面向对象’区吧!
相关文章推荐
- 在VB中使用IE的 WebBrowser控件改进界面设计
- 3.1如何编写程序界面&3.2常见控件使用方法
- Android学习笔记:界面设计Material Design的基本使用方法(一)
- VB报表设计中使用天宇报表控件
- 使用设计器创建带有 ListView 和 TreeView 控件的资源管理器样式的界面
- ListView使用自定义适配器的情况下实现适配器的文本和图标控件点击事件执行Activity界面中的方法
- [VB.NET]请问题如何使用 正值表达式 来控制使用者Textbox控件输入内容?
- 界面相互关联控件设计方法
- 使用AJAX的方法将TextBox控件和Calendar控件结合使用,点击TextBox后弹出Calendar控件
- ListView使用自定义适配器的情况下实现适配器的控件点击事件执行Activity界面中的方法
- ASP.NET中 TextBox 文本输入框控件的使用方法
- android学习笔记---53_采用网页设计软件界面,以及使用android系统内置的浏览器,利用js调用java方法
- 浅谈VB编程中网格控件的选用及使用方法
- ASP.NET中 TextBox 文本输入框控件的使用方法
- ASP.NET设计GridView控件的使用方法
- ASP.NET中TextBox使用Ajax控件显示日期不全的问题解决方法
- WPF中ContextMenu(右键菜单)使用Command在部分控件上默认为灰色的处理方法
- ASP.NET中 TextBox 文本输入框控件的使用方法
- MVC为Html对象建立一个扩展方法,使用自己的控件就像使用TextBox一样方便
- winform基本控件的使用2(用户登录界面的设计)