From c81698e63a619a2cd645bacdc0ceaab258c13ffd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E4=BE=9D=E7=91=AA=E8=B2=93?= Date: Thu, 8 Sep 2016 21:25:11 +0800 Subject: [PATCH] Fixed styles (added a space after MsgBox and the following open parenthesis.) --- 1CorRel.vb | 2 +- 2PTTest.vb | 2 +- 3ITTest.vb | 2 +- 4ANOVA.vb | 2 +- 5Chi2GoF.vb | 2 +- 5 files changed, 5 insertions(+), 5 deletions(-) diff --git a/1CorRel.vb b/1CorRel.vb index df4a614..f845799 100644 --- a/1CorRel.vb +++ b/1CorRel.vb @@ -45,7 +45,7 @@ Sub subRunCorrelation As Object sSheetName = oRange.getSpreadsheet.getName If oSheets.hasByName (sSheetName & "_correl") Then sExisted = "Spreadsheet """ & sSheetName & "_correl"" exists. Overwrite?" - nResult = MsgBox(sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) + nResult = MsgBox (sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) If nResult = IDNO Then Exit Sub End If diff --git a/2PTTest.vb b/2PTTest.vb index ff44a77..fd58f44 100644 --- a/2PTTest.vb +++ b/2PTTest.vb @@ -45,7 +45,7 @@ Sub subRunPairedTTest As Object sSheetName = oRange.getSpreadsheet.getName If oSheets.hasByName (sSheetName & "_ttest") Then sExisted = "Spreadsheet """ & sSheetName & "_ttest"" exists. Overwrite?" - nResult = MsgBox(sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) + nResult = MsgBox (sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) If nResult = IDNO Then Exit Sub End If diff --git a/3ITTest.vb b/3ITTest.vb index 2f673b4..ff2f446 100644 --- a/3ITTest.vb +++ b/3ITTest.vb @@ -57,7 +57,7 @@ Sub subRunIndependentTTest As Object Else sExisted = "Spreadsheet " & sExisted & " exists. Overwrite?" End If - nResult = MsgBox(sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) + nResult = MsgBox (sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) If nResult = IDNO Then Exit Sub End If diff --git a/4ANOVA.vb b/4ANOVA.vb index 4d922fe..7ac92c3 100644 --- a/4ANOVA.vb +++ b/4ANOVA.vb @@ -57,7 +57,7 @@ Sub subRunANOVA As Object Else sExisted = "Spreadsheet " & sExisted & " exists. Overwrite?" End If - nResult = MsgBox(sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) + nResult = MsgBox (sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) If nResult = IDNO Then Exit Sub End If diff --git a/5Chi2GoF.vb b/5Chi2GoF.vb index 1114278..2ed4418 100644 --- a/5Chi2GoF.vb +++ b/5Chi2GoF.vb @@ -45,7 +45,7 @@ Sub subRunChi2GoodnessOfFit As Object sSheetName = oRange.getSpreadsheet.getName If oSheets.hasByName (sSheetName & "_chi2") Then sExisted = "Spreadsheet """ & sSheetName & "_chi2"" exists. Overwrite?" - nResult = MsgBox(sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) + nResult = MsgBox (sExisted, MB_YESNO + MB_DEFBUTTON2 + MB_ICONQUESTION) If nResult = IDNO Then Exit Sub End If