@@ -290,7 +290,7 @@ Private Sub FooFight(ByRef arg1 As String)
290
290
Let arg1 = ""test""
291
291
End Sub
292
292
" ;
293
- var secondClassBody =
293
+ var secondClassBody =
294
294
@"
295
295
Private memberString As String
296
296
Private memberLong As Long
@@ -321,6 +321,14 @@ Private Sub FooFighters(ByRef arg1 As String)
321
321
xArg1 = 6
322
322
Let arg1 = ""test""
323
323
End Sub
324
+
325
+ Sub Bar()
326
+ Dim st As String
327
+ st = ""Test""
328
+ Dim v As Long
329
+ v = 5
330
+ result = KungFooFighting(st, v)
331
+ End Sub
324
332
" ;
325
333
326
334
var firstModuleBody =
@@ -362,7 +370,7 @@ End Sub
362
370
363
371
//This list of names results are invalid to use - and results in no change to the code module
364
372
string [ ] inValidNames = { "CantTouchThis" , "BigNumber" , "DoSomething"
365
- , "myEggo" , "SetFilename" , firstClass . Key , secondClass . Key
373
+ , "myEggo" , "SetFilename" , "Foo" , firstClass . Key , secondClass . Key
366
374
, firstModule . Key , secondModule . Key } ;
367
375
foreach ( var invalidName in inValidNames )
368
376
{
@@ -371,7 +379,7 @@ End Sub
371
379
}
372
380
373
381
//This list of names results in modifying the code module
374
- string [ ] validNames = { "myNewVariable" , "Foo2" } ;
382
+ string [ ] validNames = { "myNewVariable" , "Foo2" , "Bar" } ;
375
383
foreach ( var validName in validNames )
376
384
{
377
385
var quickFixResult = GetQuickFixResult ( validName , firstClass , standardModules , classModules ) ;
0 commit comments