VF 里面的VALUE(空)、""、0、1、2各是什么意思

a=0 b=0 for i=1 to 4 for j=i+1 to 5 if int((i*j)/2)=(i*j)/2 a=a+1 else b=b+1 endif next next if a>b s=a else s=b endif thisform.text1.value=str(s)

xlsheet.cells(2,1).value=text2.text 用formula方法将microsoft excel中的值相加 xlsheet.cells(3,1).formula="=r1c1+r2c1"text3.text=xlsheet.cells(3,1)保存工作表 xlsheet.saveas "c:\temp.xls"关闭工作表 xlbook.close 关闭microsoft excel xlapp.quit 释放对象 set xlapp=nothing set...

换成以下代码 n=thisform.text1.value m=" "for i=1 to lenc(n)if (asc(substrc(n,i,1))>=65 and asc(substrc(n,i,1))<=90 ) or ( asc(substrc(n.i.1))>=97 and asc(substrc(n,i,1))<=122)loop endif m=m+substrc(n,i,1)endfor thisform.text2.value=m ...

if nKeyCode=13.and.!empty(this.value) 中的this.value改为this.text

不如先做一个表，预留 n 个空行，调用前把数据清空。在表单中用 Grid 绑定这个表，运行时就好像 Excel 那样填入格格。设置个按键，点下后用 COPY TO 把表中的数据另存为 DBF...

如将text1中的文本转换为日期型，放入text2中，可以添加一个命令按钮，在其click事件中输入 thisform.text2.value=ctod(thisform.text1.value)注意输入的时候要在text1中输入 2009/05/26,然后才能单击命令按钮，你会发现text2中的值也是 2009/05/26，但是它是日期型，而text1中的是字符型。

宿舍 字段名是否被修改或不存在

= BitBlt (hMemDC, 0,0, pnWidth,pnHeight, hFormDC, 0,0, SRCCOPY)= SelectObject(hMemDC, hSavedBitmap)retrieving bits from the compatible bitmap into a buffer as a device-independent bitmap (DIB) with a BitsPerPixel value as one of the printer device context lcBInfo = Init...

看你的问题就知道你的所有文本框是从数据环境里的表中，将字段拖入到表单中的吧，这时文本框就和表中的数据联系起来了，当你文本框中的数据被清空，则表中的数据同样会被清空，所以这些文本框不要直接从字段中拖入，要使用表单控件工具栏中的控件。