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