设计一个表单，在一个文本框TEXT1中输入字符的同时,输入的字符同步在文本框TEXT2中显示出来
这是VFP程序设计要求做的
追答在text1的INTERACTIVECHANGE 事件下，
写
thisform.text2.Value=this.Value
thisform.text2.Refresh()
谢谢你哈 我去试试可不可以
追答试完，别忘了采纳哦
本回答被提问者采纳设计一个只接受字母键的文本框,在文本框text1中输入一串字符时,文本框...
Private Sub Text1_KeyPress(KeyAscii As Integer)If Not (Asc("a ") <= KeyAscii And KeyAscii <= Asc("z ") Or _Asc("A ") <= KeyAscii And KeyAscii <= Asc("Z ")) Then KeyAscii = 0 End If Text2.Text = StrReverse(Text1.Text)End Sub ...
用vb如何把一个文本框(text1)中的任意一行内容,添加到另一个文本框(t...
用来seltext确定text1选中的内容就可以了，如在text2中显示:text2=text1.seltext,大致思路是这样的～
vb中如何使text1中输入内容立即显示在text2中
1、设置程序界面，包括标签，文本框，命令按钮。2、再按照题目要求，设置对象的属性。3、编写程序的代码。先定义变量。4、使用For-Next循环结构语句，编写的代码。5、在For-Next循环结构语句中，还要再嵌套一个If语句。6、运行程序，输入某个正数，验证结果。
vfp表单设计:在TEXT1中输入20个英文字符,点击按钮控件时候,删除所有...
在确定按钮的click 单击事件中输入代码 str1=alltrim(thisform.text1.value)str2=""n=len(str1)for i=1 to n if not(substr(str1,i,1)>="A" and substr(str1,i,1)<="Z")str2=str2+substr(str1,i,1)endif endfor thisform.text2.value=str2 界面如下图 ...
1、表单运行后在文本框text1、text2中分别输入2个数值,单击“结果...
a=thisform.textl.value b=thisform.text2.value m=max(a,b)n=min(a,b)thisform.text3.Value= m thisform.text4.Value= n
编制一个表单,实现在文本框中输入一个起始数,则在编辑框中显示20个...
一个command1按钮,一text1文本框,一个text2文本框,text2文本框属性"MultiLine"设为True,一个label1控件 Private Sub Command1_Click()i = 0 a = 0 Text2.Text = ""ii = Text1.Text Do While i < 20 ii = Val(ii) + 1 If ii Mod 3 = 0 And Right(ii, 1) = 3 Then Text2....
设计一个文本框 用户在文本框中输入什么 窗体标题就同步显示什么 怎么...
1、首先需要选择创建窗体设计按钮，如下图所示。2、创建好一个新窗体后，右键单击窗体左上角选择属性命令，如下图所示。3、接下来需要在右侧的属性表标题处输入测试窗体，如下图所示。4、接下来需要设置好后关闭窗体，如下图所示。5、接下来需要保存窗体设计，如下图所示。6、最后需要修改窗体名称即可...
vf,运行表单,在文本框Text1中输入一个n值,单击"计算"按钮时,表单上的文...
n=thisform.text1.value s=0 for i=1 to n skip 2 s=s+i endfor thisform.text1.value=s
...有几个文本框,几个按钮,一个文本域,能将文本框里的内容按按钮后添加...
简单的写了下，希望对你有有帮助 function addInfo(){ var textinfo = document.forminfo.textinfo.value;document.forminfo.areainfo.value = textinfo;document.forminfo.textinfo.value = "";} function clearInfo(){ document.forminfo.textinfo.value = "";document.forminfo.areainfo.value ...
VB两个文本框在text1中输入任意一字符串,单击命令按钮后字符串以反...
Len(n)Mid(n,i,1)c
