选择题什么的有答案不抄就是折磨人,问答题还是要参考一下的。不要直接复制哦,最好把结构函数变一下
切换所有窗口标题包含"Internet Explorer"关键字符的窗口,请作答。
HwndEx = Plugin.Window.Search("Internet Explorer") //搜索包含ie窗口获得句柄
dim MyArray
MyArray = Split(HwndEx, "|") //分割找到的窗口句柄
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
Call Plugin.Window.Restore(MyArray(i))
i=i+1
Next
End If
<span style="color: rgb(70, 70, 70); font-family: 'Microsoft YaHei', 'Helvetica Neue', SimSun; font-size: 14px; line-height: 21px; background-color: rgb(240, 231, 180);">随机生成3~9个60~91之间的奇数,并</span><span style="color: rgb(70, 70, 70); font-family: 'Microsoft YaHei', 'Helvetica Neue', SimSun; font-size: 14px; line-height: 21px; background-color: rgb(240, 231, 180);">将生成的数值转为指定的ANSI字符代码相对应的字符,最终结果返回弹窗显示,请作答。</span>
<span style="color: rgb(70, 70, 70); font-family: 'Microsoft YaHei', 'Helvetica Neue', SimSun; font-size: 14px; line-height: 21px; background-color: rgb(240, 231, 180);"></span><pre name="code" class="vb">Dim a,b,i
Randomize
a = Int((9 - 3 + 1) * Rnd + 3)
TracePrint a
For a
Randomize
b = Int((91 - 60 + 1) * Rnd + 60)
If fix(b / 2) = abs(b / 2) Then
TracePrint "偶数结果" &b
Else
TracePrint "奇数结果" &b
MessageBox "奇数结果:" & Chr(b)
i=i+1
End If
Next
请补全下面的获取随机数的函数:
Function GetRandomNumber(upper, lower)
Dim high, low, randomNumber
If upper > lower Then
high = upper
low = lower
Else
high = lower
//大概从这开始写把
low = upper
End if
Randomize
RandomNumber = int((high-low+1)*rnd+low)
GetRandomNumber = randomNumber
End Function
切换所有窗口标题包含"Internet Explorer"关键字符的窗口,请作答
HwndEx = Plugin.Window.Search("Internet Explorer") //搜索包含ie窗口获得句柄
dim MyArray
MyArray = Split(HwndEx, "|") //分割找到的窗口句柄
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray) //循环下标的次数
Call Plugin.Window.Restore(MyArray(i)) //切换窗口
i=i+1
Next
End If