（1）单击读数据按钮,把考生文件夹下in4.dat文件中已按升序方式排列的60个数读入数组A,并显示在text1中

“不可能”用英语怎么读最好是鼠标单击读

fypg1年前3

alkaeda 共回答了25个问题 | 采纳率88%

下载有道词典,翻译在发音.
impossible
英 [ɪmˈpɒsəbl] , 美 [ɪmˈpɑsəbəl]

1年前查看全部

哪一位牛人帮忙解一道高数题?本人已做到求最大值的部分，就是那个定积分，（单击图可以放大）

萍语1年前1

pangweifen 共回答了24个问题 | 采纳率87.5%

Φ'(x)=(3x+1)/(x^2-x+1)>0(在[0,1]内)
故Φ(x)单调上升,最大值为
Φ(1)=∫[0,1](3t+1)/(t^2-t+1)*dt
=∫[0,1]3(t-1/2)/(t^2-t+1)dt+5/2∫[0,1]1/[(t-1/2)^2+3/4]dt
=3/2∫[0,1]1/(t^2-t+1)d(t^2-t+1)+10/3∫[0,1]1/[1+(2/√3*(t-1/2))^2]dt
=3/2ln(t^2-t+1)|[0,1]+5√3/3arctan[2/√3*(t-1/2)]|[0,1]
=5√3/3[π/6-(-π/6)]=5π√3/9

1年前查看全部

在Word文档中单击选定一个对象后，与之相关的工具栏如图所示 由此判断，该对象可能是 Select one: A. 自选

在Word文档中单击选定一个对象后，与之相关的工具栏如图所示 由此判断，该对象可能是 Select one: A. 自选
在Word文档中单击选定一个对象后，与之相关的工具栏如图所示
由此判断，该对象可能是
Select one:
A. 自选图形
B. 图片
C. 文本框
D. 艺术字

尚玄乐3681年前1

mickiss 共回答了15个问题 | 采纳率93.3%

1年前查看全部

5·执行下面程序,单击Commandl按钮后,显示在窗体上的第一行内容是(13)

5·执行下面程序,单击Commandl按钮后,显示在窗体上的第一行内容是(13)
第二行内容是( 14 )、第三行的内容是( 15 )
Option Explicit
Dim A As Integer
Private Sub Commandl_Click()
Dim B As Integer
A=1：B=2
Print funl(funl(A,B),B)
Print A
Print B
End Sub
PriVate Function funl(X As Integer,Y As Integer)As Integer
Dim I As Integer
For I=1 To Y
Y=Y+1
X=X+1
A=X+Y
Next I
funl=A+Y
End Function

dh_pu_4c_2rq4db31年前1

江湖路人 共回答了18个问题 | 采纳率94.4%

111

1年前查看全部

在Word编辑状态下，若要在当前窗口中打开（或关闭）“绘图”工具栏，则可选择的操作是单击（ ）菜单项

在Word编辑状态下，若要在当前窗口中打开（或关闭）“绘图”工具栏，则可选择的操作是单击（ ）菜单项
A、“工具”→“绘图”
B、“视图”→“绘图”
C、“编辑”→“工具栏”→“绘图”
D、“视图”→“工具栏”→“绘图”

buzyang1979991年前1

red手冷 共回答了20个问题 | 采纳率100%

D

1年前查看全部

vb题 求解1，在窗体上建立一个单选按钮数组Option1和标签Label1。请在下面空白处填入合适内容，使之单击一个单

vb题 求解
1，在窗体上建立一个单选按钮数组Option1和标签Label1。请在下面空白处填入合适内容，使之单击一个单选按钮时，将该按钮的标题作为标签标题。
Private Sub Option1_Click(Index As Integer)
　　Label1.Caption=_____
End Sub
A）Option1(Index).Caption
B）Option1.Caption(Index)
C）Option1.Caption
D）Option1(Index+1).Capton
2，【单选题】假定有如下的Sub过程：
Sub S（byval x As Single, y As Single）
t = x : x =t/y : y =t Mod y
End Sub
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click ( )
Dim a As Single, b As Single
a =8 : b =5
S a, b
Print a, b
End Sub
程序运行后，单击命令按钮，输出结果为_____。
A） 1.6 　　5
B） 1.6　　 3
C） 8 5
D） 8 　　 3

zhouwl1年前1

tyxinjiang 共回答了18个问题 | 采纳率83.3%

AD,.
第一题 Option1是控件数组，Option1(Index) 表示被点击的那个Option，其标题是Option1(Index).Caption，故选A。
第二题sub s的第一个参数是传值（byval),故a=8不变，最后还是8,；而第二个参数是传址（vb默认是传址），故b与y一起变化，b=8 mod 5=3,选D

1年前查看全部

这两个题的思路有点小，放大再看吧（单击图片）

这两个题的思路


有点小，放大再看吧（单击图片）

ffn11231年前2

myxccf 共回答了21个问题 | 采纳率61.9%

第七题：A,错误.因为温度决定了Kw.不同温度下中性溶液的pH不同.90℃时pH=6为中性.
B,错误.因为氨水被稀释后碱性一定减少,这就意味着H+的浓度增大.
C,正确.因为醋酸是弱酸.如果把题目中的醋酸换做强酸,混合后pH就是7.但是醋酸被消耗后仍会电离一部分,所以酸是过量的.
D：错误.可以将混合后的溶质看做主要是由KHCO3、K2SO4、KCl组成的.显然溶液应该是碱性的.
第十题：A,正确.混合前含有A原子的所有粒子浓度为0.2mol/L.混合后就变成了0.1mol/L.而含有A原子的粒子只有HA和A- .
C,正确.电荷守恒式.
B,正确.由题意得,氢离子的浓度大于氢氧根离子,钠离子的浓度大于氯离子.为保持电荷守恒式的成立,A离子的浓度一定大于HA.
D,错误.由A选项的推理,c(Na+)=c(A-)+c(HA)
如果LZ还有不懂的或者我有打错的及时再问~

