在这里我们来讲一篇关于如何进行数据列内容与显示操作的方法。 这种方法类似于实现:有数据表 test(id int not null primary key ,name varchar(20) ,sex bit ), 那么是否有方法不通过直接使用 sql 语句,如: select id ,name ,sex =case sex ( when true then ‘ 男 ’ when false then ‘ 女 ’ else sex end) 的形式来构建要显示的是“男”,“女”,而实际上存储的是 true ...[ 查看全文 ]
procedure TForm1.Button1Click(Sender: TObject); var s : string; begin combobox1.Clear; s := '01'; combobox1.Items.AddObject('北京',TObject(s)); s := '02'; combobox1.Items.AddObject('天津',TObject(s)); s := '03'; combobox1.Items.AddObject('上海',TObject(s)); end; procedure TForm1.ComboBox1Change(Sender: TObject); begin edit1.Text :...[ 查看全文 ]
html head titleHTML TO JavaScript 转换/title meta http-equiv="Content-Type" content="text/html; charset=utf-8" / link href="style.css" rel="stylesheet" type="text/css" / /head body div class="menu_head"HTML TO JavaScript 转换/div div class="content" div请在下边输入HTML代码:/div div textarea name="htmlcource" style="width:99%" rows="15" id="oSource" on...[ 查看全文 ]
代码如下: script type="text/javascript" //取得传值的函数 function QueryString(qs) { var s = location.href.replace("?","?&").split("&"); var re = ""; for(i=1;is.length;i++) (s[i].indexOf(qs+"=")...[ 查看全文 ]
html head titleJavaScript TO HTML 转换/title meta http-equiv="Content-Type" content="text/html; charset=utf-8" / link href="style.css" rel="stylesheet" type="text/css" / /head body div class="menu_head"JavaScript TO HTML 转换/div div class="content" div请在下边输入JavaScript代码:/div div textarea name="textarea" style="width:99%" rows="15" id="oResult...[ 查看全文 ]
function max(info) arr=split(info,",") max=clng(arr(0)) for i=1 to ubound(arr) if clng(arr(i))clng(max) then max=clng(arr(i)) end if next end function function min(info) arr=split(info,",") min=clng(arr(0)) for i=1 to ubound(arr) if clng(arr(i)) min=clng(arr(i)) end if next end function '调用方式 'i=max("12,23,12,12,,32,43,54,43,56") 'i=min("12,12,23,3,454,3...[ 查看全文 ]
代码如下: '//转换中文为unicode function URLEncoding(vstrIn) dim i dim strReturn,ThisChr,innerCode,Hight8,Low8 strReturn = "" for i = 1 to Len(vstrIn) ThisChr = Mid(vS...[ 查看全文 ]