顯示具有 VB 標籤的文章。 顯示所有文章
顯示具有 VB 標籤的文章。 顯示所有文章

星期五, 3月 12, 2010

VB函數用法

VB函數說明 / VB函數用法

絕對值 / Abs(number)

傳回陣列範本 / Array(arglist)

算字元的ASCII碼 / Asc( string)

轉Boolean型態值 / CBool( expression )

轉Byte型態值 / CByte( expression )

轉Currency型態值 / CCur (expression )

轉Date型態的值 / CDate (date )

轉 Double 型態的值 / CDbl (expression )

轉ASCII碼表示的字元 / Chr (charcode)

轉為整數型態 / CInt(expression)

轉為長整數型態 / Clng (expression )

傳回物件範本 / CreateObject (class)

轉為單精度型態 / CSng (expression)

轉為字串型態 / CStr (expression )

傳回目前系統時間 / Date

傳回更改的時間 / DateAdd (interval, number, date)

傳回兩日期的間隔 / DateDiff (interval,date1,date2)

傳回某時間的部分值 / DatePart (interval,date)

轉換某時間Date型態 / DateSerial(year, month, day)

傳回陣列內的字串位置 / Filter (InputStrings, Value)

傳回Date 型態的值 / DateValue(date)

傳回1~31的日期數字 / Day(date)

最大整數值 / Int (number )

無條件捨去小數 / Fix (number)

傳回表示式型式 / FormatCurrency(Expression)

傳回日期或時間表示式 / FormatDateTime (Date)

傳回數字的表示式 / FormatNumber(Expressiom)

傳回百分比的表示式 / FormatPercent(Expression)

取回檔案內的物件 / GetObject([pathname][,class])

轉為16進位 / Hex(number)

傳回時間的時數 / Hour(time)

顯示可供輸入的對話窗 / inputBox(prompt,......)

傳回搜尋字串的位置 / InStr(string,searchstr)

從尾端搜尋字串位置 / InstrRev(string,searchstr)

判定變數是否為陣列 / IsArray(varname)

判定是否為日期表示式 / IsDate(expression)

判定變數內是否有內容 / IsEmpty(expression)

判定是否為NULL值 / IsNull(expression)

判定是否為數字值 / IsNumeric(expression)

傳回一個圖片物件 / LoadPicture(picturename)

判定是否為一個變數 / IsObject(expression)

字串加入陣列內 / Join(list[,delimiter])

轉為小寫字串 / LCase(string)

字串取左邊長度 / Left(string,ength)

傳回字串長度 / Len(string|varname)

傳回自然對數值 / Log(number)

去除字串的左邊空白 / LTrim(string)

去除字串的右邊空白 / RTrim(string)

去除字串的左右邊空白 / Trim(string)

傳回指定位置的字串 / Mid(string,start[,length])

傳回時間的分鐘 / Minute(time)

傳回日期的月份 / Month(date)