1年前查看全部

VB编程题目单击按钮随机产生5个0-9之间不同的整数并排序,试求出5个数能组合的所有5位数显示在文本框中,并求出最大数和

VB编程题目
单击按钮随机产生5个0-9之间不同的整数并排序,试求出5个数能组合的所有5位数显示在文本框中,并求出最大数和最小数,以及它们的差,显示在标签中.

谁是我的传说1年前1

飘洒的回忆 共回答了27个问题 | 采纳率96.3%

Dim a(5) As Double
for i= 1 to 5
a(i)=fix(rnd*10)
next i
For i = 1 To 4
For j = 1 To 5 - i
If a(j) < a(j + 1) Then
temp = a(j)
a(j) = a(j + 1)
a(j + 1) = temp
End If
Next j
Next i
然后拿五个分别赋值a1到5,转化成字符
这样就可以排列了,最大最小就是正序和倒序排列,上课了,不打了

1年前查看全部

这道计算机选择题选什么？要不连续选定多张幻灯片，在单击选定的幻灯片视图按钮前，应按住______。请选择一个答案：a.

这道计算机选择题选什么？
要不连续选定多张幻灯片，在单击选定的幻灯片视图按钮前，应按住______。
请选择一个答案：
a. A.SHIFT键
b. B.CTRL键
c. C.ENTER键
d. D.ALT键

luocancan1年前1

qianniuhua1000 共回答了11个问题 | 采纳率100%

1年前查看全部

英语ppt课件设计中,填空题中怎样使一段课文中单词单击下划线时飞入?

落雪飞花花满天1年前1

lushiping 共回答了19个问题 | 采纳率89.5%

首先选择空白版式的幻灯片,然后点击插入—文本框—水平,在幻灯片中拉出文本框,输入你的文章留下空格,如：I'm ___ tired ___ cook dinner... 填空的方法：点击插入—文本框—水平,在幻灯片中拉出另一个文本框,输入答案too等,调整文本框大小和位置.右键单击课文文本框—自定义动画—添加效果—右键单击too的文本框—自定义动画—添加效果 以此类推. 不过这个在播放时 点击屏幕任意地方都可飞入答案.

1年前查看全部

帮我做一下下面这个vb题吧具体要求（1）编写一个函数，功能是求出两个数的最大公约数，并在command1按钮的单击事件中

帮我做一下下面这个vb题吧
具体要求（1）编写一个函数，功能是求出两个数的最大公约数，并在command1按钮的单击事件中调用这个函数。数的输入通过键盘输入。最大公约数的结果显示在窗体上。
（2）在command2按钮的单击事件中，判断输入的正整数是不是素数。
数的输入通过键盘输入。素数判断结果通过msgbox对话框输出，如果是素数，提示“是素数”，反之提示“不是素数”

ee之夜1年前1

zhongmeiyu 共回答了18个问题 | 采纳率77.8%

Private Sub Command1_Click()
Dim A, B, I As Integer
A = Val(InputBox("请输入第一个整数："))
B = Val(InputBox("请输入第二个整数："))
If A > B Then
I = A: A = B: B = I
End If
For I = A To 1 Step -1
If B Mod I = 0 And A Mod I = 0 Then
Print A & " 和 "; B & " 的最大公约数是："; I
Exit For
End If
Next
End Sub
Private Sub Command2_Click()
Dim A, B, I As Integer
A = Val(InputBox("请输入一个整数："))
B = Sqr(A)
For I = 2 To B
If A Mod I = 0 Then
Exit For
End If
Next
If I < B Then
MsgBox (A & " 不是素数")
Else
MsgBox (A & " 是素数")
End If
End Su

1年前查看全部

VB程序设计设计一程序，图中有一小闹钟，一个小汽车。两个控件（一个为开始，一个为停止）。程序运行时，如果单击“开始”按钮

VB程序设计
设计一程序，图中有一小闹钟，一个小汽车。两个控件（一个为开始，一个为停止）。程序运行时，如果单击“开始”按钮，这窗体上的汽车图标每0.1秒向右移动20（初始状态下不移动）；如果单击“停止”按钮，则汽车图标停止移动。
（注意：编写事件的过程中不能使用变量，每一个事件过程中只能有一条语句）

jordanliang20051年前1

2008志愿者 共回答了21个问题 | 采纳率90.5%

添加三个CommandButton 将Command1当成小汽车 一个Timer 设置其Timer1.Enabled=False Timer1.Interval=100 示例代码如下：
Private Sub Command2_Click()
Timer1.Enabled = True
End Sub
Private Sub Command3_Click()
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
Command1.Left = Command1.Left + 20
If Command1.Left + Command1.Width = Width Then Command1.Left = 0
End Su

1年前查看全部

4、在PowerPoint 2003中，要在幻灯片非占位符上空白处增加一段文本，可以______。 A：单击绘图工具栏的

4、在PowerPoint 2003中，要在幻灯片非占位符上空白处增加一段文本，可以______。 A：单击绘图工具栏的竖
本题多选

5783470371年前1

林凌儿 共回答了15个问题 | 采纳率80%

选B

1年前查看全部

VB高手看看这题怎么做啊（32）通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命

VB高手看看这题怎么做啊
（32）通用对话框的名称为CommonDialog1，命令按钮的名称为Command1，则单击命令 按钮后，能使打开的对话框的标题为“New Title ”的事件过程是（ ）。 A ）Private Sub Command1_Click( ) CommonDialog1.DialogTitle="New Title" CommonDialog1.ShowPrinter End Sub B ）Private Sub Command1_Click( ) CommonDialog1.DialogTitle="New Title" CommonDialog1.ShowFont End Sub C）Private Sub Command1_Click( ) CommonDialog1.DialogTitle = "New Title" CommonDialog1.ShowOpen End Sub D ）Private Sub Command1_Click( ) CommonDialog1.DialogTitle="New Title" CommonDialog1.ShowColor 这题选什么，顺便解释下

