在fomr2怎么用inputbox函数来输入姓名查询出信息?。。。。信息在form1的文本框中,()
在form1里 是按“浏览”按钮 使用 commondialog 控件的showopen"打开"txt文件将内容显示到 文本框里。。。
现在问题是按form1的“查询“按钮 用inputbox函数 来查询 将相关信息显示到新的窗口 ,就是form2中显示。。 比如点查询 输入姓名。。姓名所带的信息就显示到form2哪里了。。
不知道你看的懂不- -
完全看不懂啊。。。我是非计算机专业的。- -这个好像略麻烦啊
追答每太看懂题目。
因为楼主主要看inpoutbox
在Form2里面是可以访问form1.text1.text的。
inputbox前面已经说过,之后就是查询了。这就得看你text1中的文本是啥样子的了。
在form1里 是按“浏览”按钮 使用 commondialog 控件的showopen"打开"txt文件将内容显示到 文本框里。。。
现在问题是按form1的“查询“按钮 用inputbox函数 来查询 将相关信息显示到新的窗口 ,就是form2中显示。。 比如点查询 输入姓名。。姓名所带的信息就显示到form2哪里了。。
不知道你看的懂不- -
哦,现在看懂。
这样子呗。我觉得应该这样子,不需要你说的还要讲text文件的内容转移到文本。
dim TheName as string '名字
public TheInfor as string ’名字和名字对应的信息:
’我所认为的是,你的名字和名字对应的信息在text文件的同一个行里面。
’form1中一个按钮
‘点击事件里
thename=inputbox(,"")
‘然后就是逐一查询了
‘逐一查询步骤:
'1读取text文件第一行内容到变量TheInfor;
'2查看thename是否与 if mid(TheInfor,1,len(thename))=thename ,说明查询到了,结束
'3若2没有查询到返回到1,只不过读取text第二行内容。
读取到了就简单了。
调用form2,当然你可以在form2中加textbox控件。将TheInfor 赋值给textbox.text。
基本思路就是这样。
txt内容转到文本是浏览按钮的功能
这个查询要求的是 :点了。显示form2.。然后才是inputbox函数,按姓名查询 ,我刚按你说的在form1的
Private Sub Command1_Click()
Name = InputBox("请输入职工姓名")
Form1.Hide
Form2.Show
End Sub
。运行就出现编译错误了= =
话说从读取txt文件第一行到变量。是利用什么啊?貌似没学过
额……,好吧。
Name 你定义了吧?要定义才成。 最好改为其他名字,name占用关键词。
至于读取text文件的某一行到变量,参照一下顺序文件读写就知道了。
当然你可以用其他的方式处理一下你的字符串。以达到查询的目的。
如果你不着急的话,我一会回到宿舍在帮帮你。我现在要下班了。
vb中inputbox函数怎么用
首先启动vb6,新建一个标准exe文件,进入窗体主界面。在工具箱里双击按钮控件,在窗体上创建一个按钮对象。双击按钮控件进入代码编写区域,选择对象为conmmand1,过程为click。接着输入代码: Dim a, b As Integer a = InputBox("请输入整数值
vb编程:输入学生的姓名,学号和成绩。成绩包括高数、英语和专业课,判断...
Private Sub Command1_Click()Dim name As String, num As Integer, s1 As Single, s2 As Single, s3 As Single, s As String name = InputBox("输入学生的姓名")num = Val(InputBox("输入学生的学号"))s1 = Val(InputBox("输入高数成绩"))s2 = Val(InputBox("输入英语成绩"))s3 = ...
vb的inputbox函数怎么用?玩转inputbox函数
先来看看inputbox的函数原型: Sting inputbox(提示文本,[对话框标题],[输入框文本],[窗口所在x轴],[窗口所在y轴],[帮助文件],[帮助图标主题]) []内为可选参数 可见常用的参数只有3个,分别是提示文本、标题、输入框文本。 当我们可选参数为空时,即input(""),如下,会继承父窗口...
vb输入身份证如何同时在文本框中显示出生年份和年龄
1、进入vb,单击输入身份证号按钮,使用inputbox函数。2、输入身份证号等于InputBox。3、在名为shengri的文本框中输入出生年份。4、使用yearnow获得系统日期的年份,使用mid函数获取身份证中年份信息,相减可得年龄。5、保存工程文件和窗体文件,即可完成设置。
用vb设计一项目,单击窗体后依次弹出输入对话框[inputbox()].输入...
Dim name As String '姓名Dim sex As String '性别Dim ago As Integer '年龄name = InputBox("请输入 姓名", "姓名")sex = InputBox("请输入 性别", "性别")age = InputBox("请输入 年龄", "年龄")MsgBox "姓名:" & name & ",性别:" & sex & ",年龄:" & ageEnd Sub ...
通过输入框输入姓名,然后再消息框中显示输出。。。用VB来设计
x = InputBox("输入")MsgBox x
inputbox函数到底怎么用啊?
Helpfile & Context:可选,用于提供上下文相关的帮助,用户可通过F1查看。使用InputBox时,可以结合MsgBox将输入的两个数据连接后显示出来。需要注意的是,单独提供的XPos或YPos参数在VB中可能会被忽略,但在VBS中则会生效。当用户点击取消时,函数将返回空字符串("")。
VB6.0中,如何调用INPUTBOX函数?
dim s as string s=inputbox("Inpuut a string: ")
inputbox在vb中怎么用?
该函数的返回结果为一数值,其中,“按钮”参数一般用VB的内部符,这些符号常量有vbOkOnly.vbOKCancel.vbYesNo.vbYesNoCanse等等,他们一般可以望文生义。代码示例 '程序的作用是用InputBox函数输入2个数据之后,把他们连接起来,用MsgBox函数显示。Private Sub Command1_Click()Dim a As String, b As ...
vb 自定义变量 c = InputBox("请输入想要查询的学生的名字") For z...
在循环中加入deubg.pring c , b(z).name 检查一下值再说,看看b(z).name 输入有无问题。