A. 问一道高中信息技术题(vb程序语言) 已知a=“A":b=“B",则表达式a>b的逻辑值结果是
false
字符串比较是从第一个字符开始比较,并且比较的是ASCII码
,A的比B小 所以FALSE
B. VB怎么编程
Visual
Basic程序设计主要采用的是基于对象(主要是COM和ActiveX)和基于事件处理的可视化编程工具。在VB的IDE中通过可视化设计和布局窗口界面,并处理对象的事件代码。
VB可以编写任意Windows平台上的应用程序,但不包括Win32
Console
Application,到了.NET以后就例外了。
总的来说,VB的特点是简单易学、入门简单、操作方面、开发速度快等等。
C. 高中vb编程例题详解
Private Sub Command1_Click()
Dim a As Double, b As Double
a = InputBox("a的值")
b = InputBox("b的值")
c = InputBox("c的值")
Print "x1="; (-b + (b ^ 2 - 4 * a * c) ^ 0.4) / 2 / a, "x2="; (-b - (b ^ 2 - 4 * a * c) ^ 0.4) / 2 / a
End Sub
D. 高中信息技术教的编程语言是什么。。
VB语言,高中信息技术中的要求是VB,而且只是一些相对基础性的东西。PASCAL和C是信息技术竞赛考试的内容,因为难度相对高一些。
VB,1991年,美国微软公司推出了Visual Basic(可间称VB),目前的最新版本是VB 2005(VB8)中文版。Visual意即可视的、可见的,指的是开发像windows操作系统的图形用户界面的方法,它不需要编写大量代码去描述界面元素的外观和位置,只要把预先建立好的对象拖放到屏幕上相应的位置即可。
E. VB编写程序的步骤
拿本教程先学学语法,vb是面向对象的语言,你可以对照书上的例子在机器上学习编程.这样影响更深刻,步骤都不是严格的,可以根据程序的需要来进行.但是第一步应该是程序的总体算法,模块,界面设计.
F. 高中VB编程的一些源代码
uEnd是用户定义捕捉VB输出框(MsgBox)按下按钮事件一个变量.即你的原代码
MsgBox
"您确定要离开吗?",
vbYesNo
+
vbQuestion,
"离开程序"
执行按vbYes或vbNo按钮的结果参数值返回给程序以便执行下一代码.当然你不用这变量也能做到,但按钮需按两次:
Private
Sub
Command2_Click()
MsgBox
"您确定要离开吗?",
vbYesNo
+
vbQuestion,
"离开程序"
If
MsgBox("您确定要离开吗?",
vbYesNo
+
vbQuestion,
"离开程序")
=
vbYes
Then
End
End
If
End
Sub
uEnd
=
MsgBox("您确定要离开吗?",
vbYesNo
+
vbQuestion,
"离开程序")
上句代码实际上可看作VB输出框执行结果赋值于uEnd,
=
号在VB6.0中本身就应该看为赋值号.而且程序代码简洁明了,不易写错.
下面参考MSDN的有关MsgBox说明:
MsgBox
函数
在对话框中显示消息,等待用户单击按钮,并返回一个
Integer
告诉用户单击哪一个按钮。
MsgBox
函数示例
本示例使用
MsgBox
函数,在具有“是”及“否”按钮的对话框中显示一条严重错误信息。示例中的缺省按钮为“否”,MsgBox
函数的返回值视用户按哪一个钮而定。本示例假设
DEMO.HLP
为一帮助文件,其中有一个内容代码为
1000。
Dim
Msg,
Style,
Title,
Help,
Ctxt,
Response,
MyString
Msg
=
"Do
you
want
to
continue
?"
'
定义信息。
Style
=
vbYesNo
+
vbCritical
+
vbDefaultButton2
'
定义按钮。
Title
=
"MsgBox
Demonstration"
'
定义标题。
Help
=
"DEMO.HLP"
'
定义帮助文件。
Ctxt
=
1000
'
定义标题
'
上下文。
'
显示信息。
Response
=
MsgBox(Msg,
Style,
Title,
Help,
Ctxt)
If
Response
=
vbYes
Then
'
用户按下“是”。
MyString
=
"Yes"
'
完成某操作。
Else
'
用户按下“否”。
MyString
=
"No"
'
完成某操作。
End
If
感谢你发的短消息!
该回答在由回答者修改过
G. 高中信息技术上编程那个工具叫什么,是每个电脑上都自带的吗还是要下载那个软件
目前高中启蒙用的是VB,也就是Visual Basic,具体的含义可以去网络下。这个是一种编程工具,虽然是微软开发的,但是不是系统自带的工具,需要去网上下载,直接搜索 VB下载,应该会找到很多,谢谢
H. 高一信息技术中,编写代码,软件vb6.0中线条用绿色,代码怎么表示 ,红色是(0,0,255)
RGB(255, 0, 0) '红色
RGB(0, 255, 0) '绿色
RGB(0, 0, 255) '蓝色
RGB(255, 255, 0) '黄色
RGB(255, 0, 255) '紫红色
RGB(0, 255, 255) '天蓝色
RGB(255, 255, 255) '白色
RGB(0, 0, 0) '黑色
数值可以在0到255之间变化,通过不同数值的组合就能得到16M(即1600多万)种颜色。
此外还可以使用常量:
vbRed '红色
vbGreen '绿色
vbBlue '蓝色
vbYellow '黄色
vbWhite '白色
vbBlack '黑色
等等
或者使用16进制值:
&HFF& '红色
&HFF00& '绿色
&HFF0000 '蓝色
&HFFFF& '黄色
&HFF00FF '紫红色
&HFFFF00 '天蓝色
&HFFFFFF '白色
&H0& '黑色
I. 高中VB编程的一些源代码
uEnd是用户定义捕捉VB输出框(MsgBox)按下按钮事件一个变量.即你的原代码 MsgBox "您确定要离开吗?", vbYesNo + vbQuestion, "离开程序"
执行按vbYes或vbNo按钮的结果参数值返回给程序以便执行下一代码.当然你不用这变量也能做到,但按钮需按两次:
Private Sub Command2_Click()
MsgBox "您确定要离开吗?", vbYesNo + vbQuestion, "离开程序"
If MsgBox("您确定要离开吗?", vbYesNo + vbQuestion, "离开程序") = vbYes Then
End
End If
End Sub
uEnd = MsgBox("您确定要离开吗?", vbYesNo + vbQuestion, "离开程序")
上句代码实际上可看作VB输出框执行结果赋值于uEnd, = 号在VB6.0中本身就应该看为赋值号.而且程序代码简洁明了,不易写错.
下面参考MSDN的有关MsgBox说明:
MsgBox 函数
在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。
MsgBox 函数示例
本示例使用 MsgBox 函数,在具有“是”及“否”按钮的对话框中显示一条严重错误信息。示例中的缺省按钮为“否”,MsgBox 函数的返回值视用户按哪一个钮而定。本示例假设 DEMO.HLP 为一帮助文件,其中有一个内容代码为 1000。
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue ?" ' 定义信息。
Style = vbYesNo + vbCritical + vbDefaultButton2 ' 定义按钮。
Title = "MsgBox Demonstration" ' 定义标题。
Help = "DEMO.HLP" ' 定义帮助文件。
Ctxt = 1000 ' 定义标题
' 上下文。
' 显示信息。
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' 用户按下“是”。
MyString = "Yes" ' 完成某操作。
Else ' 用户按下“否”。
MyString = "No" ' 完成某操作。
End If
感谢你发的短消息!
该回答在由回答者修改过
J. 高一 计算机vb编程
Private Sub Command1_Click()
Dim a As Double, b As Double, c As Double
Dim sina As Double, cona As Double
a = Val(InputBox("a="))
b = Val(InputBox("b="))
c = Val(InputBox("c="))
If a + b > c And a + c > b And b + c > a And a > 0 And b > 0 And c > 0 Then
cosa = (b ^ 2 + c ^ 2 - a ^ 2) / (2 * b * c)
sina = Sqr(1 - cosa ^ 2)
h = c * sina
l = c * cosa
Line (300, 300)-(300 + b, 300)
Line (300, 300)-(300 + l, 300 + h)
Line (300 + l, 300 + h)-(300 + b, 300)
Else
MsgBox "输入的边长不符合要求"
End If
End Sub