爱你没一天1年前1

瘦肉皮蛋 共回答了20个问题 | 采纳率85%

选C
CommonDialog1.ShowOpen函数打开的是文件对话框
A选项中：CommonDialog1.ShowPrinter 函数如果存在的话，就是打开打印机对话框
B选项中：CommonDialog1.ShowFont 函数打开字体对话框
D选项中： CommonDialog1.ShowColor 函数打开颜色对话框

1年前查看全部

谁帮我做份VB试题!1．对象的三要素是 、 和 .2．如果要在单击命令按钮Command2时执行一段代码,则应将这段代码

谁帮我做份VB试题!
1．对象的三要素是 、 和 .2．如果要在单击命令按钮Command2时执行一段代码,则应将这段代码写在 事件过程中.3．下列语句执行后,S的值是 .T=”数据库管理系统” S=Right(t,2)+Mid(t,4,2)+Left(t,3) 4．设有数组声明语句：Option Base 1 Dim d(3,-1 To 2) 以上语句所定义的数组d为 维数组,共有 个元素,第一维下标从 到,第二维下标从 到 .5．为了使标签中的标题（Caption）内容居中显示,应将Alignment属性值设置为 .6．要使文本框Text1具有焦点,应执行的语句是 .7．要在标签Label1上显示“a*b=”,所使用的语句是 .8．确定一个控件大小的属性是 和 .9．如果要使计时器每分钟触发一个Timer事件,则Interval属性应设置为 .10．如果只允许在列表框中每次只能选择一个列表,则必须将其MultiSelect属性设置为 .11．用户可以通过 （1） 属性来设置3种不同风格的组合框,在这3种组合框中,仅供选择其中表项数据,但不允许添加数据的组合框是 （2） .12．控件数组的名称由 属性指定,而数组中每个元素的索引值由 属性指定.

liyushui2191年前1

wnzcs 共回答了21个问题 | 采纳率81%

属性、事件和方法 command2_click()事件 系统管理数据库 二六1 3 1 2 2 - Center text1.setfocus label1.caption="a*b=" width height 60000 1 - Simple Style 2 - Dropdown List 名称Index

1年前查看全部

计算机基础,第21题 (1.0) 分 以下不能进行输入法语言选择的是______.A、先单击语言栏上表示语言的按钮,然后

计算机基础,
第21题 (1.0) 分 以下不能进行输入法语言选择的是______.a、先单击语言栏上表示语言的按钮,然后选择 b、先单击语言栏上表示键盘的按钮,然后选择 c、在任务栏属性对话框中设置 d、按下ctrl和shift键 第22题 (1.0) 分 下列不是汉字输入码的是______.a、全拼 b、五笔字型 c、ascii码 d、双拼 第23题 (1.0) 分在windows桌面底部的任务栏中,一般会出现的图标有______.a、“开始”按钮、“快速启动工具栏”、应用程序图标及“指示器” b、“资源管理器”按钮、“快速启动工具栏”、应用程序图标及“指示器” c、“开始”按钮、“资源管理器”快捷菜单、应用程序图标及“指示器” d、“开始”按钮、“快速启动工具栏”、 “指示器”及“屏幕设置”快捷菜单 第24题 (1.0) 分 下列各类存储器中,断电后其中信息会丢失的是______.a、rom b、ram c、硬盘 d、软盘 第25题 (1.0) 分 在excel中,假定一个单元格所存入的公式为“=13*2+7”,则当该单元格处于非编辑状态时显示的内容为______.a、13*2+7 b、=13*2+7 c、33 d、=33 第26题 (1.0) 分在powerpoint中,插入swf格式的flas***画的方法是______.a、“插入”菜单中的“对象”命令 b、shockwave flash object控件 c、设置文字的超链接 d、设置按钮的动作 第27题 (1.0) 分 使用outlook express的通讯簿,可以很好管理邮件,下列说法正确的是______.a、在通讯簿中可以建立联系人组 b、两个联系人组中的信箱地址不能重复 c、只能将已收到邮件的发件人地址加入到通讯簿中 d、更改某人的信箱地址,其相应的联系人组中的地址不会自动更新 第28题 (1.0) 分 在幻灯片视图窗格中,在状态栏中出现了“幻灯片2／7”的文字,则表示______.a、共有7张幻灯片,目前只编辑了2张 b、共有7张幻灯片,目前显示的是第2张 c、共编辑了七分之一张的幻灯片 d、共有9张幻灯片,目前显示的是第2张 第29题 (1.0) 分 word的“文件”菜单下部一般列出4个用户最近用过的文档名,文档名的个数最多可设置为______.a、6个 b、8个 c、9个 d、12个 第30题 (1.0) 分 e-mail地址中@的含义为 ______.a、与 b、或 c、在 d、和

天堂小笨鱼1年前1

超级火箭人1 共回答了26个问题 | 采纳率92.3%

21.C 22.C 23.A 24.B 25.C 26.B 27.A 28.B 29.C 30.C 希望我的答案对你能有所帮助!

1年前查看全部

单击图片,可以放大查看.选择适当的单词填空,注意单词的变换,其中有两个单词是多余的.1

bltzhwl1年前1

snowwolflake2008 共回答了17个问题 | 采纳率88.2%

1 in style
2 size
3 prefer
4 worry
5 wash
6 cheap
7 in total
8 available

1年前查看全部

vb，求100以内的素数。(单击窗体显示如图结果)。

潜力古1年前1

美人鱼走路 共回答了23个问题 | 采纳率100%

Private Sub Form_Click()Dim i As IntegerDim s As Integers = 0For i = 2 To 100For j = 2 To Sqr(i)If i Mod j = 0 Then Exit ForNext jIf j > Sqr(i) Thens = s + iPrint i; sEnd IfNext iPrint sEnd Su

