【高分急求】VB考试试题！高手请进
期末考试的试题，请各位慎重严肃作答，在此谢过，答案准确一定追加分数！！
对不起，新手发问题失误，该发的问题没发出来=。=现在在补充中慢慢修改，谢谢大家耐心看完！问题全部打完一定追分，只是辛苦大家一次次刷新了
判断
1.欲在PictureBox控件上设置其它控件,可以通过把窗体上原已设计好的控件拖动到PictureBox控件上来实现.
2.面向对象程序设计是一种以对象为基础,由事件驱动对象执行的设计方法.
3.滚动条控件可作为用户输入数据的一种方法.
4.在VB中,用DIM定义数组时数组元素也自动赋初值为0.
5.单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件任务.
6.Visual Basic程序的运行,仅能从某一窗体启动,如Form1窗体.
7.某一过程中的静态变量在过程结束后,静态变量及其值可以在其它过程中使用.
8.只要用拖拽的方法,将工具箱中所需的控件拖到窗体上即可完成.
9.Image控件使用的资源比Picture控件使用的多.
10.面向对象程序设计是一种以对象为基础,由事件驱动对象执行的设计方法.
在VB 6.0中,设 Single型变量 XYZ 的值为123.45,若要将其转换成字符串,应使用的类型转换函数是【1】.str(XYZ)
在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是【1】val("12345")
在VB中,若要重新定义一个动态数组的元素个数,应当使用【1】redim语句对其进行重新定义
2 Str(xyz)
3 val("123.45")
4 ReDim()
Str()或者Cstr()
Val()
Redim
vb高手请进(有高分)
我试验过了，你把For n = 1 To 6改成For n = 1 To 1000，然后下面加上一局C=0，则会打印出6，28，496这三个数字了 问题解决了，最后看你能加多少高分咯~最后再提醒下，记得把你的form的autoredraw属性设置成true，否则无法在屏幕打印的，你就看不到结果了 ...
vb高手请进
生成指定范围内的随机整数时，可使用公式：Int((upperbound - lowerbound + 1) * Rnd + lowerbound)。其中，upperbound为上限，lowerbound为下限。例如，要生成5至10的随机整数，可使用：Int(6 * Rnd + 5)。实际应用中，RND为伪随机数，可通过设定可变种子，如时间，实现真正的随机性。若需生成...
vb的小问题。高手请进
要解决VB的小问题，首先在菜单中找到“工程\/引用\/Microsoft Script Control 1。0”，确保前面有勾，然后点击OK，你将获得满意的答案，并且得到高分。在代码中，我们定义了几个变量。`Dim objScript As New ScriptControl` 创建了一个新的ScriptControl对象。`a As Double, x As Double, y As String`...
VB高手请进,一些基础题,实在不知道求答案!
1.在Visual Basic 中可以建立下拉式菜单和__右键_菜单。2.在文件对话框中，FileName属性与FileTitle属性是有区别的，假定有一个名为“Js.txt”的文件，位于“C:\\teacher"目录下，则FileTitle属性的值为___文本文件___，FileName属性的值为__JS.txt__。3.假定有一个通用对话框 CommonDialog1，...
一道vb 题目 请高手解答
本文提供了一段VB代码，用于解决特定问题。代码采用了直接方法，即逐数检查，筛选出符合条件的数字对，并在主函数Form_Load中进行调用。通过将结果存储在变量result中，最终通过MsgBox展示。代码的核心在于检查数字对中的重复性，通过定义函数noRepeated来实现。在noRepeated函数中，我们首先初始化一个布尔变量...
vb高手请进
1 var y,m,d,t:longint;function day(k:longint):longint;var days:longint;begin case m of 1,3,5,7,8,10,12:days:=31;4,6,9,11:days:=30;2:if ((y mod 4=0) and (y mod 100<>0)) or ((y mod 100=0) and (y mod 400=0)) then days:=29 else days:=28;end...
vb高手请进,模拟Select Case 语句.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = "" Or TextBox2.Text = "" Then MsgBox("正确输入先") Exit Sub End If Dim k As Integer Select Case TextBox2.Text Case "一" k = 1 Case "二...
大学VB题目 请VB高手帮忙 万分感激
= 675 End Begin VB.CommandButton cmdNEW Caption = "新 题 目"Height = 375 Left = 4080 TabIndex = 1 Top = 120 Width = 1635 End Begin VB.TextBox txtCS
vb高手请进(10点之前在线等)
创建对象变量有两个步骤。第一，必须先声明对象变量。然后必须用 Set 语句将一个正确的引用赋值给对象变量。同样地，With...End With 块必须先用 With 语句进入点来执行初始化。此错误有以下的原因和解决方法：试图使用的对象变量，还没有用一个正确对象的引用来赋值。给对象变量指定或再指定一个引用...
vb高手请进入,text1到text5相继输出
在上面定义一个整型变量X,在你的if语句里面再加一个if语句.你的if语句的else下面这么写:x=x+1 if x<=1000 then Text1.Text = Text1.Text & sz(i) & "+" & sz(j) & "+" & sz(k) & "+" & sz(l) & "+" & sz(m) & "+" & sz(n) & " "elseif x>1000 and x<=...
