aardio吧 关注:621贴子:751
  • 2回复贴,共1

存在问题:文本框中输入数字后可以在xls文件中查找到正确内容

只看楼主收藏回复

存在问题:文本框中输入数字后可以在xls文件中查找到正确内容并显示,但第二次输入内容
回车后却出错了,不知是什么原因?
import win.ui;
/*DSG{{*/
mainForm = win.form(text="aardio form";right=799;bottom=467;max=false;min=false)
mainForm.add(
借阅人={cls="static";text="借阅人";left=62;top=231;right=329;bottom=253;align="center";aw=1;center=1;font=LOGFONT(h=-19;name='仿宋');transparent=1;z=1};
扫码={cls="static";text="请扫码或输入编码";left=66;top=158;right=252;bottom=180;align="center";aw=1;center=1;font=LOGFONT(h=-19;name='仿宋');transparent=1;z=2};
编码={cls="edit";left=267;top=155;right=418;bottom=183;align="center";border=1;font=LOGFONT(h=-19;name='仿宋');multiline=1;z=3}
)
/*}}*/
import com.excel;
var 编码
var rec_借阅者名册;
var excelServer;
var excel = com.CreateObject("Excel.Application") ; //创建Excel对象
var path="d:\";
excelSever = com.excel(true);
var xls_借阅者名册 = excelSever.WorkBooks.Open(path+"借阅者名册.xls");
var sheet_借阅者名册 = xls_借阅者名册.Worksheets(1);
var rec_借阅者名册 = sheet_借阅者名册.UsedRange.Rows.Count;
mainForm.编码.wndproc = function(hwnd,message,wParam,lParam){
if( message==0x100 && wParam == 0xD/*回车键*/ ){
var 行=sheet_借阅者名册.UsedRange.find(mainForm.编码.text).row();
mainForm.借阅人.text=sheet_借阅者名册.Cells(行,4).Value2;
mainForm.编码.text="";
//addr="";
}
}


IP属地:广西来自Android客户端1楼2022-09-16 10:03回复
    1, 你的文本框属性里要禁用多行, 即属性里选择[多行=false]
    2, 拦截按键, 你这里要用keyUP而不是KeyDown,
    if( message==0x101/*_WM_KEYUP*/ && wParam == 0xD/*回车键*/ ){
    .........
    }


    IP属地:上海2楼2022-09-16 18:08
    回复
      非常感谢,解决问题了!


      IP属地:广西来自Android客户端3楼2022-09-17 10:56
      回复