1年前查看全部

西班牙语r的发音问题我是一个西班牙语初学者,学到r的发音,看书上说r有单击颤音和双击颤音,双击是没问题,可是就是不知道单

西班牙语r的发音问题
我是一个西班牙语初学者,学到r的发音,看书上说r有单击颤音和双击颤音,双击是没问题,可是就是不知道单击颤音具体是怎么发的.如果只是短的颤音,听录音又觉得不像,是要把颤音控制到只弹舌一两下么?
其实我说的双击就是多颤，多颤我会。我也觉得书上说的有点不恰当。我只是想知道单击是怎么一回事。

changjunabc1年前4

silverhhf 共回答了20个问题 | 采纳率80%

把舌头轻轻放在离上齿不远的地方,然后舌根放松,肺部膈肌用力,从口出气.就发出了rr的音.其实在真正说西班牙语的地方,在单词的结尾你把rr和r发成同一个音是无所谓的.在单中出现r,则需要像弹舌一样把舌头从上颚弹向上齿的位置.这样就是一个但颤音.多颤和单颤有分别,但是你说的“双击”就太刻板了…… 单颤 r 说出来口型像说“了”这个字,但是舌头是把这个音弹出来的.而 l 则像英语的发音,是舌头顶着上齿尖发出的.你可以好好体会一下用舌尖拨动上颚发出的 r 音 和 舌尖震动发出的 rr 音 还有舌头不动发出的 l 音.

1年前查看全部

10个基础写作题!感觉错好多,可单击图片查看原图

10个基础写作题!感觉错好多,可单击图片查看原图
那个是不是应该do you mind my.,还有别的都对吗?像最后一个连词

harroit1年前1

阴情不定 共回答了9个问题 | 采纳率100%

都是对的,你可以放心了·!

1年前查看全部

4. 当前活动窗口是文档d1.docx的窗口，单击该窗口的“最小化”按钮后______。A. 不

4. 当前活动窗口是文档d1.docx的窗口，单击该窗口的“最小化”按钮后______。A. 不
4. 当前活动窗口是文档d1.docx的窗口，单击该窗口的“最小化”按钮后______。A. 不显示d1.docx文档的内容，但d1.docx文档并未关闭
B. 该窗口和d1.docx文档都被关闭
C. d1.docx文档未关闭，且继续显示其内容
D. 关闭了d1.docx文档但该窗口并未关闭

shyshy9681年前1

panshx 共回答了19个问题 | 采纳率89.5%

A..................

1年前查看全部

计算机基础9. 在幻灯片视图中，编辑好当前幻灯片后，要继续编辑下一张幻灯片，应该( )。A. 单击“文件”菜单中的“新建

计算机基础
9. 在幻灯片视图中，编辑好当前幻灯片后，要继续编辑下一张幻灯片，应该( )。
A. 单击“文件”菜单中的“新建”命令
B. 单击“插入”菜单中的“新幻灯片”命令
C. 单击“窗口”菜单中的“新建窗口”命令
D. 按键盘时的PageDown键

renjianyouqing1年前1

天门陈威 共回答了27个问题 | 采纳率85.2%

B

1年前查看全部

A )17． 在Windows 中，要打开“资源管理器”窗口，正确的操作是 A．用鼠标右键单击“开

A )17． 在Windows 中，要打开“资源管理器”窗口，正确的操作是 A．用鼠标右键单击“开
A )17． 在Windows 中，要打开“资源管理器”窗口，正确的操作是
A．用鼠标右键单击“开始”按钮，然后在弹出的快捷菜单中选“资源管理器”项
B．用鼠标右键单击“开始”按钮，然后在弹出的快捷菜单中选“打开”项
C．用鼠标右键单击“我的电脑”图标，然后在弹出的快捷菜单中选“打开”项
D．先打开“我的电脑”窗口，然后双击其中的“资源管理器”图标

flying01171年前1

不沉的于楠 共回答了14个问题 | 采纳率85.7%

A，

1年前查看全部

javascript求大神指导设计以下的九宫排序程序。首先显示如图1所示的9个按钮。当单击开始时，用随机数产生8个数显示

javascript求大神指导

设计以下的九宫排序程序。首先显示如图1所示的9个按钮。当单击开始时，用随机数产生8个数显示在按钮上，其中有一个空白，如图2所示。其后，当单击图中空白边上的数字时，数字移动空白位置，如图3所示。

赤明1年前1

实力oo宁 共回答了17个问题 | 采纳率94.1%

好有意思的呀
//创建界面
var div=document.createElement("div");
var btns=[[],[],[]];
var values=[[],[],[]];
for(var i=0;i<3;i++){
for(var j=0;j<3;j++){
var input=btns[i][j]=document.createElement("input");
input.type="button";
input.value=" ";
input.index={row:i,col:j}
div.appendChild(input);
}
div.appendChild(document.createElement("br"));
};
input=document.createElement("input");
input.type="button";
input.value="开始";
document.body.appendChild(div);
div.appendChild(input);
//生成完毕

//动作
div.addEventListener("click",function(e){
var elem=e.target;
if(elem==input){
var arr=[" ",1,2,3,4,5,6,7,8];
for(var i=0,idx;i<3;i++){
for(var j=0;j<3;j++){
idx=Math.floor(Math.random()*arr.length);
btns[i][j].value=arr[idx];
arr.splice(idx,1);
}
}
}else if(elem.nodeName=="INPUT"){
var idx=elem.index,btn;
if(idx.value==" "){
return;
};
while(true){
if(idx.row>0){//上
btn=btns[idx.row-1][idx.col];
if(btn.value==" ")break;
};
if(idx.row<2){//下
btn=btns[idx.row+1][idx.col];
if(btn.value==" ")break;
};
if(idx.col>0){//左
btn=btns[idx.row][idx.col-1];
if(btn.value==" ")break;
};
if(idx.col<2){//右
btn=btns[idx.row][idx.col+1];
if(btn.value==" ")break;
};
btn=null;
break;
};
if(btn){
btn.value=elem.value;
elem.value=" ";
};
};
});

