richtextbox获取某行_richtextbox 光标_richtextbox和textbox(31)

代码实现：

private sub cmdclear_click() cls end sub private sub cmdexit_click() end end sub private sub txtcheck_keypress(keyascii as integer) if keyascii < 65 or keyascii > 90 then print "输入有错误，请使用大写字母！" else print "输入正确！" end if end sub 如果只显示大写字符，其它输入的字符不显示，可以修改程序： private sub txtcheck_keypress(keyascii as integer) if keyascii < 65 or keyascii > 90 then print "输入有错误，请使用大写字母！“ keyascii=0 else print "输入正确！" end if end sub

5.1.3字体与字体大小的控制

例：设计一个程序，单击窗体在3个文本框中分别显示出隶书、宋体和幼圆 等字体。输出界面如下：

代码实现：

private sub form_click() 定义文本框text1的字体为"隶书" text1.fontsize = 40 text1.fontname = "隶书" text1.text = "隶书" 定义文本框text2的字体为"宋体" text2.fontsize = 30 text2.fontname = "宋体" text2.fontitalic = true text2.fontunderline = true text2.text = "宋体" 定义文本框text3的字体为"幼圆" text3.fontsize = 20 text3.fontname = "幼圆" text3.fontbold = true text3.text = "幼圆" end sub

标签的属性:

name:设置标签控件的名称. autosize:用于设置标签的大小是否自动按标签中所显 示的内容的多少进行调整. true :自动调整 false 不自动调整 alignment:用于设置在标签上显示的信息的位置 0 左对齐 1 右对齐 2 居中对齐 caption: 设置显示的内容. backstyle:设置标签是否透明。 0 透明 1 不透明 borderstyle:设置标签是否有边框。 0 无边框 1 有 边框

第六章 命令按钮、复选框、单选按钮 和框架

6 .1 命令按钮

当用户需要交互式地控制应用程序的时候，最简便的方法就是给用户提供一个 “命令按钮”。 命令按钮的作用是：在用户单击它时，将会激发它的click 事件。因此，将 代码写入 命令按钮的click 事件过程，通过用户单击就可以执行相关操作。 命令按钮的常用属性有：

caption属性: 用于设置在命令按钮上显示的文本。 cancel属性: 用于设置按钮为取消按钮。true:按钮为取消按钮，false: 按钮不是取消按钮。 default:设置按钮是否为活动按钮。 true:按钮为缺省按钮，false:按钮 不是缺省按钮。 enabled:设置命令按钮是否可用。 true:按钮可用，false:按钮不可用。

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-29087-31.html