VB.NET 考试题目急求高手啊

1. 子过程CountN用来统计字符串中各数字字符（“0”~“9”）出现的个数；主调程序实现在TextBox1框输入的文本，每次单击“统计”按钮，调用该子过程，在Label1框中显示结果，运行界面如图所示
Sub Button1_Click(.....) Handles Button1.Click
Dim n(9) As Integer ,i%
Call CountN(n,TextBox1.Text)
Label2.Text= “”
For i=0 To 9
If n(i) Then
Label2.Text &=”数字” & Chr(i+48) & “出现次数为” & n(i) & vbCrLf
End If
Next i
End Sub
Sub CountN(________（1）_________)
Dim c As Char, i%, m%, j%
For i=0 To 9
num(i)=0
Next i
m=______（2）_______
For i=1 To m
c=______（3）_______
If c>= “0” And c<=”9” Then
j=Val(c)
Num(j)=___（4）______
End If
Next i
End Sub
2.VB.NET为用户提供了Math.Sqrt函数用于计算平方根值，但被开方值若为负数则无法得出正确的结果（如，-4的平方根应等于2i）。要求设计一个Function过程解决这一问题。（按钮“计算”和“清除”的Name属性分别为Button1和Button2，文本框的Name的属性为Textbox1，两个标签的属性为Label1，label2）程序运行结果如下图所示：
Public Class Form1
Sub myclear()
TextBox1.Text = ""
TextBox1.Focus()
Label2.Text = ""
End Sub
Function mysqr(ByVal num)

举报该文章

相关建议 2010-06-24

(1)ByVal num as Integer() ,ByVal strInput as string
(2) strInput.Length -1
(3)strScript(i)
(4) Num(j)+1
Function mysqr(ByVal num) as string
Dim retVal as string
if num<0 then
num =-num
retVal =Math.Sqrt(num).tostring +"i"
else
retVal =Math.Sqrt(num).tostring
end if
return retVal
End function

温馨提示：内容为网友见解，仅供参考

当前网址：https://22.t2y.org/zz/cxcffst6f.html

其他看法

无其他回答

谁是VB。NET高手?英语好的速度我有两道题
Class Form1 Inherits System.Windows.Forms.Form Private Sub Form1_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load Timer1.Enabled = True Timer1.Interval = 1000 End Sub Private Sub timer1_Tick(ByVal eventSender As System.Object, ByV...

用VB.NET编写一个程序 :编一求阶乘的函数f(n),主调程序求组合数的程序...
用VB.NET编写一个程序 :编一求阶乘的函数f(n),主调程序求组合数的程序,分别调用f(n),用来计算组合数的值 10 组合数公式 n!\/m!(n-m)! “!”表示阶乘谢啦我的程序总是提示确保不会除零我郁闷了。。。 Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e ...

请教用VB.NET向网口发送16进制的数的方法.
加密后变成了：“09 51 55 F4 FB 10 6F A4 D3 E8 87 46 F8 2F 49 CD ; ”得出这样的结果是有很多方法都可以实现的：比如每个原数上加上个常数就可以了。00+09=09；得出第一组加密后的数值 00+51=51；得出第二组加密后的数值 ...00+CD=CD；得出第16组加密后的数值.加密的方法还有很...

用vb编程:已知3个学生,5门功课的成绩,求每个学生的总分,平均分,每门...
Private Sub Command1_Click()'已知3个学生，5门功课的成绩，求每个学生的总分，平均分，每门功课的平均分。Dim a As Single, b As Single, c As Single, d As Single, e As Single For i = 1 To 3 If i = 1 Then a = InputBox("请输入学科1的成绩：", "学生1")b = InputBox(...

VB中的mid窗体是什么窗体?关闭mid时触发什么事件?
楼主说的是MDI窗口吧..MDI(多重窗体）1.区分MDI(多重窗体）与多窗体结构 2.一个工程只能有一个MDI 建立一个MDI后，将普通的窗体的 MDICHILD属性设为真，则该窗体就变成MDI的子窗体。

会计考试题目,帮写一下答案
07～08会计考试题目,急求答案!! 1、错2、错3、错4、对5、对6、错7、错8、错9、错10、错会计考试题目，求高手告诉答案 22、C； 23、D； 24、A； 25、A；会计考试题。求答案！正确答案：ABCD 根据《消费税暂行条例》的规定，纳税人自产自用的应税消费品，用于连续生产应税消费...

知识产权考试题目,急求高手帮忙解答?
2.专利性的确定。专利的新颖性和创造性是一般相对于现有技术来说的(抵触申请除外)，现有技术的是根据申请日(有优先权日的是优先权日)确定的，申请日前公开的就是现有技术，此后的就不是。也就是说，有没有专利性，可能就是一天之差。一般在国外，专利的申请的时间，申请人是抓的很紧的。42 外观...

怎么学计算机,高分求真正的高手。感谢,满意追分。
JAVA+J2EE+ORACLE\\DB2\\MYSQL（包括JAVA的延伸技术 JS JSP AJAX等）另一个方向就微软的.NET体系，主要是ASP.NET C# MFC+SQLSERVER 等技术。上面的这些，一般人都会有所了解。但是企业开发远远不止这些，技术每天都在变化。企业里主要区分前端技术和后台技术。前端技术除了刚才提到的asp,jsp以外，还有adobe...

...asp php asp.net java c++ c vb 到底哪个才是软件开发要学习的。_百...
学习C语言，考试过关就算学会了。课题项目中，只要程序能够编译，运行，并且输入输出满足要求就了事了。但是，写程序的时候是否想过如何把程序写得更加精炼，高效，高质量？对程序调试中出现的问题是否刨根问底知道原因，还是不求甚解搪塞过去算数？还有，很多中国的大学毕业生对于知识的掌握肤浅，机械，没有...

怎么用vb制作俄罗斯方块游戏啊,简单点的。
VB中WithEvents静态方法是非常有用的,它可以显著增强代码可读性,同时也让VB.net中的事件处理非常方便,不像C#那样离开了窗体设计器就必须手工绑定事件。 4.2.3类型转换运算符在Visual Basic 2005中将加入一个新的运算符——TryCast,相当于C#的as运算符。我一直希望VB有这样一个运算符。VB目前的类型转换运算符主要...

相似回答

大家正在搜

VB.NET 考试题目 急 求高手啊

VB.NET 考试题目急求高手啊