1年前查看全部

在Word中，对已经选定的文本，下列不能使调整栏段落左边界右移的操作是 A 按Tab键 B 单击格式栏上的“增加

在Word中，对已经选定的文本，下列不能使调整栏段落左边界右移的操作是 A 按Tab键 B 单击格式栏上的“增加
在Word中，对已经选定的文本，下列不能使调整栏段落左边界右移的操作是
A 按Tab键 B 单击格式栏上的“增加缩进量”按钮 C 右移水平标尺上的“左缩进“ D 直接将段落中左边文字的向右拖动

lj111811年前1

yclidong 共回答了20个问题 | 采纳率80%

我选D

1年前查看全部

求按键精灵条件脚本的编写方法想要这样的脚本，内容如下：鼠标移动到（1138，462）每隔200毫秒单击一次鼠标左建无限循

求按键精灵条件脚本的编写方法
想要这样的脚本，内容如下：
鼠标移动到（1138，462）每隔200毫秒单击一次鼠标左建无限循环，直到点（1148，637）的颜色为“CF86FF”，则鼠标移动到该点并单击一次。
这之后，当点（1076，642）的颜色为“CF86FF”，则鼠标移动到该点并单击一次。
这之后，当点（1235，629）的颜色是“CF86FF”，则鼠标移动到该点并单击一次。
延迟1000毫秒后循环上面的脚本

你的地盘你hh1年前1

1622025 共回答了23个问题 | 采纳率78.3%

Do
MoveTo 1138.462
LeftClick 1
GetColor=GetPixelColor(1148,637)
If GetColor = "CF86FF" Then
MoveTo 1148, 637
LeftClick 1
Do
GetColor=GetPixelColor(1076,642)
If GetColor = "CF86FF" Then
MoveTo 1076, 642
LeftClick 1
Do
GetColor=GetPixelColor(1235,629)
If GetColor = "CF86FF" Then
MoveTo 1235,629
LeftClick 1
Delay 1000
RestartScript
End If
loop
End If
loop
End If
loop
复制以上代码可达成。

1年前查看全部

实验8：编写一个VB.NET程序,要求3个问题在同一个窗体内实现.在窗体上设置三个按钮,单击每个按钮,分别完成每个问题.

实验8：编写一个VB.NET程序,要求3个问题在同一个窗体内实现.在窗体上设置三个按钮,单击每个按钮,分别完成每个问题.
在窗体上放置1个文本框.在文本框中输入英文字符,单击按钮会将文本框中的所有大写字符转换为小写,所有小写字符转换为大写.如输入I Just MEET Her,则输出为i jUST meet hER.
输入一个学生的五门课的考试成绩,判断其是否为优秀.优秀的条件为：五门课成绩总分超过450分或每门课程在88以上或每门主课（前三门）的成绩都在95分以上其他课程在80分以上.
运输部门的货物运输与里程有关,距离越远,每吨货物的单价越低,假设每吨单价P与距离S之间的关系如下,
32 S

阿默公子1年前1

爱吃的小猪7171 共回答了14个问题 | 采纳率100%

第一题、
Private Sub Command1_Click()
Dim a As Integer, b As String, i As Integer, c() As String
a = Len(Text1.Text)
Print a
ReDim c(a) As String
For i = 1 To a
b = Mid(Text1.Text, i, 1)
Select Case b
Case "a" To "z"
c(i) = UCase(b)
Case "A" To "Z"
c(i) = LCase(b)
Case Else
c(i) = Chr(32)
End Select
Next i
Text1.Text = ""
For i = 1 To a

Text1.Text = Text1.Text & c(i)
Next i
End Sub
2、
Private Sub Form_click()
Dim a(5) As Double, i As Integer, j As Integer, k As Integer, sum As Double
Dim flag As Boolean, how As Boolean
For i = 1 To 5
a(i) = Val(InputBox("please input", "input number"))
sum = sum + a(i)
Next i
If sum > 450 Then
flag = True
how = True
End If
For k = 1 To 5
If a(k) > 88 Then
flag = True
how = True
End If
Next k
For j = 1 To 3
If a(j) > 95 Then flag = True
Next j
For k = 4 To 5
If a(k) > 80 Then how = True
Next k
If flag = True And how = True Then
Print "excellent"
End If
End Sub
3、Private Sub Form_click()
Dim s As Single, price As Single, total As Single
s = Text1.Text
If s < 100 Then
price = 32
ElseIf 100

1年前查看全部

在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市消失。下列在Li

在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市消失。下列在List_Click事件过程中能正确实现上述功能的语句是（ ）
（A）List1.RemoveItem List1.text

（B）List1.RemoveItem List1.clear

（C）List1.RemoveItem List1.ListCount

（D）List1.RemoveItem List1.ListIndex

luotianbin201年前1

每日C果酸 共回答了17个问题 | 采纳率76.5%

Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "山西"
List1.AddItem "辽宁"
List1.AddItem "浙江"
List1.AddItem "广东"
Label1 = "列表框的使用"

'属性栏里设置MultiSelect为2
End Sub
Private Sub List1_Click()
Dim tmp As String
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
tmp = tmp + List1.List(i) & vbCrLf
End If
Next
MsgBox tmp

End Su

1年前查看全部

如图： 单击打开）点P是△ABC内一点,试说明AB+AC>PB+PC但我就是转不过弯来,要用“三角形中任意两条边的和大于

如图：



单击打开）
点P是△ABC内一点,试说明AB+AC>PB+PC
但我就是转不过弯来,要用“三角形中任意两条边的和大于另一条边”的原理.

