option explicit
sub test(
)dim starttime
starttime =
time()
'請將i/j/a三個變數全部設定為變體並執行本程式，記下時間；
'然後再將三者都設定為integer並執行，再記下時間，並與前者比較。
'dim i, j, a
dim i as
integer
, j as
integer
, a as
integer
'每次宣告都要寫完整，不然讀不出
'如果不申明，獲取的是變體型別，太費記憶體了，執行效率也很低下
for i =1to
20000
for j =1to
20000
a =123next j
next i
msgbox "共計執行 " & datediff("s", starttime, time()) & " 秒"
endsub
integer %
long &
double # 支援小數
currency @支援小數
兩邊都是數字字串，用加號的作用相當於&
所以 連字元用的 &左右要留乙個空格
option explicit
sub 型別(
)dim a
'a = 30000 * 2 '結果會溢位，因為30000 和2 預設為integer
'所以給30000*2後得到的結果，是要裝入integer的，這裡出現了溢位
a =30000&*
2'強制轉為long
msgbox a
endsub
option explicit
sub 型別(
)dim a
a =30000&*
2: msgbox a '冒號一用，可以拼在一行寫
endsub
option explicit
sub 型別(
)dim a as
integer
dim b as
integer
a =11/
3'除號+四捨五入
b =11 \ 3
'求餘，去尾法
msgbox a
msgbox b
endsub
option explicit
sub demo(
)dim d as
date
dim a as
date
dim b as
date
dim c as
date
d = #1/19
/201912:
20:25 pm# '設定時間型別的資料變數
'用#號相當於字串的"" 順序是 月日年
a =date
' 返回當前年月日
b =time()
'這裡多了括號 返回時分秒
c = now(
)'年月日 時分秒
msgbox d
msgbox a
msgbox b
msgbox c
endsub
month(d)
day(d)
weekday(d)
hour(d)
minute(d)
second(d)
option explicit
sub demo(
)dim i as
long
i =3do
while trim(cells(i,2)
)<>
""'datediff函式用來算兩個日期之間的差值
cells(i,6)
= datediff(
"w", cells(i,3)
, cells(i,4)
)& "周" 'w對應周，d對應天數，s對應秒
cells(i,7)
= dateadd(
"d",
-400
, now())
'dateadd，從現在起,往前推500天
i = i +
1loop
endsub
0代表的是2023年12月30日0時0分0秒，整數部分每增減1就是增減1天，小數0.1代表0.1天，即2.4h或2小時24分鐘
ctrl+pause停止死迴圈
option explicit
sub 交替上色(
)dim i as
long
dim paint as
boolean
'定義bool變數
paint =
false
i =4do
while cells(i,2)
<>
""if cells(i,2)
<> cells(i -1,
2)then
paint =
not paint
endifif paint then
'為bool變數才能這麼改
Grep第一課 基本
首先檢視一下grep globally search a regular expression and prin t 的man手冊。會看到這個是用來和正規表示式結合起來搜尋文字的。man grep grep searches the named input files or standard inp...
第一課 基本概念
泛化能力 引數與超引數 機器學習主要包括監督學習，無監督學習，強化學習 監督學習是指從標註資料中學習 模型的機器學習問題。相反的，無監督學習是指從無標註資料中學習 模型的機器學習問題 對於監督學習，如果標註是連續型資料，則問題屬於回歸問題 如果標註是離散型資料，則問題屬於分類問題 連續和離散的判定標...
開學第一課
因為是開學第一課，而且這是我的第一篇個人部落格，更何況還是技術部落格，所以我會認真對待，不過畢竟第一次，所以難免各方面會有不足，所以有任何的意見或建議都可以提出來以供本人提高。下面廢話少說，進入正題。使用quartus，新建乙個專案，建立乙個bdf檔案，雙擊bdf空白處，新增元件符號。找到 7413...