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

例2.4 使用转换函数的示例(留给学生分析)

private sub form_click() x = "123" : y = 123 a = chr(asc(x) + 5) b = str(val(x) + 5) c = val(str(y) + "5") print a,b, c end sub 运行程序后单击窗体，输出结果如下： 6 128 1235

字符串函数

常用的字符串函数有：

1. instr（字符串1，字符串2）—— 字符串2在字符串1中出现的位置。 2. ltrim(字符串) ——去掉字符串左边的空白部分。

3. rtrim(字符串) ——去掉字符串右边的空白部分。

4. trim(字符串) ——去掉字符串的左右空格 。 5. left(字符串，个数) ——取出字符串左边指定个数的字符 。 6. right(字符串，个数) ——取出字符串右边指定个数的字符。 7. mid(字符串，起始位置[，个数]) ——取字符串由起始位置开始的指定个数的 字符。 8. len(字符串或字符变量) ——计算字符串长度 。

9. space(个数) ——返回指定个数的空字符串。

10. string(个数，字符)——返回包含重复字符的字符串 。

字符串函数

使用字符串函数的几点说明： (1)函数mid(―abcdeg‖,3,2)的结果为”cd‖ 若省略n，则得到的是从p开始的往后所有字符，如 mid(―abcde‖，2) 的结果为 “bcde‖ (2)在函数instr中，f和k均为可选参数，f表示开始搜索的位置(默认值为1)，

k表示比较方式，若k为0(默认)，表示区分大小写；若k为1，则不分大小写。 格式： instr([f], 字符串1,字符串2,[k]) 例如 instr(3, ‖a12a34a56‖, ‖a‖) 的结果为 7 instr(3,‖a12a34a56‖,‖a‖,1)结果为 4 instr(‖a12a34a56‖, ‖a‖) 的结果为 1 (3)在函数string中，字符也可以用ascii代码(附录一)来表示 例如 string(6, 42) 与 string(6, ‖*‖)作用相同

例子:先从字符串a中找出某个指定字符(本例为空格)，再 以此字符为界拆分成两个字符串。编写的窗体单击过程 代码如下：

private sub form_click() dim a as string, b as string, c as string, n as integer a = "visual└┘foxpro" └┘表示空格 n = instr(a, "└┘") 查找空格位置 b = left(a, n - 1) 取左边部分 c = mid(a, n + 1) 取右边部分 print b 显示左边部分 print c ‘显示右边部分 end sub 程序运行后单击窗体，输出结果是： visual foxpro

作业：若用 right函数来代替 mid函数, 应 如何改动

private sub form_click() dim a as string, b as string, c as string, n as integer a = "visual└┘foxpro" └┘表示空格 n = instr(a, "└┘") 查找空格位置 b = left(a, n - 1) 取左边部分 c = right( ____, ____ ) 取右边部分 print b 显示左边部分 print c 显示右边部分 end sub 程序运行后单击窗体，输出结果是： visual foxpro

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