愿景04131年前4

断刀流水1576 共回答了17个问题 | 采纳率94.1%

延长BP交AC与T
AB+AT>BT
两边加上TC
AB+AC>BT+TC(1)
又TP+TC>PC
两边加上BP,有
BT+TC>BP+PC(2)
结合(1)(2)两式,得到AB+AC>PB+PC

1年前查看全部

对窗体Form1设计了菜单mnuMain，如果想右键单击鼠标弹出该菜单，应该在Form1的MouseDown事件中使用P

对窗体Form1设计了菜单mnuMain，如果想右键单击鼠标弹出该菜单，应该在Form1的MouseDown事件中使用Popupmenu方法，正确的语句为_______
A. Popupmenu Form1.mnuMain B. mnuMain.Popupmenu
C. Form1.Popupmenu mnuMain D. Form1.mnuMain Popupmenu

爱在深圳的日子1年前1

蓉521 共回答了18个问题 | 采纳率83.3%

A

1年前查看全部

求计算机软件技术基础答题答案设计窗体上有文本框\按钮\;列表框各一个,在文本框中输入任意一个英文句子,单击按钮,程序将该

求计算机软件技术基础答题答案
设计窗体上有文本框按钮;列表框各一个,在文本框中输入任意一个英文句子,单击按钮,程序将该句分解为单词,每一个单词作为一个条目添加到列表框中.

19911271年前1

boclv 共回答了17个问题 | 采纳率100%

如果定义的列表框ID为comboBox1,文本框ID为textBox1,按钮ID为button1,则button1_Click为button1的点击事件.
C#代码如下
private void button1_Click(object sender,EventArgs e)
{
comboBox1.Items.Clear();
comboBox1.Items.AddRange(textBox1.Text.Split(new string[] { " " },StringSplitOptions.RemoveEmptyEntries));
}
//OK,如果你用的C#再好不过,用VB也很容易修改,如果是Java 或C的话,那你看着改吧
//另,以后问个问题 记得给个悬赏,挂个零蛋不嫌寒碜人吗

1年前查看全部

vb编程 急求~第1题：单击窗体，在窗体上画出一个当前窗体中所能容纳的最大的红色实心椭圆（即椭圆的上下左右分别与窗体的上

vb编程 急求~
第1题：单击窗体，在窗体上画出一个当前窗体中所能容纳的最大的红色实心椭圆（即椭圆的上下左右分别与窗体的上下左右相切）。
第2题：程序运行时，使窗体的高度和宽度相等，单击窗体，改变窗体坐标系长宽均为300个单位，过窗体中点（即原点）画出互相垂直的两条蓝色直线，用红色画函数曲线y=x2-2x+6在[-10，10]区间的图形(要求图形开口向上)。

灵儿12341年前1

jiabei 共回答了18个问题 | 采纳率83.3%

第1题：
Private Sub Form_Click()
Dim A As Long, B As Long
Dim X As Long, Y As Long
A = Me.ScaleWidth / 2
B = Me.ScaleHeight / 2
Me.Cls
Me.FillColor = vbRed
Me.FillStyle = 0
Me.Circle (A, B), IIf(A > B, A, B), vbRed, , , B / A

End Sub
第2题：
Private Sub Form_Click()
Dim X As Single, Y As Single
Me.ScaleMode = 3
Me.Width = 300 * Screen.TwipsPerPixelX + Me.Width - Me.ScaleWidth * Screen.TwipsPerPixelX
Me.Height = 300 * Screen.TwipsPerPixelY + Me.Height - Me.ScaleHeight * Screen.TwipsPerPixelY

Me.Line (0, 150)-(300, 150), vbBlue
Me.Line (150, 0)-(150, 300), vbBlue

For X = -10 To 10 Step 0.01
Y = X * X - 2 * X + 6
Me.PSet (X + 150, 150 - Y), vbRed
Next

End Su

1年前查看全部

易语言/怎么在设定的取值范围中取随机数?比如我在编辑框1中有11\38\61\54\99等数,单击按钮1时,框2中显示

青山郭外斜1年前2

蝴蝶蓝泪 共回答了22个问题 | 采纳率86.4%

数组= 分割文本（编辑框1.内容,“")
编辑框2.内空=数组[取随机数（1,取数组成员数（数组))]

1年前查看全部

要选择某个文本段落，可以将鼠标移到该段落左侧的选择区，再（ ）。 A．单击鼠标左键 B．单击鼠标右键 C．

但使主人能醉客1年前1

飘流的笑 共回答了21个问题 | 采纳率95.2%

选择A

1年前查看全部

单击某菜单时,会看到有些子菜单中有省略号和三角号,他们代表的意思分别是什么?

aixerxcj1年前1

业内人士 共回答了15个问题 | 采纳率93.3%

三角代表含有可扩展的子菜单；省略号嘛,多是表示需要更进一步的详细操作才可完成的命令.

1年前查看全部

ASP.NET(C#)程序启动后自动产生两个100以内的随机整数显示在屏幕上，用户输入算式的答案后单击"确定"按钮，程序

ASP.NET(C#)
程序启动后自动产生两个100以内的随机整数显示在屏幕上，用户输入算式的答案后单击"确定"按钮，程序将算式显示出来并通过"√"或“×"给出判定，对出错的算式醒目显示，同时给出下一道题。如果用户没有输入算式答案而直接单击"确定"按钮，程序将出错提示。当用户单击"结束"按钮时，屏幕上显示共出题数、正确数、错误数和得分，其中得分计算方法为：得分=正确数/总数*100.继续输入算式总数，并单击"确定"按钮，开始新一轮的加法练习。

huoyanhui0011年前1

擦肩而遇 共回答了13个问题 | 采纳率92.3%

这个不难，楼主肯定是纠结怎麼在一个页面实现它。
1,全部随机的题就不用数据库了，用一个随机函数调出来，然後用数组记录下来每一次的题目，正确与否。
2，数据在页面的传递就用session，因为在同一个页面，点击button会触发刷新，要在页面放一个隐藏的label来记录是第几题，每点一次label加一，根据这个label上的数来确定当前是第几题，并存在数组title[i] 中。不然的化button导致刷新每次都是第一题。
3，最後考试结束的现实问题就用div， 这样在後台就可以取到这个div 让这个div显示考生的作答情况。
希望可以帮到你~

1年前查看全部

用vb 编写一个评委打分的程序1． 编写一个评委打分的程序，实现以下功能：a) 单击“评委给分”按钮时弹出InputBo

用vb 编写一个评委打分的程序
1． 编写一个评委打分的程序，实现以下功能：
a) 单击“评委给分”按钮时弹出InputBox对话框，用来接收10个评委给的分数，并将分数显示在文本框Text1中。

