1樓：停停久久
一、val 函式
返回包含於字串內的數字，字串中是一個適當型別的數值。
語法 val(string)
必要的 string 引數可以是任何有效的字串表示式.
說明 val 函式，在它不能識別為數字的第一個字元上，停止讀入字串。那些被認為是數值的一部分的符號和字元，例如美圓號與逗號，都不能被識別。但是函式可以識別進位制符號 &o（八進位制）和 &h（十六進位制）。
空白、製表符和換行符都從引數中被去掉。
下面的返回值為 1615198：
val(" 1615 198th street n.e.")
在下面的**中，val 為所示的十六進位制數值返回十進位制數值 -1。
val("&hffff")
注意 val 函式只會將句點（.）當成一個可用的小數點分隔符。當使用不同的小數點分隔符時，如在國際版應用程式中，代之以 cdbl 來把字串轉換為數字。
'***********************************==
val 函式示例
本示例使用 val 函式返回字串中所含的數值。
dim myvalue
myvalue = val("2457") ' 返回 2457。
myvalue = val(" 2 45 7") ' 返回 2457。
myvalue = val("24 and 57") ' 返回 24。
參考資料：msdn vb參考
二、str 函式
返回代表一數值的 variant (string)。
語法str(number)
必要的 number 引數為一 long，其中可包含任何有效的數值表示式。
說明當一數字轉成字串時，總會在前頭保留一空位來表示正負。如果 number 為正，返回的字串包含一前導空格暗示有一正號。
使用 format 函式可將數值轉成必要的格式，如日期、時間、貨幣或其他使用者自定義格式。與 str 不同的是，format 函式不包含前導空格來放置 number 的正負號。
注意str 函式只視句點 (.) 為有效的小數點。如果使用不同的小數點（例如，國際性的應用程式），可使用 cstr 將數字轉成字串。
for example:str 函式示例
本示例使用 str 函式來將一個數字轉成字串。當數字轉成字串時，字串的第一個位一定是空格或是正負號。dim mystringmystring = str(459) \' 返回 " 459"。
mystring = str(-459.65) \' 返回 "-459.65"。
mystring = str(459.001) \' 返回 " 459.001"。
三、cstr 函式
說明傳回一個轉換為 string 資料型態的運算式。
語法cstr(expression)
引數 expression 可以是任何有效的運算式。
註解通常，您可以使用資料型態轉換函式，以特定的資料型態，取代預設的資料型態來進行運算。例如，使用 cstr 來強制將執行結果以 string 資料型態表示。
您可以使用 cstr 函式而非 str 函式，在任何語言的版本中，讓任何一個資料型態轉換至 string 資料型態。例如，不同的小數點分隔符號，會依據您系統的國別設定來做適當的確認。
引數 expression 將決定函式傳回值為何，請叄考下表：
若 expression 內容為 傳回值
boolean 包含 "true" 或 "false" 的字串。
date 包含一個日期的字串，其格式為您系統的簡短日期格式。
null 產生執行時期錯誤。
empty 一個長度為 0 的 字串 ("")。
error 包含一個英文字 "error" 以及一個錯誤**的字串。
其他數值 包含這個數值的字串。
（一）型別轉換類函式
1. ctype(x)
[格式]：
p=cbool(x)
' 將x轉換為「布林」（boolean）型別
p=cbyte(x)
' 將x轉換為「位元組」（byte）型別
p=ccur(x)
' 將x轉換為「金額」（currency）型別
p=cdate(x)
' 將x轉換為「日期」（date）型別
p=cdbl(x)
' 將x轉換為「雙精度」（double）型別
p=cint(x)
' 將x轉換為「整型」（integer）型別
p=clng(x)
' 將x轉換為「長整型」（long）型別
p=csng(x)
' 將x轉換為「單精度」（single）型別
p=cstr(x)
' 將x轉換為「字串」（string）型別
p=cvar(x)
' 將x轉換為「變體型」（variant）型別
p=cverr(x)
' 將x轉換為error值
[ 範例 ]：
(1). cstr(13)+cstr(23)
' 數值轉換成字串後，用"+"號連線， 結果：1323
(2). cint("12")+12
' 字串轉換成整型後與12相加， 結果：24
(3). p=cint(true)
' 輸出結果為-1
' 布林值與數值的轉換時要注意，布林值只有true和false，其中true在記憶體中為-1,false存為0
(4). cbool(-0.001)
' 輸出結果為true
' 將數值轉換為布林型時，等於0的數值將得到false，不等於0的數值得到true.
2. int(x),fix(x)：取x的整數值
[格式]：
p=int(x) ' 取<=x的最大整數值
p=fix(x) ' 取x的整數部分，直接去掉小數
[範例]：
(1) int(-54.6)
' 結果為-55，取<=-54.6的最大整數
(2) fix(54.6)
' 結果為54，取整數並直接去掉小數
（二）常用數學函式
[格式]：
1. abs(n) 取絕對值
例：abs(-3.5) 結果：3.5
2. cos(n) 餘弦函式
例：cos(0) 結果：1
3. exp(n) e為底的指數函式
例：exp(3) 結果：20.068
4. log(n) 以e為底的自然對數
例：log(10) 結果：2.3
5. rnd[(n)] 產生隨機數
例：rnd 結果：0--1之間的數
6. sin(n) 正弦函式
例：sin(0) 結果：0
7. sgn(n) 符號函式
' 說明：取正負號。y=sgn(x) 既 x>0 則y=1；x=0 則y=0；x<0 則y= -1
8. sqr(n) 平方根
例：sqr(9) 結果：3
9. tan(n) 正切函式
例：tan(0) 結果：0
10.atn(n) 反切函式
例：atn(0) 結果：0
[注意]：在三角函式中，以弧度表示。
(一)字串類函式：
1. asc(x)，chr(x)：轉換字元字元碼
[格式]：
p=asc(x) 返回字串x的第一個字元的字元碼
p=chr(x) 返回字元碼等於x的字元
[範例]：
(1)p=chr(65)
『 輸出字元a,因為a的ascii碼等於65
(2)p=asc(「a」)
『 輸出65
2. len(x)： 計算字串x的長度
[格式]：
p=len(x)
[說明]：
空字串長度為0，空格符也算一個字元，一箇中文字雖然佔用2 bytes，但也算一個字元。
[範例]：
(1) 令x=」」 (空字串)
len(x) 輸出結果為0
(2) 令x=」abcd」
len(x) 輸出結果為4
(3) 令x=」vb教程」
len(x) 輸出結果為4
3. mid(x)函式：讀取字串x中間的字元
[格式]：
p=mid(x,n)
由x的第n個字元讀起，讀取後面的所有字元。
p=mid(x,n,m)
由x的第n個字元讀起，讀取後面的m個字元。
[範例]：
(1) x=」abcdefg」
p=mid(x,5)
結果為：p=」efg」
(2) x=」abcdefg」
p=mid(x,2,4)
結果為p=」bcde」
4. replace: 將字串中的某些特定字串替換為其他字串
[格式]：
p=replace(x,s,r)
[說明]：將字串x中的字串s替換為字串r，然後返回。
[範例]：
x=」vb is very good」
p=replace(x,good,nice)
輸出結果為：p=」vb is very nice」
5. strreverse：反轉字串
[格式]：
p=strreverse(x)
[說明]：
返回x引數反轉後的字串
[範例]：
（1）x=」abc」
p=strreverse(x)
輸出結果：p=」cba」
6. ucase(x)，lcase(x)：轉換英文字母的大小寫
[格式]：
p=lcase(x)
『 將x字串中的大寫字母轉換成小寫
p=ucase(x)
『 將x字串中的小寫字母轉換成大寫
[說明]：除了英文字母外，其他字元或中文字都不會受到影響。
[範例]：
（1） 令 x=」vb and vc」
則lcase(x)的結果為」vb and vc」，ucase(x)的結果為」vb and vc」
7. instr函式：尋找字串
[格式]：
p=instr(x,y)
從x第一個字元起找出y出現的位置
p=instr(n,x,y)
從x第n個字元起找出y出現的位置
[說明]：
（1） 若在x中找到y，則返回值是y第一個字元出現在x中的位置。
（2） instr(x,y)相當於instr(1,x,y)。
（3） 若字串長度，或x為空字串，或在x中找不到y，則都返回0。
（4） 若y為空字串，則返回0。
日期時間類函式：
1. year(x)，month(x)，day(x)：取出年，月，日
[格式]：
p=year(x)
取出x「年」部分的數值
p=month(x)
取出x「月」部分的數值
p=day(x)
取出x「日」部分的數值
[說明]：year返回的是公元年，若x裡只有時間，沒有日期，則日期視為#1899/12/30#
2. hour，minute，second函式：取出時，分，或秒
[格式]：
p=hour(x)
取出x「時」部分的數值
p=minute(x)
取出x「分」部分的數值
p=second(x)
取出x「秒」部分的數值
[說明]：hour的返回值是0---23之間
[範例]：
x=10:34:23
p=hour(x)
q=minute(x)
r=second(x)
則輸出結果：p=10，q=34，r=23
3. dateserial函式：合併年，月，日成為日期
[格式]：dateserial(y,m,d)
其中y是年份，m為月份，d為日期
[說明]：
（1） m值若大於12，則月份從12月起向後推算m-12個月；若小於1，則月份從1月起向後推算1-m個月。
（2） 若日期d大於當月的日數，則日期從當月的日數起，向後推算d-當月日數；若小於1，則日期從1日起向前推算1-d日。
[範例]：
p=dateserial(2000,02,02)
則結果為p=2000/02/02
4．timeserial函式：合併時，分，秒成為時間
[格式]：p=timeserial(h,m,s)
其中h為小時數，m為分鐘數，s為秒數
[說明]：推算原理同上面的dateserial
[範例]：
p=timeserial(6,32,45)
結果為：p=6:32:45
5．date,time,now函式：讀取系統的日期時間
[格式]：
p=date()
p=time()
p=now()
[說明]：這三個函式都無引數
[範例]：
若當前時間為2023年8月29日晚上19點26分45秒，則
p=now()
結果為：p=2003-08-29 19:26:45
6．monthname：返回月份名稱
[格式]：p=monthname(x)
[說明]：x引數可傳入1---12，則返回值為「一月」、「二月」……，但是在英文windows環境下，返回的是」january」,」february」……
[範例]：
p=monthname(1)
則p=「一月」
7．weekdayname：返回星期名稱
[格式]：p=weekdayname(x)
[說明]：x引數可傳入1—7，則返回值為「星期日」，「星期一」……，但是在英文windows環境下，返回的是」sunday」,」monday」……
[範例]：
p=weekdayname(1)
結果為：p=」星期日」
vb6 0請幫忙做題目，謝謝，vb6 0請幫忙做第一個題目，謝謝
這個是我的做的，請檢視一下行不行。有不懂的地方再問我。一 function cala x as integer,byval y as integer x是按址傳遞，y是按值傳遞 x x y if x 0 then cala x else cala y end if end function priv...
VB6 0 檔案操作，vb6 0對txt檔案操作
哪種資料型別都能放的，只是相對操作效能有區別，二進位制可以讀寫任何檔案，比如一個壓縮包就可以用二進位制檔案讀入加密後再儲存。其操作速度較快 隨機檔案可以讀取任意位置的單個資料，非常靈活，速度最快。文字檔案操作較直觀，直接用記事本就可開啟編輯 vb6.0對txt檔案操作 vb6.0關於.csv檔案的操...
問VB6 0的問題，問一個VB6 0的問題
這樣就行了 把use宣告在通用裡 這樣在點選command1時 use的值就會在原來的數值 1 而use的值不會一值為0 dim use as integer private sub command1 click dim loginname,password as string loginname ...