subroutine

3熱度

2回答

Perl：splice（）數組使用子程序

我需要一個子程序，完全刪除數組元素到位。以下代碼失敗： sub del { splice(@_,2,1); } @array=(0..5); print "@array"."\n"; del(@array); print "@array"."\n"; 再次打印相同的數組，即該元素尚未被刪除。 但是，如果我在程序的主體中使用splice()而不是調用子例程，它就可以工作。

arrays perl subroutine 2012-03-06

---

7熱度

6回答

恢復以前的回聲狀態

在DOS批處理文件子程序中，如何關閉子程序中的回聲，但在返回之前，將其恢復到以前的狀態（打開或關閉）？ 例如，如果有一個叫做echo restore命令，我會用這樣的： echo on ... do stuff with echoing ... call :mySub ... continue to do stuff with echoing ... exit /b :mySub @

batch-file subroutine 2012-03-06

---

2熱度

1回答

Sub App_WorkbookBeforeSave不適用於VBA加載項/ Excel 2010

我將在保存工作簿之前顯示MessageBox。我曾嘗試過事件處理程序Sub App_WorkbookBeforeSave()和Sub Workbook_BeforeSave，但兩者都不起作用！爲什麼？ 有我的插件子： Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _ ByVal SaveAsUI As B

excel vba event-handling subroutine 2012-03-07

---

7熱度

2回答

我應該如何將對象傳遞給子例程？

是最好還是最差的方法之一？ 利用範圍： my $cache = CHI->new(driver => 'File', expires_in => 3600); sub one { if (my $data = $cache->get('key_one')) { # ... } sub two { if (my $data = $cache->get('key

perl object arguments subroutine 2012-03-13

---

2熱度

1回答

VB6.0調用從BAS模塊寫入的子模塊CLS不工作

我正在編寫VB6.0項目（使用COM +的DLL）從以前編寫的代碼開始。 我有一個「main」Class模塊CLS文件，其中包含「main」函數和處理流程等。 我還有一個「side」模塊BAS，其中保存所有函數/子程序作爲工具在我的「main」類模塊。我寫了一個非常非常簡單的日誌系統（因爲我對App.LogEvent（「blablabla」）感到非常不舒服），但我無法編譯DLL。該消息指向我的CL

dll vb6 activex com+ subroutine 2012-03-15

---

2熱度

4回答

Fortran子程序指針不匹配數組尺寸

我遇到了Fortran和函數/子程序指針的問題。我有兩個函數將數組作爲參數。在f1中它是（n，n），在f2中它是（n * n）。當我手動調用子程序，我可以用相同的陣列做到這一點： real :: a(5, 5) call f1(a, 5) call f2(a, 5) 但是當我嘗試用指針來做到這一點，編譯器這個錯誤拋出回我： ptr => f2 1 Error: Interfa

arrays pointers fortran subroutine dimension 2012-03-16

---

3熱度

2回答

檢查perl中子程序中傳遞的變量類型

我想獲取傳遞給子例程的變量類型。使用Google搜索時遇到了下面的解決方案，但是這並沒有給出令人滿意的結果。 我的問題是在下面的示例中 sample("test"); sample(\%a); sub sample { my ($argv1) = @_; if(ref($argv1) eq "STRING") { print "string

perl subroutine 2012-03-18

---

11熱度

3回答

如何有選擇地訪問Perl子例程返回的元素？

說一個Perl函數返回一個數組： sub arrayoutput { ...some code... return @somearray; } 我想從這個僅訪問一個特定的數組元素，比方說第一。所以我可以這樣做： @temparray=arrayoutput(argument); 然後參考$temparray[0]。 但是這種簡短的參考不起作用：$arrayoutpu

arrays perl subroutine 2012-03-21

---

3熱度

2回答

perl函數原型

我想創建具有類似內置推式函數功能的子例程mypush，但下面的代碼無法正常工作。 @planets = ('mercury', 'venus', 'earth', 'mars'); myPush(@planets,"Test"); sub myPush (\@@) { my $ref = shift; my @bal = @_; print

perl subroutine subroutine-prototypes 2012-03-25

---

0熱度

1回答

GAMBAS - 在IF語句中退出Sub

我有一個複選框，應該觸發一個按鈕是否可見。以下是代碼： PUBLIC SUB chkGiveUp_Click() ' Check to see if the Give Up button's visible property is set to true, and if it is, hide the button. If it is hidden, show it again. I

subroutine basic gambas 2012-04-04

---