write a vb script to display
*****
*****
*****
*****
*****
Answers were Sorted based on User's Feedback
Answer / mudaseer
for i=1 to 5 step 1
for j=1 to 5 step 1
vstr=vstr & "*" & " "
next
vstr=vstr & vbnewline
next
msgbox vstr
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / eswar
cnt =0
x = "*"
For i=1 to 25
y=y&x
cnt = cnt+1
If cnt = 5 Then
cnt = 0
y = y&" "
End If
Next
MsgBox y
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / prathyusha
for i=1 to 5
for j=1 to 5
v=v&"*"
next
n=n&vbcrlf&v
next
msgbox n
| Is This Answer Correct ? | 0 Yes | 0 No |
Hi, Anybody could tell me What is the 3rd Largest Number in the series..Thanks in Advance..
How to scroll down a page while recording in qtp. suggest me any method apart from low level recording.
Which operator can be used to change the value of the operand or change the state of the condition?
How will you get the smallest subscript of an array in vbscript?
How regexp.execute method works?
How are values assigned to the variables in the vbscript language?
What purpose does ‘on error resume next’ serves?
compare the string without using stringcomp function?
while using Keyward driven framework in QTPif new requirements are added how to manage it...plz ans
Sub link() Dim k As Integer Dim rand As Integer Dim URL As String Dim foldernum As Integer Dim folderstring As String Dim filenum As Integer Dim filestring As String k = 1 'for AC Numbers For i = 11 To 40 foldernum = 0 foldernum = 1000 + i folderstring = CStr(foldernum) folderstring = Mid(folderstring, 2, 3) folder = "ac" & folderstring 'folderstring = Sheets(2).Cells(i, 1) ' for Number of Random files For j = 1 To 10 rand = Int(Rnd * (200 - 1) + 1) filenum = 0 filenum = 1000 + rand filestring = CStr(filenum) filestring = Mid(filestring, 2, 3) 'URL = "http://ceobihar.nic.in/PSCDROM/ac" & folderstring & "/i" & folderstring & "0" & filestring & ".pdf" URL = "http://www.elections.tn.gov.in/pdfs/dt1/" & folder & "/" & folder & filestring & ".pdf" ' URL =http://www.wb.nic.in/wbeco/EROLLS/PDF/English/A001/a0010105 .pdf Cells(k, 1) = folderstring Cells(k, 2) = folder Cells(k, 3) = filestring Cells(k, 3) = URL k = k + 1 Next j Next i End Sub plz define it
When are redim statement and preserve keyword used in the vbscript language?
write a vb script to open a text file and write into it