Private Sub Command1_Click()
創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù),包含不限于成都網(wǎng)站設(shè)計(jì)、成都網(wǎng)站制作、遂溪網(wǎng)絡(luò)推廣、小程序設(shè)計(jì)、遂溪網(wǎng)絡(luò)營(yíng)銷、遂溪企業(yè)策劃、遂溪品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運(yùn)營(yíng)等,從售前售中售后,我們都將竭誠(chéng)為您服務(wù),您的肯定,是我們最大的嘉獎(jiǎng);創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供遂溪建站搭建服務(wù),24小時(shí)服務(wù)熱線:18982081108,官方網(wǎng)址:www.cdcxhl.com
If Text1.Text 0 Then Print "負(fù)數(shù)" Else If Text1.Text = 0 Then Print "0" Else: Print "正數(shù)"
End Sub
也不用創(chuàng)建啊,有個(gè)函數(shù)叫sign
用法:
select sign(數(shù)值) from dual
大于0返回1,等于0返回0,小于0返回-1
你說的那個(gè)
select * from count where sign(num1)=1
得出來的就是為正數(shù)的了
---補(bǔ)充--
create or replace FUNCTION NUM(v_num number)
return int is
Result int;
begin
if(v_num 0) then
Result := -1;
end if;
if(v_num = 0) then
Result := 0;
end if;
if(v_num 0) then
Result := 1;
end if;
return(Result);
end num;
用法與sign一致
如select num(100) from dual;
select * from A where to_char(日期字段,'yyyymm')=to_char(add_months(sysdate,-1),'yyyymm')
這樣試驗(yàn)一下,表名和字段名你替換一下,也就是把A和日期字段這倆地方換一下