傳回月份字串 / MonthName(month[,abbreviate)

顯示一個訊息窗 / MsgBox(prompt,...)

傳回系統日期與時間/ Now

轉為八進位數字 / Oct(number)

取代部份字串 / Replace(string,find,replacewith)

字串取右邊長度 / Right(string,ength)

傳回一個隨機數字 / Rnd[(number)]

指定字串轉成陣列 / Split(expression,...)

傳回使用的Script語言 / ScriptEngine

傳回時間的秒數 / Second(time)

判斷數字的正負符號 / Sgn(number)

傳回弧度數字的Sin值 / Sin(number)

產生空白字元字串 / Space(number)

算數值的二次方根植 / Sqr(number)

比較兩字串 / StuComp(string1,string2[,compare])

反過來排列字串 / StrReverse(string)

產生重複字元字串 / String(number,character)

傳回目前的系統時間 / Time

傳回時間Date型態 / TimeSerial(hour,minute,second)

傳回含時間的Date型態 / TimeValue(time)

傳回變數的資料型態 / TypeName(varname)

從尾端傳回陣列小索引 / UBound(anayname)

轉為大寫字元 / UCase(string)

傳回代表變數資料型態的數字 / VarType(varname)

傳回日期是禮拜幾? / Weekday(date,[firstdayofweek])

傳回日期內的年數值 / Year(date)

====
網路上隨便搜尋就有了

星期四, 3月 11, 2010

十六進位表示法

不同電腦系統、編程語言對於16進制數值有不同的表示方式:

* Ada用所基於的「數字引證」把16進位數包起來,例如「16#5A3#」。(註:Ada對整數和實數都可以使用從1到16中任何一個做為其基數。)
* VHDL中使用字首 X,例如,X"10",對應的二進位碼為:"00010000".
* C語言、Python語言及其他相近的語言使用字首「0x」,例如「0x5A3」。開頭的「0」令解析器更易辨認數,而「x」則代表十六進位(就如「O」代表八進位)。在「0x」中的「x」可以大寫或小寫
* 在VB中,使用字首「&H」來表示
* 在HTML,十六進位字元可以用「x」,例如֣和֣效果應該無異
* 某些版本的BASIC語言會採用「&H」詞頭,例如:「&H5A3」。
* Pascal和某些匯編器用字尾「h」來辨別16進位的數(若該數以字母起首,在前面會增加一個「0」)例如「0A3Ch」、「5A3h」
* 其他匯編器(AT&T、Motorola)和某些BASIC的版本使用字首「$」,例如「$5A3」
* 亦有用X'5A3'這類表示方式的,如PL/I

由於表示方式沒有單一、已協定的標準,所以以上的表示方式都有被使用,有時甚至在同一份論文上會出現幾個不同的表示方式。但因為各方式之間沒有太大的分歧,所以即使混合使用也沒有構成問題。

其中最常用(或常見)表示十六進位數值的方式是將 '0x' 加在數字前,或在數字後加上小字 16。例如 0x2BAD 和 2BAD16 都是表示十進位的11181(或1118110)。

在網頁設計上十六進制是很常用的。HTML和CSS使用十六進制的表示法來表示網頁上的特定顏色。使用 # 的符號來表示而非用個別的符號表示十六進制。24-bit 顏色可以用 #RRGGBB 的格式來表示,RR 是顏色中紅色成分的數值,GG 是顏色中綠色成分的數值,BB 顏色中藍色成分的數值。舉個例子, 紅色的陰影是十進制 238,9,63 可以編成 #EE093F。參見 網頁顏色模式.

在URL的特殊字元亦是用ASCII中的十六進位,每位元組都有百份比符號(%)在前,例如: 空格就表示為%20,而中文維基百科的首頁地址就是 http://zh.wikipedia.org/wiki/Wikipedia:%E9%A6%96%E9%A1%B5 (在一些現代的瀏覽器,如Firefox中,地址中十六進位編碼會被解碼成實際字元,所以在這些瀏覽器中中文維基百科的首頁地址顯示成 http://zh.wikipedia.org/wiki/Wikipedia:首頁 )

轉至Wiki

星期二, 3月 02, 2010

GetURl

public class GetUrl
{
public static string GetAbsoluteUrl(string strRelativePath)
{
if (string.IsNullOrEmpty(strRelativePath))
return strRelativePath;

string strFullUrl;
if (strRelativePath.StartsWith("http:", StringComparison.OrdinalIgnoreCase)
|| strRelativePath.StartsWith("https:", StringComparison.OrdinalIgnoreCase)
|| strRelativePath.StartsWith("file:", StringComparison.OrdinalIgnoreCase)
)
{
// 已經是絕對路徑。
strFullUrl = strRelativePath;
}
else
{
// 是相對路徑,必須轉換成絕對路徑。
strFullUrl = System.Windows.Application.Current.Host.Source.AbsoluteUri;
if (strFullUrl.IndexOf("ClientBin") > 0)
strFullUrl = strFullUrl.Substring(0, strFullUrl.IndexOf("ClientBin")) + strRelativePath;
else
strFullUrl = strFullUrl.Substring(0, strFullUrl.LastIndexOf("/") + 1) + strRelativePath;
}

return strFullUrl;
}
}

===============================================
Public Class GetUrl
Public Shared Function GetAbsoluteUrl(ByVal strRelativePath As String) As String
Dim strFullUrl As String

If String.IsNullOrEmpty(strRelativePath) Then
Return strRelativePath
End If



If strRelativePath.StartsWith("http:", StringComparison.OrdinalIgnoreCase) _
Or strRelativePath.StartsWith("https:", StringComparison.OrdinalIgnoreCase) _
Or strRelativePath.StartsWith("file:", StringComparison.OrdinalIgnoreCase) Then
strFullUrl = strRelativePath
Else
strFullUrl = System.Windows.Application.Current.Host.Source.AbsoluteUri

If (strFullUrl.IndexOf("ClientBin") > 0) Then
strFullUrl = strFullUrl.Substring(0, strFullUrl.IndexOf("ClientBin")) + strRelativePath
Else
strFullUrl = strFullUrl.Substring(0, strFullUrl.LastIndexOf("/") + 1) + strRelativePath
End If
End If


Return strFullUrl
End Function
End Class

Lambda for VB

Dim checkName As Func(Of String, Boolean) = _
Function(x As String) _
If(x = "Cabernet Sauvignon", True, False)