b) 单击“最后得分”按钮时，将最高分、最低分分别显示在文本框Text2、Text3中，将最后的得分结果（除去最高分和最低分的平均值）显示在文本框Text4中。
c) 单击“清除”按钮时，清空所有的文本框。
d) 单击“退出”按钮时，退出程序。

北镇抚司011年前1

期待下一个十年 共回答了20个问题 | 采纳率80%

Dim a(10) As Integer
Private Sub Command1_Click()
For i = 1 To 10
a(i) = InputBox("请输入第" & i & "个分数")
Text1.Text = Text1.Text & Str(a(i))
Next i
End Sub
Private Sub Command2_Click()
Max = a(1)
Min = a(1)
For i = 1 To 10
s = s + a(i)
If Max < a(i) Then Max = a(i)
If Min > a(i) Then Min = a(i)
Next i
s = (s - Max - Min) / 8
Text2.Text = Max
Text3.Text = Min
Text4.Text = s
End Sub
Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Private Sub Command4_Click()
End
End Su

1年前查看全部

VB 代码 求助，高手进加法测验。（用控件数组完成）要求如下：（1）单击“出题”按钮，则随机生成10道加法题，要求第一个

VB 代码 求助，高手进
加法测验。（用控件数组完成）要求如下：
（1）单击“出题”按钮，则随机生成10道加法题，要求第一个数为2位数，第二个数为1~9的数。
（2）单击“判分”按钮，判断每题的正误，并显示出来，并给出所得分数，每对一题得10分。

只爱陌生银1年前1

gg男 共回答了19个问题 | 采纳率68.4%

Private Sub Command1_Click()RandomizeFor i = 0 To 9Label1(i).Caption = Int(Rnd * 90) + 10Label3(i).Caption = Int(Rnd * 9) + 1Label5(i).Caption = ""Text1(i).Text = ""Label7.Caption = ""NextEnd SubPrivate Sub Command2_Click()For i = 0 To 9If Val(Text1(i).Text) = Val(Label1(i).Caption) + Val(Label3(i).Caption) ThenLabel5(i).Caption = "√"Label7.Caption = Val(Label7.Caption) + 10ElseLabel5(i).Caption = "×"End IfNextEnd SubPrivate Sub Command3_Click()For i = 0 To 9Label5(i).Caption = ""Text1(i).Text = ""Label7.Caption = ""NextEnd SubPrivate Sub Form_Load()For i = 0 To 9Label1(i).Caption = ""Label3(i).Caption = ""Label5(i).Caption = ""Text1(i).Text = ""Label7.Caption = ""NextEnd Sub

1年前查看全部

click 也就是单击是及物还是不及物?不及物的话是用做click on

月朦胧夜朦朦1年前1

制造hh 共回答了15个问题 | 采纳率93.3%

及物动词
如:clike the mouse

1年前查看全部

求VB试题 解答 ，十万火急【程序1】请写出单击窗体后，窗体上的显示结果。Option Base 0

求vb试题 解答 ，十万火急

【程序1】请写出单击窗体后，窗体上的显示结果。

option base 0

private sub form_click()

dim a

dim i as integer

a=array(1,2,3,4,5,6,7,8,9)

for i=0 to 3

print a(5-i);

next

end sub

【程序2】请写出在text1、text2、text3中依次输入2、3、4后，单击窗体时label1的显示结果。

private sub form_click()

dim a as single, b as single, c as single

a = text1.text: b = text2.text: c = text3.text

label1.caption = str(a * a + 2 * b * b + 3 * c * c)

end sub

【程序3】请写出单击窗体后，窗体上的显示结果。

private sub form_click()

for i% = 1 to 3

print spc(3 - i%);

for j% = 1 to (2 * i%) - 1: print "w";: next j%

print

next i

end sub

——————————————————————————

五、程序填空题

1．【程序说明】下面是一段计算数学表达式的程序。

private sub form_click()

dim n as integer, p as integer, s as single, q as integer, i as integer

n = inputbox("请输入n的值:")

s = 0

p = -1

q = （1）

for i = 1 to （2）

p = -p

q = （3）

s = （4） + p * i / q

（5）

print s

end sub

_______________________________________________

________________________________________________________

________________________________________________________

严肃声明，本人求解不是为了***！

crossover171年前1

liuqi520 共回答了13个问题 | 采纳率100%

一、6 5 4 3
二、70
三、
　　W　　
　WWW　　
WWWWW　　

五、
1.填空：
Private Sub Form_Click()
Dim n As Integer, p As Integer, s As Single, q As Integer, i As Integer
n = InputBox("请输入N的值:")
s = 0
p = -1
q = n
For i = 1 To n
p = -p
q = -q
s = s + p * i / q
next
Print s
……

End Su

1年前查看全部

击3.Word中，将某个选中的数字设为上标的操作步骤是（ ）。（①单击“视图”菜单；②单“格式”菜单；③选

击3.Word中，将某个选中的数字设为上标的操作步骤是（ ）。（①单击“视图”菜单；②单“格式”菜单；③选
A.①③ B.②③ C.①④ D.②④

