update,

2025-01-31 19:27:58 +08:00
parent 9476a736d3
commit ce9a4aa9b3
313 changed files with 6340 additions and 0 deletions
--- a/armandarmand/task1/task1-ticket1/helloworld/browser/hello-aastock-draft1/ReadStockCode.bas
+++ b/armandarmand/task1/task1-ticket1/helloworld/browser/hello-aastock-draft1/ReadStockCode.bas
@@ -0,0 +1,7 @@
+Attribute VB_Name = "ReadStockCode"
+Option Explicit
+
+Function run(row as integer)
+  run = Worksheets("Sheet1").Range("A" & CStr(row)).Value
+
+End Function