vf 表单应用

 

案例二    用VF实现记事本中的查找和替换功能（只需要找到第一个出现得查找对象），选择了查找按钮，实现查找功能；选择了替换功能，则把查找到的对象替换成要替换的对象

                        

步骤：                 

1.        新建一个表单form1（表单文件名和控件名可自定）。

2.        在表单form1上分别添加两个标签控件（label）,两个文本框，一个编辑框，两个命令按钮，一个选项按钮组。

3.        修改label1和label2的caption值为“查找”和“替换”；修改command1和command2的caption的值为“确定”和“退出”；选择选项按钮组然后右击选择编辑，再修改option1和option2的caption值为“查找”和“替换”。

4.        在确定按钮的click事件写如下代码

x=alltrim(thisform.text1.value)

y=alltrim(thisform.edit1.value)

z=alltrim(thisform.text2.value)

n=AT(x,y)  && 判断x在y中出现的位置

if n<>0     && 如果n不等于0 表示x是y的一个子串（查找的对象存在）