无来讲两句1年前1

水盼金 共回答了21个问题 | 采纳率95.2%

题目看不全。
word2003步骤：
单击“格式”——“字体”——字体选项卡，上标前面打对勾——输入要做为上标的内容。
或者
先选中要做为上标的内容——单击“格式”——“字体”——字体选项卡，上标前面打对勾。

1年前查看全部

在VB程序中,单击“开始”按钮,直线以顺时针旋转（每秒转6度,一分钟转一圈）；单击“停止”,则停止.

yuanli_kuan1年前1

sunnymeimei 共回答了19个问题 | 采纳率89.5%

需要一点简单的三角函数知识,利用VB的三角函数：
在窗体上添加一个Line1控件,
在窗体上添加2个按钮
1个Timer1控件,设置其Enabled 属性为False
代码如下：
Option Explicit
Private aef As Single
Private Pi As Single
Private D As Single
Private L As Single
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub
Private Sub Form_Load()
Timer1.Interval = 1000
Line1.x1 = 2000
Line1.x2 = 3000
Line1.y1 = 1500
Line1.y2 = 1500
L = 1000
Pi = 3.141592654
aef = 0
D = 6
End Sub
Private Sub Timer1_Timer()
aef = aef + D
If aef = 360 Then aef = 0
Line1.x2 = Cos(aef / 180 * Pi) * L + 2000
Line1.y2 = Sin(aef / 180 * Pi) * L + 1400
End Su

1年前查看全部

谁告诉我下答案设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上

谁告诉我下答案
设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是。

A; Private Sub List1_Click()
Print Form1.Text
End Sub
B; Private Sub Form1_Click()
Print List1.Text
End Sub
C; Private Sub List1_Click()
Print List1.Text
End Sub
D; Private Sub Form1_Click()
List1.Print List1.Text
End Sub

蝴蝶盛开1年前1

寒江雪100 共回答了19个问题 | 采纳率100%

C
记得采纳~~！

1年前查看全部

VB中产生随机数各位大神,真的不会,麻烦说详细点,编程越简单越好,本人第一次学VB,别踩我.题目：使得单击一次按钮可以产

VB中产生随机数
各位大神,真的不会,麻烦说详细点,编程越简单越好,本人第一次学VB,别踩我.
题目：使得单击一次按钮可以产生一个[60,90]之间的随机数并显示在标签1上,再求出该数的正弦值,将结果写在标签2上.
提示
（1）使用Rnd函数产生随机数,注意,为了防止两次运行程序的随机数序列相同,调用Rnd之前先用Randomize语句进行初始化.
（2）产生某闭区间内的随机数的公式为：(上限-下限+1)*rnd+下限.
（3）求正弦值函数为：sin().

图片

幸运传奇1年前1

善良小汤圆 共回答了23个问题 | 采纳率95.7%

Private Sub cmdRanAngle_Click()
Dim dblAngle As double
Dim dblSin As double
'Randomize
dblAngle = dbl((90*ran)+60)
dblSin = sin(dblAngle)
lblScream.Caption = dblAngle
lblAnswer.caption = dblSin
End sub
最简单的方法,楼上都有错.
希望楼主采纳,有VB问题希望可以探讨,QQ827170254

1年前查看全部

求老师帮忙检查一个完形填空~可单击查看原图~

时代青年20041年前1

yangyuancn 共回答了17个问题 | 采纳率94.1%

我虽然不是老师,但这样简单的题还是会的.恭喜你,全对

1年前查看全部

Word的默认状态下单击“格式”工具栏中的“编号”按钮，______。

Word的默认状态下单击“格式”工具栏中的“编号”按钮，______。
A、可在所有段落前自动添加编号 B、 可在所有行前自动添加编号 C、 仅在插入点所在段落以后的新增段落前自动添加编号 D、可在插入点所在段落和以后新增的段落前自动添加编号

zhanlie1年前1

quixout 共回答了23个问题 | 采纳率87%

自己试一下就会知道，正确答案是D

1年前查看全部

奥数二元一次方程图片不清可单击察看原图

wangyun06011年前1

玄月之魔 共回答了16个问题 | 采纳率93.8%

你直接套用就行了
在所给的方程中a1=3,b1=-2,c1=5
a2=5,b2=-7,c2=3
那么根据题中所给的行列式算法
|c1,b1|
|c2,b2|=-29,
|a1,b1|
|a2,b2|=-11,
所以x=(-29)/(-11)=29/11,
同理可得y=16/11
你通分一下,也得这个结果...

1年前查看全部

16. 在Windows 中，单击鼠标右键产生的菜单称为 ____ 菜单。

16. 在Windows 中，单击鼠标右键产生的菜单称为 ____ 菜单。
6. 在Windows 中，单击鼠标右键产生的菜单称为 ____ 菜单。
A.控制 B.普通 C.命令 D.快捷

zwf3533632611年前1

富贵肥虫子 共回答了22个问题 | 采纳率81.8%

D

1年前查看全部

为什么第四问是【碳酸钠】和【氢氧化钠】?可单击查看原图

submetal1年前1

傻牛牛 共回答了12个问题 | 采纳率100%

（1）B、D G、H
（2）Ca(OH)2 + 2HCl = CaCl2 + 2H2O
（3）澄清石灰水 紫色石蕊试液
（4）氢氧化钠或氢氧化钠和碳酸钠 有白色沉淀的是G、H试管,H试管过滤后只有水和溶于水的二氧化碳,滴加盐酸,不会有气泡冒出；G试管Ca(OH)2与Na2CO3反应产物是CaCO3,NaOH,由于氢氧化钙微溶于水,所以碳酸钠不可能完全反应完（滴管中含有的氢氧化钙溶质很少）,也就是碳酸钠有剩余,所以溶质有两种.

1年前查看全部